home *** CD-ROM | disk | FTP | other *** search
/ Super CD / Super CD.iso / teach / eng-word / color.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1983-01-19  |  256 b   |  5 lines
  1. 10  KEY OFF: COLOR 7,0: CLS
  2. 20  WIDTH 80:DEF SEG = 0: A = PEEK(&H410): POKE &H410,(A AND &HCF) OR &H20
  3. 30  WIDTH 40: SCREEN 1: SCREEN 0: LOCATE ,,1,6,7: WIDTH 40
  4. 40  RUN "ATTACK"
  5.