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

Text File | 1993-12-05 | 13.2 KB | 240 lines

 {:1st} (Initialization of Modem's NonVolatile RAM) {send ~~AT&F ~|} {look OK}
 {send ~ATL0N1S11=50S36=7S37=11S46=0S48=128 ~|} {look OK}
 {send ~ATS38=0S95=45&C1&D2&Q5&W ~|} {look OK} {send ~ATZ ~|} {look OK} {clear} {dial-c} {} (For Practical Peripherals PM14400FXSA V.32bis modem)
 {:2nd} (Macro to Execute an NO CARRIER) {clear} {dial-c} {}
 {:zzz} {} (Final Stop)
 {:yyya} {macl commo.mac,zzz}
 {:pgd} (DOWNLOAD Protocol Menu Part I) {sete yyya} {macl protocol.mac,pgda}
 {:end} (DOWNLOAD Protocol Menu Part II) {sete yyya} {macl protocol.mac,enda}
 {:pgu} (UPLOAD Protocol Menu Part I) {sete yyya} {macl protocol.mac,pgua}
 {:hom} (UPLOAD Protocol Menu Part II) {sete yyya} {macl protocol.mac,homa}
 {:zmodem} (PNS Download Auto Activation) {macl protocol.mac,zmodema} {}
 {:pnszup} (PNS Upload Auto Activation) {macl protocol.mac,pnszupa} {}
 {:al;} (CompuServe GIF Navigation Part I) {sete yyya} {macl cisnav.mac,cisn1}
 {:al'} (CompuServe GIF Navigation Part II) {sete yyya} {macl cisnav.mac,cisn2}
 {:ala} (ASCII Upload) {ascii %uldir\} {}
 {:ale} {}
 {:alf} {}
 {:alh} (Macro to Execute on Hangup) {hangup} {clear} {dial-c} {}
 {:alj} {exec list %_cap /e} {} (Need LISTXXX)
 {:all} {}
 {:alq} {exec list %dldir} {} (Need LISTXXX)
 {:alr} {}
 {:als} (Swapping To Disk During Shell To DOS) {exec cd \commo} {shell-s} {exec del swapfile.$$$} {}
 {:alu} (Utility/Host Mode Menu)
 {setv _menu1, A F1 1 ■ Edit an External File}
 {setv _menu3, B F2 2 ■ Run a Macro in COMMO.MAC}
 {setv _menu5, C F3 3 ■ Run MOSTHOST Host Mode}
 {setv _menu6,            (use D to install)}
 {setv _menu8, D F4 4 ■ View/Edit MOSTHOST}
 {setv _mlabel,uext,urun,uhost,vhost}
 {menu 12,41,Utility/Host Mode Menu} {}
 {:urun}  {input runmac,Macro to run} {goto %runmac} {}
 {:uext}  {input temp,Filename to edit}
 {:uedit} {edit %temp} {goto alu} {goto alu} {}
 {:uhost} {macl mosthost.mac,bbs}
 {:vhost} {setv temp,%_hom%mosthost.mac} {goto uedit}
 {:alv} {}
 {:zip1} {setv zipa,} {input zipa,Enter Filename Only for Zip Conversion} {return}
 {:aly} {}
 {:alz} {}
 {:nf1} (Help Menus)
 {setv _menu1, A F1 1 ■ COMMO552 Key Commands}
 {setv _menu3, B F2 2 ■ COMM1205 Key Commands}
 {setv _menu4,           (Macro Definitions)
 {setv _mlabel,nf1a,nf1b}
 {menu 8,38,Help Menus} {}
 {:nf1a} {help c} {goto nf1} {} (Need LISTXXX)
 {:nf1b} {exec list key.txt} {goto nf1} {} (Need LISTXXX)
 {:nf2} (Hot Key Menu)
 {setv _menu1, A F1 1 ■ First and Last Name}
 {setv _menu2, B F2 2 ■ Password}
 {setv _menu3, C F3 3 ■ Street Address}
 {setv _menu4, D F4 4 ■ City, State}
 {setv _menu5, E F5 5 ■ Zip Code}
 {setv _menu6, F F6 6 ■ Voice Phone Number}
 {setv _menu7, G F7 7 ■ Data Phone Number}
 {setv _menu8, H F8 8 ■ Birthdate (mm-dd-yy)}
 {setv _menu9, I F9 9 ■ Modem Description}
 {setv _menu10, J F10  ■ Computer Description}
 {setv _menu11, K F11  ■ Newuser Letter}
 {setv _mlabel,nf2a,nf2b,nf2c,nf2d,nf2e,nf2f,nf2g,nf2h,nf2i,nf2j,nf2k}
 {menu 15,37,Hot Key Menu} {}
 {:nf2a} {send JONATHAN DEER|} {} (First and Last Name)
 {:nf2b} {send %_pas|} {}
 {:nf2c} {send STREET ADDRESS|} {} (Street Address)
 {:nf2d} {send CITY, STATE|} {} (City, State)
 {:nf2e} {send 00000-0000|} {} (Zip Code)
 {:nf2f} {send 000-000-0000|} {} (Voice Phone Number)
 {:nf2g} {send 000-000-0000|} {} (Data Phone Number)
 {:nf2h} {send 00-00-00|} {} (Birthdate)
 {:nf2i} {send MODEM DESCRIPTION|} {} (Modem Type)
 {:nf2j} {send COMPUTER DESCRIPTION|} {} (Compute Type)
 {:nf2k} {send NEWUSER LETTER|} {}
 {:nf3} (Utility Menu)
 {setv _menu1, A F1 1 ■ Commo Log}
 {setv _menu2, B F2 2 ■ Ozbext Log}
 {setv _menu3, C F3 3 ■ Captured Screens}
 {setv _menu4, D F4 4 ■ Local Zone Lookup}
 {setv _menu5, E F5 5 ■ Local Zone Pricing}
 {setv _menu6,          Control-C to Exit}
 {setv _menu7, F F6 6 ■ Area Code Location}
 {setv _menu8, G F7 7 ■ Initialize NVRAM}
 {setv _menu9, H F8 8 ■ Offline Xpress/QWK Mail}
 {setv _menu10, I F9 9 ■ ZIP Conversion}
 {setv _menu11, J F10  ■ Timeset to Atomic Clocks}
 {setv _menu12, K F11  ■ BBS List for CITY County}
 {setv _menu13, L F12  ■ CITY County BBS List}
 {setv _mlabel,nf3a,nf3b,nf3c,nf3d,nf3e,nf3f,nf3g,nf3h,nf3i,nf3j,nf3k,nf3l}
 {menu 17,46,Utility Menu} {}
 {:nf3a} {exec trim commo.log 24} {exec list commo.log /e} {goto nf3} {} (Need PNS52 and LISTXXX)
 {:nf3b} {exec trim ozbext.log 24} {exec list ozbext.log /e} {goto nf3} {} (Need PNS52 and LISTXXX)
 {:nf3c} {exec trim commo.scr 24} {exec list commo.scr /e} {goto nf3} {} (Need PNS52 and LISTXXX)
 {:nf3d} (Local Zone Lookup) {call alq1} {exec zum92 %prfxa > zum.txt} {exec list zum.txt} {exec del zum.txt} {goto nf3} {} (Need ZUM92V3 and LISTXXX)
 {:alq1} {setv prfxa,} {input prfxa,Enter Prefix calling from} {return}
 {:nf3e} (Zone Pricing) {call alqa} {exec zum92 %prfx1 %prfx2} {goto nf3} {} (Need ZUM92V3)
 {:alqa} {setv prfx1,} {input prfx1,Enter Prefix calling from} {setv prfx2,} {input prfx2,Enter Prefix calling to} {return}
 {:nf3f} (Area Code Location) {call acq1} {exec ac %acqa > areacode.txt} {exec list areacode.txt} {exec del areacode.txt} {goto nf3} {} (Need AREACODE and LISTXXX)
 {:acq1} {setv acqa,} {input acqa,Enter Area Code you are calling} {return}
 {:nf3g} (Initialization of Modem's NonVolatile RAM) {send ~~AT&F ~|} {look OK}
 {send ~ATL0N1S11=50S36=7S37=11S46=0S48=128 ~|} {look OK}
 {send ~ATS38=0S95=45&C1&D2&Q5&W ~|} {look OK} {send ~ATZ ~|} {look OK} {clear} {goto nf3} {} (For Practical Peripherals PM14400FXSA V.32bis modem)
 {:nf3h} (Offline Xpress/QWK Mail) {exec-s olx###.bat} {clear} {goto nf3} {} (Need OLX-TD.EXE)
 {:nf3i} (ZIP Conversion) {call zip1} {exec-sw zipcon %zipa} {goto nf3} {}
 {:nf3j} (Timeset to Atomic Clocks) {exec-s c:\commo\ts\timeset} {goto nf3} {} (Need TSET71)
 {:nf3k} (BBS List for CITY County) {exec list bbslist.txt} {goto nf3} {} (Need LISTXXX and BBSLXXX)
 {:nf3l} (CITY County BBS List) {exec list bbslist} {goto nf3} {} (Need LISTXXX and BBSXXXX)
 {:nf4} (Message Quote Menu)
 {setv _menu1,             "Three Easy Steps to Quote a Message"
 {setv _menu3, F1 ■ 1)  Hit <F1> to capture the quote you wish to edit.
 {setv _menu5,      2)  Hit <ESC> and position the BBS for typing, then
 {setv _menu6,          hit <F4> to return back to this menu for step 3.
 {setv _menu8, F2 ■ 3)  Hit <F2> to edit using PE2, then
 {setv _menu9,          hit <F3> and <ENTER> to send the quote.
 {setv _mlabel,nf4a,nf4b}
 {menu 13,67,Message Quote Menu} {}
 {:nf4a} {screen y,trunc.scn} {goto nf4} {}
 {:nf4b} {exec pe2 trunc.scn} {exec trunc.exe trunc.scn trunc.out} {asciiup trunc.out,:} {send  |} {exec del trunc.scn} {}
 NOTE: The TRUNC executable must be followed by the COMMO screen image, then one
 space, and then the output file.  TRUNC is unforgiving about deviating
 from the above.  The pacing character ":" is assumed below.
 {:nf5} {}
 {:nf6} {}
 {:nf7} {}
 {:nf8} {}
 {:nf9} {}
 {:nf0} {}
 {:nfa} {}
 {:nfb} {}
 {:sf1} {}
 {:sf2} {}
 {:sf3} {}
 {:sf4} {}
 {:sf5} {}
 {:sf6} {}
 {:sf7} {}
 {:sf8} {}
 {:sf9} {}
 {:sf0} {}
 {:sfa} {}
 {:sfb} {}
                              Autologon Macros
 {:yyy} {macl commo.mac,zzz}
 Aftershock {:aft00} {sete yyy} {macl aft00.mac,afta}
 Alpha (8 Ball) {:apa00} {sete yyy} {macl apa00.mac,apaa}
 Alpha (Amiga-Nonymous) {:apa01} {sete yyy} {macl apa01.mac,apza}
 Auntie (Palladin) {:ant00} {sete yyy} {macl ant00.mac,anta}
 BBS-PC {:bbs00} {sete yyy} {macl bbs00.mac,bbsa}
 BYE510 (Elephant's Graveyard 9) {:bye00} {sete yyy} {macl bye00.mac,byea}
 CIS (CompuServe) {:cis00} {sete yyy} {macl cis00.mac,cisa}
 CIS (CompuServe Weather) {:cis01} {sete yyy} {macl cis01.mac,cisg}
 CNet {:cnt00} {sete yyy} {macl cnt00.mac,cnta}
 Coconut BBS (Price Club BBS) {:coc00} {sete yyy} {macl coc00.mac,coca}
 Coconut BBS (Coconet Computing) {:coc01} {sete yyy} {macl coc01.mac,coza}
 DCI BBS {:dci00} {sete yyy} {macl dci00.mac,dcia}
 Dialog Pro {:dlg00} {sete yyy} {macl dlg00.mac,dlga}
 DMG-BBS {:dmg00} {sete yyy} {macl dmg00.mac,dmga}
 EBBS-PC (Revelation) {:ebb00} {sete yyy} {macl ebb00.mac,ebba}
 Elite BBS {:elt00} {sete yyy} {macl elt00.mac,elta}
 Fido (IEEE [CITY]) {:fid00} {sete yyy} {macl fid00.mac,fida}
 FirstClass Server {:fcs00} {sete yyy} {macl fcs00.mac,fcsa}
 FoReM ST {:frm00} {sete yyy} {macl frm00.mac,frma}
 GDXBBS {:gdx00} {sete yyy} {macl gdx00.mac,gdxa}
 GT Powercom BBS {:gtp00} {sete yyy} {macl gtp00.mac,gtpa}
 Image {:img00} {sete yyy} {macl img00.mac,imga}
 Host+ (God's Word For Windows) {:hst00} {sete yyy} {macl hst00.mac,hsta}
 JBBS (JBBS) {:jbb00} {sete yyy} {macl jbb00.mac,jbba}
 Kameleon BBS {:kam00} {sete yyy} {macl kam00.mac,kama}
 Kingnet {:kgt00} {sete yyy} {macl kgt00.mac,kgta}
 Lamda {:lam00} {sete yyy} {macl lam00.mac,lama}
 Major BBS (Merchant Marine Advisor) {:maj00} {sete yyy} {macl maj00.mac,maja}
 Major BBS (ImageWare Software BBS) {:maj01} {sete yyy} {macl maj01.mac,maka}
 Maxihost and Megahost {:max00} {sete yyy} {macl max00.mac,maxa}
 Maximus CBCS {:mxm00} {sete yyy} {macl mxm00.mac,mxma}
 Micro BBS {:mbb00} {sete yyy} {macl mbb00.mac,mbba}
 Opus BBS {:ops00} {sete yyy} {macl ops00.mac,opsa}
 Oracomm-Plus {:ocp00} {sete yyy} {macl ocp00.mac,ocpa}
 Paragon BBS {:par00} {sete yyy} {macl par00.mac,para}
 PBBS {:pbb00} {sete yyy} {macl pbb00.mac,pbba}
 PCBoard BBS {:pcb00} {sete yyy} {macl pcb00.mac,pcba}
 Perspective Data Systems {:per00} {sete yyy} {macl per00.mac,pera}
 Phoenix RCS (Milliway's) {:phx00} {sete yyy} {macl phx00.mac,phxa}
 PowerBBS {:pbs00} {sete yyy} {macl pbs00.mac,pbsa}
 Pro BBS {:pro00} {sete yyy} {macl pro00.mac,proa}
 Proboard (City Limits) {:prb00} {sete yyy} {macl prb00.mac,prba}
 Proboard (Alien Biker Kat) {:prb01} {sete yyy} {macl prb01.mac,prbb}
 Procomm Plus Hostmode {:pph00} {sete yyy} {macl pph00.mac,ppha}
 Professional-YAM (Omen Technology Inc.) {:pym00} {sete yyy} {macl pym00.mac,pyma}
 Proline (Proline NBS) {:pln00} {sete yyy} {macl pln00.mac,plna}
 ProLogon (Scanline) {:prl00} {sete yyy} {macl prl00.mac,prla}
 Quick BBS {:qbb00} {sete yyy} {macl qbb00.mac,qbba}
 RBBS {:rbb00} {sete yyy} {macl rbb00.mac,rbba}
 Remote Access {:rma00} {sete yyy} {macl rma00.mac,rmaa}
 Renegade BBS {:ren00} {sete yyy} {macl ren00.mac,rena}
 RIBBS {:rib00} {sete yyy} {macl rib00.mac,riba}
 rOverBoard BBS {:obb00} {sete yyy} {macl obb00.mac,obba}
 Searchlight BBS {:slb00} {sete yyy} {macl slb00.mac,slba}
 Second Sight (TeleMac) {:sds00} {sete yyy} {macl sds00.mac,sdsa}
 Skyline BBS (S.I.G.H. Amiga) {:skl00} {sete yyy} {macl skl00.mac,skla}
 Spitfire BBS {:spf00} {sete yyy} {macl spf00.mac,spfa}
 SuperBBS (Assember BBS) {:sbb00} {sete yyy} {macl sbb00.mac,sbba}
 SupraCom System {:scs00} {sete yyy} {macl scs00.mac,scsa}
 Tandy (8-Bit Tandy BBS) {:tan00} {sete yyy} {macl tan00.mac,tana}
 TBBS {:tbb00} {sete yyy} {macl tbb00.mac,tbba}
 TBBS (McAfee Associates' Homebase BBS) {:tbb01} {sete yyy} {macl tbb01.mac,vira}
 TBBS (SBA Online) {:tbb02} {sete yyy} {macl tbb02.mac,tbza}
 Teleguard BBS (General Alarm BBS) {:tlg} {sete yyy} {macl tlg00.mac,tlga}
 TransAmiga BBS {:tmb00} {sete yyy} {macl tmb00.mac,tmba}
 TriBBS {:tri00} {sete yyy} {macl tri00.mac,tria}
 UltraBBS (Daily Calendar BBS) {:ult00} {sete yyy} {macl ult00.mac,ulta}
 UNIBOARD BBS (E & S Systems) {:uni00} {sete yyy} {macl uni00.mac,unia}
 Virtual BBS {:vbb00} {sete yyy} {macl vbb00.mac,vbba}
 Waffle {:waf00} {sete yyy} {macl waf00.mac,wafa}
 WildCat BBS {:wcb00} {sete yyy} {macl wcb00.mac,wcba}
 WWIV BBS {:ww400} {sete yyy} {macl ww400.mac,ww4a}
 XENOLINK {:xnl00} {sete yyy} {macl xnl00.mac,xnla}
                   Full Screen Editor Key Support
 The following keys are used by full screen editors such as Visual Editor in ProDoor, PCBoard's full screen editor, ANSIED in RBBS and others.  They may be changed to suit your own needs (all keys do not work with all editors --  capture the editor help
 info on the BBS).  See Appendix D in COMMO.DOC for  details on character representation.  Note that the left arrow function (^S) is also the XOFF character. This may cause a problem on some systems.  If pressing the left arrow seems to hang the remote,
 press Ctrl-Q and change the "lfa" macro to: {send ^[[D} {} or {send ^@K} {}  PgUp and PgDn are normally used for uploading and downloading.  To use them for editing, change the key-labels in the menus above (press F6 in the Internal Editor to see
 them).
 Macro                   Key             Function
 {:hom} {send ^W} {}     Home            Start of line
 {:end} {send ^P} {}     End             End of line
 {:pgu} {send ^R} {}     PgUp            Page up
 {:pgd} {send ^C} {}     PgDn            Page down
 {:upa} {send ^E} {}     Up Arrow        Cursor up
 {:dna} {send ^X} {}     Down Arrow      Cursor down
 {:lfa} {send ^S} {}     Left Arrow      Cursor left
 {:rta} {send ^D} {}     Right Arrow     Cursor right
 {:cla} {send ^A} {}     ^Left Arrow     Word left
 {:cra} {send ^F} {}     ^Right Arrow    Word right
 {:ins} {send ^V} {}     Insert          Toggle insert mode
 {:del} {send ^G} {}     Delete          Delete character
 {:cnd} {send ^K} {}     ^End            Delete to end of line
 ******************************************************************************
 IMPORTANT--> This is COMMO.MAC of COMM1205.  It contains macros for
 for COMMO552.  Updated 12-5-93.
 Courtesy of:  Richard Grant ArtWorld BBS! [phone]
 ******************************************************************************