home *** CD-ROM | disk | FTP | other *** search
/ TCE Demo 2 / TCE_DEMO_CD2.iso / demo_cd_.2 / mags / stosser / stoser03.arj / stoser03.msa / A / T1L1.ASC < prev    next >
Text File  |  1987-04-22  |  574b  |  26 lines
  1. 10 rem simple programme
  2. 20 rem showing how to PRINT
  3. 30 rem and how to CENTRE text
  4. 40 rem
  5. 50 cls
  6. 60 input "ENTER YOUR NAME PLEASE";NAME$
  7. 70 rem
  8. 80 rem this prints wrong
  9. 90 rem
  10. 100 locate 0,1 : centre " Hello There "
  11. 110 print "something has gone wrong"
  12. 120 print NAME$
  13. 130 wait 100
  14. 140 rem
  15. 150 rem this prints better
  16. 160 rem
  17. 170 pen 1 : paper 2 : ink 1 : curs off 
  18. 180 locate 0,10 : print "PRESS A KEY"
  19. 190 wait key 
  20. 200 cls : ink 2
  21. 210 locate 1,1 : print " Hello There"
  22. 220 print "this is better"
  23. 230 print NAME$
  24. 240 wait 100 : curs on 
  25. 250 goto 50
  26.