home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / 476-500 / apd495 / shareware_decl.amos / shareware_decl.amosSourceCode < prev   
AMOS Source Code  |  1978-01-04  |  149b  |  8 lines
  1. Unpack 1 To 0
  2. Curs Off : Flash Off : Hide 
  3. COUNT=0
  4. Repeat 
  5. Until Fire(1) or Fire(0) or Key State($40)
  6. Fade 5 : Wait 75
  7. Screen Close 0
  8. Run "demo.amos"