home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p190 / 3.ddi / LSP / RECREAT.LSP < prev    next >
Encoding:
Text File  |  1988-02-01  |  215 b   |  8 lines
  1. (command "erase" "w" (list 0 0) (list 100 100) "")
  2. (command "layer" "s" "1" "")
  3. (command "line" (list (- xf 1) yb) (list (+ xf 6) yb) "")
  4. (command "layer" "s" "0" "")
  5. (setq xb xf nk 0 nzl 0)
  6. (redraw)
  7. (quit)
  8.