home *** CD-ROM | disk | FTP | other *** search
- ┌────────────┐
- PgDn for more macros │ Macro File │ PgDn for more macros
- └────────────┘
-
- 1) A program indicated to the right of a macro must be in your DOS path.
-
- 2) Move Selector Bar to desired entry, press [Enter].
-
-
- ASCII Upload macro, press Alt-A
- ────────────────────────────────────────────────────────────────────────────
- {:ala} {ascii %uldir\} {} ASCII Upload with upload path
-
-
- Macro to review capture file, press Shift-F8 Program required
- ────────────────────────────────────────────────────────────────────────────
- {:sf8} {exec LIST %_cap /e} {} (aka Scrollback using no RAM) LIST.COM
-
-
- Simple login macro, press F2
- ────────────────────────────────────────────────────────────────────────────
- {:nf2} {send First|~~Last|~~~~%_pas|} {} RBBS, PCBoard, Auntie, etc.
-
-
- Macro to list download directory, press Alt-F10
- ────────────────────────────────────────────────────────────────────────────
- {:af0} {exec-w dir %dldir /w} {} Download directory
-
-
- Macros to load VT102/VT220 keyboard files
- ────────────────────────────────────────────────────────────────────────────
- {:vt102} {goto ,vt102.mac} See Appendix E for instructions
- {:vt220} {goto ,vt220.mac} See Appendix E for instructions
-
-
- Macro to login to a PCBoard (put "pcb" in Dialing Directory macro field)
- ────────────────────────────────────────────────────────────────────────────
- {:pcb} {capture y,c:\commo\pcb.cap} {asci ,}
- {setlook 60,hng}
- {lookfor graphics} {send y|}
- {setlook 60,hng,6,n|}
- {lookfor first name?}
- {send First Last|~%_pas|} <= your name here
- {lookfor Main Board Command?} {}
- {:hng} {hangup y} {stop}
-
-
- CompuServe login macro
- ────────────────────────────────────────────────────────────────────────────
- {:cis} {setlook 45,hng,2,^c} {send ^c}
- {capt y,c:\commo\cis.%_day} {asci ,:}
- {lookfor User ID:} {send XXXXX,XXX|} <= Change to your user ID
- {setl 20,hng} {lookfor Password:} {send %_pas|}
- {goto ,vt102.mac}
-
-
- GEnie login macro
- ────────────────────────────────────────────────────────────────────────────
- {:genie}
- {setlook 90,hng} {capt y,c:\commo\genie.%_day}
- {asci ,>} {local y} {send ~H~H~H}
- {lookfor u#} {send XXXXXXXX,%_pas|} {} <= Change to your user #
-
-
- Doorway Mode macro (key is definable)
- ────────────────────────────────────────────────────────────────────────────
- {:al=} {doorway} {} Toggle Doorway Mode
-
-
- DOWNLOAD (receive) menu macro
- ────────────────────────────────────────────────────────────────────────────
- {:pgd} {:mpd} ** Download menu
- {setv _menu1, [F1] for HELP}
- {setv _menu3, Y ■ Ymodem batch Internal}
- {setv _menu4, G ■ Ymodem-G batch Internal}
- {setv _menu5, X ■ Xmodem-CRC (or old Ymodem) Internal}
- {setv _menu6, O ■ Xmodem-G Internal}
- {setv _menu7, S ■ Xmodem csum Internal}
- {setv _menu9, IMPORTANT: The following external}
- {setv _menu10, protocols require that the indicated}
- {setv _menu11, program be installed on your system.}
- {setv _menu13, Z ■ Zmodem batch using DSZ/GSZ/TXZM}
- {setv _menu14, H ■ HS/Link using HSLINK.EXE}
- {setv _menu15, K ■ Kermit using KERMIT.EXE}
- {setv _menu16, B ■ CompuServe B, B+ using OZBEXT.EXE}
- {setv _mlabel,phld,pcbr,,,,,pygr,phbr,,,pckr,,,,pxgr,,,,px2r,,,,,px1r,pybr,pzbr}
- {setv _mcolor,%menu_clr}
- {menu 20,47,DOWNLOAD Protocol Menu} {return}
-
- Help {:phld} {help z} {goto mpd}
- Y batch {:pybr} {setv pr_alarm} {setv pr_down,%dldir} {call yb_recv} {}
- Y-G batch {:pygr} {setv pr_alarm} {setv pr_down,%dldir} {call yg_recv} {}
- X CRC {:px1r} {setv pr_alarm} {call gfnd} {call xc_recv} {}
- X-G {:pxgr} {setv pr_alarm} {call gfnd} {call xg_recv} {}
- X csum {:px2r} {setv pr_alarm} {call gfnd} {call xs_recv} {}
- Zmodem {:pzbr} {setv pr_alarm} {setv pr_down,%dldir} {call z_recv} {}
- HSLink {:phbr} {setv pr_alarm} {setv pr_down,%dldir} {setv pr_file}
- {info-q0s0 Any files to upload?}
- {ifco ,phbr_1} {call gfnu}
- {:phbr_1} {call h_recv} {}
- Kermit {:pckr} {setv pr_alarm} {setv pr_down,%dldir} {call k_recv} {}
- CIS BPlus {:pcbr} {setv pr_alarm} {setv pr_down,%dldir} {call b_recv} {}
-
- {:gfnd} {setv pr_file,%dldir\} {input pr_file,Enter a filename to DOWNLOAD}
- {ifex %pr_file,,gf_y} {info-q0 File exists, overwrite?}
- {ifco gf_y} {send ^X^X^X^X^X^X^X^X^X^X} {}
- {:gf_y} {return}
-
-
- UPLOAD (send) menu macro
- ────────────────────────────────────────────────────────────────────────────
- {:pgu} {:mpu} ** Upload menu
- {setv _menu1, [F1] for HELP}
- {setv _menu3, Y ■ Ymodem batch Internal}
- {setv _menu4, G ■ Ymodem-G batch Internal}
- {setv _menu5, X ■ Xmodem-1K (old Ymodem) Internal}
- {setv _menu6, O ■ Xmodem-G Internal}
- {setv _menu7, S ■ Xmodem Internal}
- {setv _menu9, IMPORTANT: The following external}
- {setv _menu10, protocols require that the indicated}
- {setv _menu11, program be installed on your system.}
- {setv _menu13, Z ■ Zmodem batch using DSZ/GSZ/TXZM}
- {setv _menu14, H ■ HS/Link using HSLINK.EXE}
- {setv _menu15, K ■ Kermit using KERMIT.EXE}
- {setv _menu16, B ■ CompuServe B, B+ using OZBEXT.EXE}
- {setv _mlabel,phlu,pcbs,,,,,pybs,phbs,,,pcks,,,,px1s,,,,px2s,,,,,px1s,pybs,pzbs}
- {setv _mcolor,%menu_clr}
- {menu 20,47,UPLOAD Protocol Menu} {return}
-
- Help {:phlu} {help z} {goto mpu}
- Y batch {:pybs} {setv pr_alarm} {call gfnu} {call yb_send} {}
- X-1K {:px1s} {setv pr_alarm} {call gfnu_x} {call xk_send} {}
- X {:px2s} {setv pr_alarm} {call gfnu_x} {call x_send} {retu}
- Zmodem {:pzbs} {setv pr_alarm} {call gfnu} {call z_send} {}
- HS/Link {:phbs} {setv pr_alarm} {call gfnu} {call h_send} {}
- Kermit {:pcks} {setv pr_alarm} {call gfnu_x} {call k_send} {}
- CIS BPlus {:pcbs} {setv pr_alarm} {setv pr_up,%uldir} {call b_send} {}
-
- {:gfnu} {call sel_delsend}
- {inst sel_up,y} {comp _pos,1} {ifco gfnu_s}
- {setv pr_file,%uldir\}
- {input pr_file,Filename to UPLOAD (Press Enter for picklist)}
- {comp pr_file} {ifco gfnu_s}
- {comp pr_file,%uldir\} {ifco gfnu_s}
- {ifex %pr_file,,gfnu_n} {return}
- {:gfnu_n} {info-d2 File not found}
- {:gfnu_s} {call select}
- {comp pr_file} {ifco gfnu_c}
- {ifexist %_hom^(send^).lst,,gfnu_c} {return}
- {:gfnu_c} {send ^X^X^X^X^X^X^X^X^X^X}
- {inform-s0d1 No files to send} {}
-
- {:gfnu_x} {call gfnu} {ifex %_hom^(send^).lst,,gfnu_r}
- {ropen %_hom^(send^).lst,gfnu_c}
- {:gfnu_a} {read pr_file} {comp pr_file} {ifco gfnu_a} {rclose}
- {:gfnu_r} {return}
-
-
- Protocol macros used for DOWNLOADING (receiving)
- ────────────────────────────────────────────────────────────────────────────
- These are the basic download protocol macros and may be CALLed
- from anywhere. The following variables must be set (if applicable):
- pr_down download directory
- pr_file filespec (files to download)
- pr_alarm set to: 0 - alarm off
- 1+ - number of rings
- null - default rings (from setup)
-
- Internals
- {:yb_recv} {rymo %pr_down} {alarm %pr_alarm} {retu} Ymodem batch
- {:yg_recv} {rymo-g %pr_down} {alarm %pr_alarm} {retu} Ymodem-G batch
- {:xc_recv} {rxmo-y %pr_file} {alarm %pr_alarm} {retu} Xmodem-CRC
- {:xg_recv} {rxmo-gy %pr_file} {alarm %pr_alarm} {retu} Xmodem-G
- {:xs_recv} {rxmo-c0y %pr_file} {alarm %pr_alarm} {retu} Xmodem-Csum
-
- Zmodem
- {:z_recv} {comp z_prog} {ifco dszc#r} {goto %z_prog#r}
- {:dszc#r} {setv progdsz,DSZ.COM} {goto omen#r}
- {:dsze#r} {setv progdsz,DSZ.EXE} {goto omen#r}
- {:gsz#r} {setv progdsz,GSZ.EXE}
- {:omen#r} {exec-d %protodir\%progdsz portx %_pad,%_irq ha both rz -mr %pr_down}
- {alarm %pr_alarm} {retu}
- {:txzm#r} {exec-d %protodir\TXZM.EXE -c%_pad,%_irq -l%_spe -b%_mod -h -q -r %pr_down}
- {alarm %pr_alarm} {retu}
-
- HS/Link
- {:h_recv} {exec-d %protodir\HSLINK.EXE -pb0x%_pad -pi%_irq -nv %pr_file -u%pr_down}
- {alarm %pr_alarm} {retu}
-
- Kermit
- {:k_recv} {exec-d %protodir\KERMIT.EXE set file type binary, log transaction %_uselog, set port %_por, cd %pr_down, receive}
- {alarm %pr_alarm} {retu}
-
- CIS BPlus
- {:b_recv} {exec-d %protodir\OZBEXT.EXE /c%_por /f%pr_down /n /x}
- {alarm %pr_alarm} {retu}
-
-
- Protocol macros used for UPLOADING (sending)
- ────────────────────────────────────────────────────────────────────────────
- These are the basic upload protocol macros and may be CALLed
- from anywhere. The following variables must be set (if applicable):
- pr_up upload directory (B+ only)
- pr_file filespec (files to upload)
- pr_alarm set to: 0 - alarm off
- 1+ - number of rings
- null - default rings (from setup)
-
- Internals
- {:yb_send} {symo-k %pr_file} {alarm %pr_alarm} {retu} Ymodem batch
- {:xk_send} {sxmo-k %pr_file} {alarm %pr_alarm} {retu} Xmodem 1k
- {:x_send} {sxmo %pr_file} {alarm %pr_alarm} {retu} Xmodem
-
- Zmodem
- {:z_send} {comp z_prog} {ifco dszc#s} {goto %z_prog#s}
- {:dszc#s} {setv progdsz,DSZ.COM} {goto omen#s}
- {:dsze#s} {setv progdsz,DSZ.EXE} {goto omen#s}
- {:gsz#s} {setv progdsz,GSZ.EXE}
- {:omen#s} {exec-d %protodir\%progdsz portx %_pad,%_irq ha both sz -mr %pr_file}
- {alarm %pr_alarm} {retu}
- {:txzm#s} {exec-d %protodir\TXZM.EXE -c%_pad,%_irq -l%_spe -b%_mod -h -q -s %pr_file}
- {alarm %pr_alarm} {retu}
-
- HS/Link
- {:h_send} {exec-d %protodir\HSLINK.EXE -pb0x%_pad -pi%_irq -nv %pr_file -u%pr_down}
- {alarm %pr_alarm} {retu}
-
- Kermit
- {:k_send} {exec-d %protodir\KERMIT.EXE set file type binary, log transaction %_uselog, set port %_por, send %pr_file}
- {alarm %pr_alarm} {retu}
-
- CIS BPlus
- {:b_send} {exec-d %protodir\OZBEXT.EXE /c%_por /f%pr_up /n /x}
- {alarm %pr_alarm} {retu}
-
-
- File select macro used for uploading files
- ────────────────────────────────────────────────────────────────────────────
-
- {:select}
- {setv dsksav,%_dsk} {setv dirsav,%_dir}
- {:sel_curdir}
- {setv drive,%_dsk} {setv path,%_dir}
- {comp uldir} {ifco sel_nouldir}
- {setv path,%uldir} {inst %uldir,:}
- {comp _pos,2} {ifco ,sel_nodrive}
- {subs drive,1,2,%uldir} {subs path,3,66,%uldir}
- {:sel_nouldir}
- {call sel_chkpath}
- {:sel_nodrive}
- {file %drive%%path\*.*}
- {ifco sel_dirok}
- {info-q ULDIR is not a valid directory. Change it?}
- {ifco ,sel_exit}
- {input uldir,Enter new upload directory (no "\" at end)}
- {goto sel_curdir}
- {:sel_dirok}
- {exec-n %drive}
- {comp path} {ifco sel_root}
- {exec-n cd %path} {goto sel_topm}
- {:sel_root}
- {exec-n cd \}
- {:sel_topm}
- {file %drive%%path\*.*} {setv x,1} {setv endflag,0}
- {:sel_floop}
- {leng %_ffn} {setv padlen,12} {decr padlen,%_len}
- {subs pad,1,%padlen, }
- {setv temp,%_ffn%%pad} {leng %_ffs}
- {setv padlen,9} {decr padlen,%_len}
- {subs pad,1,%padlen, }
- {setv temp,%temp%%pad%%_ffs}
- {setv temp,%temp %_ffd %_fft}
- {setv menu%x,%temp} {setv xl,%x} {incr x} {file-x}
- {ifco ,sel_nomore}
- {comp x,10} {ifco ,sel_floop}
- {:sel_msetup}
- {setv menu11, [N] Next page [Enter] to start upload}
- {:sel_lsetup}
- {setv x,1}
- {:sel_mloop}
- {comp menu%x} {ifco sel_dispm}
- {setv-s temp,menu%x}
- {setv _menu%x, %x% ■ %temp} {incr x}
- {comp x,11} {ifco ,sel_mloop}
- {:sel_dispm}
- {setv _menu11,%menu11}
- {setv _menu12, [T] Top of directory [M] Manual entry}
- {setv _menu13, [W] vieW/edit send list [V] change driVe}
- {setv _menu15, "\.." = parent directory "\xxxxx" = subdirectory}
- {setv _menter,sel_done}
- {setv _mlabel,sel_sel,sel_sel,sel_sel,sel_sel,sel_sel,sel_sel,sel_sel,sel_sel,sel_sel,,,,sel_manual,sel_next,,,,,,sel_topm,,sel_drive,sel_view,sel_done}
- {setv _mcolor,%menu_clr}
- {window-k}
- {menu 19,60,Selecting files from: %drive%%path\}
- {setv pr_file}
- {call sel_delsend} {goto sel_exit}
- {:sel_next}
- {comp endflag,1} {ifco sel_enddisp}
- {setv x,1} {goto sel_floop}
- {:sel_nomore}
- {call sel_clrmenu}
- {setv menu11, ** LAST PAGE ** [Enter] to start upload}
- {setv endflag,1} {goto sel_lsetup}
- {:sel_enddisp}
- {setv endflag,0} {goto sel_topm}
- {:sel_sel}
- {comp _msn,%xl} {ifco-g sel_lsetup}
- {setv-s temp,menu%_msn} {inst temp,\}
- {comp _pos,1} {ifco ,sel_isfile}
- {subs temp,2,8,%temp} {exec-n cd %temp} {setv path,%_dir}
- {call sel_chkpath} {goto sel_topm}
- {:sel_isfile}
- {comp temp} {ifco sel_msetup}
- {inst temp, } {setv x,%_pos} {decr x}
- {subs temp,1,%x,%temp}
- {wopen-a %_hom%^(send^).lst} {write %drive%%path%\%temp}
- {wclose} {goto sel_lsetup}
- {:sel_done}
- {setv pr_file,@%_hom%^(send^).lst}
- {:sel_exit}
- {call sel_cleanup} {return}
- {:sel_cleanup}
- {exec-n %dsksav} {exec-n cd %dirsav}
- {setv x,1} {call sel_clrmenu}
- {setv endflag} {setv dsksav} {setv dirsav} {setv temp} {setv drive}
- {setv path} {setv x} {setv xl} {setv pad} {setv padlen}
- {wind-k0} {return}
- {:sel_clrmenu}
- {setv menu%x,} {incr x}
- {comp x,12} {ifco ,sel_clrmenu} {return}
- {:sel_chkpath}
- {leng %path}
- {comp _len,1} {ifco ,sel_notroot} {setv path}
- {:sel_notroot}
- {return}
- {:sel_delsend}
- {ifex %_hom%^(send^).lst,,sel_nolst}
- {exec-n del %_hom%^(send^).lst}
- {:sel_nolst}
- {return}
- {:sel_view}
- {edit %_hom%^(send^).lst} {goto sel_lsetup}
- {:sel_drive}
- {wind-k0} {setv temp,%drive}
- {sete-p0 sel_escoff}
- {input temp,Enter new drive letter}
- {setesc}
- {comp temp} {ifco sel_lsetup}
- {subs temp,1,1,%temp} {setv drive,%temp:}
- {exec-n %drive} {setv path,%_dir}
- {call sel_chkpath} {goto sel_topm}
- {:sel_manual}
- {wind-k0} {sete-p0 sel_escoff}
- {setv temp,%uldir\}
- {input temp,Enter a filename to UPLOAD}
- {comp temp} {ifco sel_escoff}
- {wopen-a %_hom%^(send^).lst}
- {write %temp} {wclose}
- {:sel_escoff}
- {setesc} {goto sel_lsetup}
-
-
- Macros for Utility Menu
- ────────────────────────────────────────────────────────────────────────────
- {:alu}
- {setv _menu1, A ≡ Edit an External File}
- {setv _menu3, B ≡ Run a Macro}
- {setv _menu5, C ≡ Load a Macro File}
- {setv _menu7, D ≡ Run MOSTHOST host mode}
- {setv _menu8, (use E to install)}
- {setv _menu10, E ≡ View/Edit MOSTHOST}
- {setv _mlabel,uext,urun,uload,uhost,vhost}
- {setv _mcolor,%menu_clr}
- {menu 14,32,Macro Utility Menu} {}
-
- {:urun} {setv temp} {input temp,Macro to run} {goto %temp} {}
-
- {:uload} {setv temp} {input temp,Macro File to load} {goto-f ,%temp}
-
- {:uext} {setv temp} {input temp,Filename to edit}
- {:uedit} {edit %temp} {goto alu} {}
-
- {:uhost} {call bbs,mosthost.mac}
-
- {:vhost} {setv temp,%_hom%mosthost.mac} {goto uedit}
-
-
- ──────────────────────────────
- 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.
-
- 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
-
-
- - end -
-
-