Stars of Shareware: DFÜ und Kommunikation/SOS-DFUE.ISO/programm/dos/terminal/commo60/co1205/wcb00.mac

Text File | 1993-12-05 | 1.5 KB | 29 lines

 WildCat BBS {:wcba} {sete wc3} {exec del c:\commo\commo.cap} {clear} {setl 60,hng,6,|}
 {:wc0} {golo wca,esc} {golo wcc,[N]onstop} {golo wcd,Last Name} {golo wce,correctly?} {golo wcf,[Y]} {look First Name} {send JONATHAN|} (First Name)
 {:wc1} {golo wcg,Last Name} {golo wch,correctly?} {golo wci,Are you JONATHAN DEER} (First and Last Name) {look Password} {send %_pas|}
 {:wc2} {golo wcj,birth date} {golo wck,phone number} {golo wcl,correctly?} {golo wcm,Special Bulletin} {golo wcn,[N]onstop} {golo wco,to quit} {golo wcp,Like To View} {golo wcq,Like To Go To The Bulletin} {golo wcr,Bulletin Menu? [y/n]}
        {golo wcs,continue anyway [y/n]?} {golo wct,[ENTER] to continue} {golo wcu,NEW Bulletins? [Y]} {golo wcv,main menu} {golo wcw,Command >>} {look zzzzzzz}
 {:wc3} {macl commo.mac,zzz} {}
 {:wca} {send ^[^[} {goto wc0}
 {:wcc} {send s|} {goto wc0}
 {:wcd} {send |} {goto wc0}
 {:wce} {pause 1} {send n|} {goto wc0}
 {:wcf} {send n} {goto wc0}
 {:wcg} {send DEER|} {goto wc1} (Last Name)
 {:wch} {pause 1} {send n|} {goto wc0}
 {:wci} {send Y|} {goto wc1}
 {:wcj} {send 000000|} {send Y|} {goto wc2} (Birthdate)
 {:wck} {send 0000000000|} {send Y|} {goto wc2} (Phone Number)
 {:wcl} {send n|} {goto wc2}
 {:wcm} {send |} {goto wc2}
 {:wcn} {send |} {goto wc2}
 {:wco} {send |} {goto wc2}
 {:wcp} {send n} {goto wc2}
 {:wcq} {send n} {goto wc2}
 {:wcr} {send n} {goto wc2}
 {:wcs} {send y|} {goto wc2} (Impending Event Prompt)
 {:wct} {send |} {goto wc2}
 {:wcu} {send n} {goto wc2}
 {:wcv} {goto wc3}
 {:wcw} {goto wc3}