sorry about that. Be easy this is the first one I tried to write
thanx
proc main
string sline, name,ext1
fopen 0 "try1.txt" read ;open data file
while not feof 0;while the file still has data
fgets 0 sline ;read the line of data
strtok name sline "`t" 1 ; get line of first field
strtok ext1 sline "`t" 1 ; get line of second field
set txpace 50
waitfor "Name (last first) : "
transmit name
waitfor "Class Number : "
transmit "10^M"
waitfor "Extension [1] "
transmit ext1
waitfor "Extension [2] "
transmit "^M"
waitfor "PhoneMail Password : (Default = ##########): "
transmit "^M"
waitfor "Group Name : (Default = ): "
transmit ";^M"
endwhile
fclose 0
endproc