Script Macros
26-Nov-91 13:11:33
Sb: #30764-Script Macros
Fm: J.R. BOOKWALTER 76665,1335
To: J.R. BOOKWALTER 76665,1335
OOPS! That macro got munged. Here it is again:
Options results RequestText 'Number to start with?' /* Request shot number
to start with */ If rc ~= -0 Then Exit number = result + 1 Do Forever
/* Repeat forever */
Find "*" /* Search for lead line marker */
If rc ~= 0 Then Exit /* If lead line is not found, exit */
Type number /* Type first shot number */
ApplyFormat
ASCII 9 /* Tab in one stop to fix lead line */
CursorDown
CursorLeft
ASCII 9
Type number
newNumber = number + 1
If number < newNumber Then number = newNumber
end