/ScriptServ

on 1:load:{ echo -a 7Please look in the menubar for "SuperTalker" and "Help" for instructions. | echo -a 7Or open the help-use.txt included for instructions. }

menu menubar {
-
SuperTalker
.SuperTalker
..Normal:talk5 $?="Enter Your Text:"
../Me:talk6 $?="Enter Your Text:"
.-
.ColorTalker
..Normal:talk3 $?="Enter Your Text:"
../Me:talk4 $?="Enter Your Text:"
.-
.Help:run help-use.txt
.Unload:unload -rs SuperTalker.mrc
}

alias talk5 { msg $active $replace($1-,a,4ä,b,7ß,c,8©,d,9d,e,3ë,f,12f,g,13g,h,6h,i,4î,j,7j,k,8k,l,9l,m,3m,n,12ñ,o,13õ,p,6p,q,4q,r,7®,s,8§,t,9t,u,3ú,v,12v,w,13w,x,6x,y,4ý,z,7z) | halt }
alias talk6 { me $replace($1-,a,4ä,b,7ß,c,8©,d,9d,e,3ë,f,12f,g,13g,h,6h,i,4î,j,7j,k,8k,l,9l,m,3m,n,12ñ,o,13õ,p,6p,q,4q,r,7®,s,8§,t,9t,u,3ú,v,12v,w,13w,x,6x,y,4ý,z,7z) | halt }
alias talk3 { msg $active $replace($1-,a,4a,b,7b,c,8c,d,9d,e,3e,f,12f,g,13g,h,6h,i,4i,j,7j,k,8k,l,9l,m,3m,n,12n,o,13o,p,6p,q,4q,r,7r,s,8s,t,9t,u,3u,v,12v,w,13w,x,6x,y,4y,z,7z) | halt }
alias talk4 { me $replace($1-,a,4a,b,7b,c,8c,d,9d,e,3e,f,12f,g,13g,h,6h,i,4i,j,7j,k,8k,l,9l,m,3m,n,12n,o,13o,p,6p,q,4q,r,7r,s,8s,t,9t,u,3u,v,12v,w,13w,x,6x,y,4y,z,7z) | halt }