home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Fred Fish Collection 1.5
/
ffcollection-1-5-1992-11.iso
/
ff_disks
/
100-199
/
ff146.lzh
/
DmeMacros
/
C
/
function.edrc
< prev
next >
Wrap
Text File
|
1988-05-28
|
480b
|
17 lines
repeat 5 insline `+' ifelse t insline up firstnb
ifelse c>32 `down repeat 2 `insline down'' `ifelse t insline up firstnb if c>32 `down insline' down down'
repeat 5 down firstnb
ifelse c>32 `insline insline' `if b insline down firstnb if c>32 insline up'
repeat 5 up firstnb del
` ()' firstnb left down down
`{' firstnb down down
`} /* + () */' findstr ` (' up prev
escimm (`) firstnb scanf %s down findr `+' $scanf firstnb up tab