home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / database / disk_20.zip / MENUGEN.ZIP / COLO.PRG < prev    next >
Text File  |  1986-11-18  |  474b  |  22 lines
  1.    IF ISCO()
  2.       SET COLO TO ,, W+
  3.       SET COLO TO ,, W+
  4.       SET COLO TO ,, RB+
  5.       SET COLO TO ,, RB+
  6.       SET COLO TO ,, RB
  7.       SET COLO TO ,, RB
  8.       SET COLO TO ,, B+
  9.       SET COLO TO ,, B
  10.       SET COLO TO ,, BG+
  11.       SET COLO TO ,, BG
  12.       SET COLO TO ,, G+
  13.       SET COLO TO ,, G
  14.       SET COLO TO ,, GR+
  15.       SET COLO TO ,, GR
  16.       SET COLO TO ,, R+
  17.       SET COLO TO ,, R
  18.       SET COLO TO ,, N
  19.    ELSE
  20.       ??chr(7)
  21.    ENDI
  22.