home *** CD-ROM | disk | FTP | other *** search
/ Supremacy 2 / Supremacy-2.iso / Automation / A_443.ST / PROTECT.BAS (.txt) < prev    next >
Atari STOS Basic  |  1985-11-20  |  1KB  |  34 lines
  1. 10 REM 
  2. 100 KEY
  3. 110 RESERVE
  4. 120 UNDER
  5. 130 LOCATE
  6. 140 GOSUB
  7. 150 PRINT
  8. 160 VARNAME
  9. 170 VARNAME
  10. 180 BLOAD
  11. 190 PRINT
  12. 20 REM    PROTECT ACCESSORY
  13. 200 VARNAME
  14. 210 VARNAME
  15. 220 IF
  16. 230 FILL
  17. 240 PRINT
  18. 250 GOSUB
  19. 260 BSAVE
  20. 270 PRINT
  21. 280 END
  22. 290 CLEAR KEY
  23. 30 REM 
  24. 300 VARNAME
  25. 310 IF
  26. 320 DEFAULT
  27. 40 REM     Jawx / Mandarin
  28. 50 REM 
  29. 60 REM         by
  30. 70 REM 
  31. 80 REM    Francois Lionet
  32. 90 REM 
  33. 95 DRIVE
  34.