Category : Windows 3.X Files
Archive   : WE-30D.ZIP
Filename : MACRO.MN_

;
; WinEdit Script for Macro Menu
;
; WinEdit Pro records macros as WIL scripts. After recording a macro,
; save the resulting script as MACROx.MAC, where x is a digit from 0 to 9.
; This menu script will then be able to play back the recorded macro with
; a Control+digit hotkey.
;
; You can edit the names which appear on the macro menu by editing this
; script. You can also call any other WIL scripts as macros by
; editing the filename used for the call().

Record Macro \ ^R ; Start or Stop recording a macro
wRecord()

_&1. Macro 1 \ ^1 ; Play back Macro 1
TheFile=strcat(DirHome(),"MACRO1.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&2. Macro 2 \ ^2 ; Play back Macro 2
TheFile=strcat(DirHome(),"MACRO2.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&3. Macro 3 \ ^3 ; Play back Macro 3
TheFile=strcat(DirHome(),"MACRO3.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&4. Macro 4 \ ^4 ; Play back Macro 4
TheFile=strcat(DirHome(),"MACRO4.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&5. Macro 5 \ ^5 ; Play back Macro 5
TheFile=strcat(DirHome(),"MACRO5.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&6. Macro 6 \ ^6 ; Play back Macro 6
TheFile=strcat(DirHome(),"MACRO6.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&7. Macro 7 \ ^7 ; Play back Macro 7
TheFile=strcat(DirHome(),"MACRO7.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&8. Macro 8 \ ^8 ; Play back Macro 8
TheFile=strcat(DirHome(),"MACRO8.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

&9. Macro 9 \ ^9 ; Play back Macro 9
TheFile=strcat(DirHome(),"MACRO9.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)

1&0. Macro 10 \ ^0 ; Play back Macro 10
TheFile=strcat(DirHome(),"MACRO0.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)