home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / authors / neil_wright / screenwipe2.amos / screenwipe2.amosSourceCode
AMOS Source Code  |  1993-03-07  |  254b  |  14 lines
  1. ' Screen Wipe 2
  2. ' By Neil Wright '93 
  3. '
  4. Screen Open 0,320,256,16,Lowres
  5. Curs Off : Flash Off : Hide : Paper 1 : Cls 1
  6. Y1=0
  7. Y2=251
  8. Locate ,10 : Centre "By Screen Wipes International"
  9. Do 
  10. Ink 0 : Bar 0,Y1 To 320,Y1+5
  11. Bar 0,Y2 To 320,Y2+5
  12. Inc Y1
  13. Dec Y2
  14. Loop