home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / basic / library / gwbasic / unprotec / binary.bas next >
Encoding:
BASIC Source File  |  1993-12-13  |  1.1 KB  |  28 lines
  1. 1 REM ******************************BINARY.BAS*****************************
  2. 5 KEY ON
  3. 10 COLOR 15,1,4
  4. 20 CLS
  5. 50 PRINT "                John De Palma on CompuServe 76076,571"
  6. 60 PRINT "                      Mon  12-13-1993  23:40:15"
  7. 65 PRINT "PROCEDURE:"
  8. 66 PRINT
  9. 70 PRINT "1. FIRST: I make the file PASSWORD.BAS with GWBASIC.EXE"
  10. 80 PRINT
  11. 100 OPEN "PASSWORD.BAS" FOR OUTPUT AS #1
  12. 110 PRINT #1, CHR$(255);
  13. 120 CLOSE #1
  14. 121 BEEP
  15. 125 PRINT "     ";:COLOR 11,0:PRINT "Just created the file PASSWORD.BAS in this directory!":COLOR 15,1
  16. 130 PRINT
  17. 140 PRINT "2.  SECOND: PRESS F3, type TEST.BAS {Enter} to LOAD the protected program,"
  18. 150 PRINT
  19. 160 PRINT "3.  THIRD: PRESS F3, type PASSWORD.BAS {Enter} to LOAD that program."
  20. 170 PRINT
  21. 180 PRINT "4.  FOURTH: TEST.BAS is now in memory and can be LISTed"
  22. 190 PRINT "         PRESS: F1 {Enter} to view TEST.BAS                                      "
  23. 200 PRINT
  24. 210 PRINT "5. Now save TEST.BAS by typing: SAVE"+CHR$(34)+"Filename.BAS"+CHR$(34)+",A"
  25. 220 PRINT "   to remove the binary encoding and have it in ASCII format"
  26. 230 PRINT
  27. 240 PRINT "6. To Exit use the command SYSTEM.";
  28.