home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib41b.dsk / ROM.ID.bas < prev    next >
BASIC Source File  |  2023-02-26  |  2KB  |  30 lines

  1. 10  REM  PROGRAM ROM.ID
  2. 20  REM  THIS ROUTINE IDENTIFIES AN APPLE
  3. 30  REM  BY READING THE ROM SIGNATURE BYTES
  4. 40  REM  NOTE THE LAST BYTE,173,FOR THE IIGS
  5. 50  REM  MAY NOT ALWAYS BE 173
  6. 60  REM  MEMORY LOCATIONS ARE 64286,64435,64447,64448,65505
  7. 70  REM  64286 IS USEFUL ONLY ON THE APPLE III
  8. 80  REM  APPLE II,-,56,47,96,96
  9. 90  REM  APPLE II+,173,234,234,234,96
  10. 100  REM  APPLE III,138,-,234,-,96
  11. 110  REM  APPLE IIE,-,6,192,234,96
  12. 120  REM  APPLE IIE ENHANCED,-,6,-,224,96
  13. 130  REM  APPLE IIC,-,6,255,0,96
  14. 140  REM  APPLE IIC ORIGINAL, 6,3,0,96,-
  15. 150  REM  APPLE IIC 3.5,-,6,0,0,96
  16. 160  REM  APPLE IIC REVISED,6,4,0,96,-
  17. 170  REM  APPLE IIC+,-,6,5,0,96
  18. 180  REM  APPLE IIGS,-,6,0,224,173
  19. 190 AA =  PEEK(64286):A =  PEEK(64435):B =  PEEK(64447):C =  PEEK(64448):D =  PEEK(65055)
  20. 200  IF A = 56  AND B = 47  AND C = 96  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE II"
  21. 210  IF A = 234  AND B = 234  AND C = 234  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE II+"
  22. 220  IF AA = 138  AND B = 234  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE III"
  23. 230  IF A = 6  AND B = 192  AND C = 234  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE IIE"
  24. 240  IF A = 6  AND B = 0  AND C = 224  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE IIE ENHANCED"
  25. 250  IF A = 6  AND B = 0  AND C = 0  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE IIC WITH 3.5 ROM"
  26. 260  IF A = 6  AND B = 255  AND C = 0  AND D = 96  THEN  PRINT "THE COMPUTER IS AN APPLE IIC ORIGINAL"
  27. 270  IF A = 3  AND B = 0  AND C = 96  THEN  PRINT "THE COMPUTER IS AN APPLE IIC ORIGINAL RAM"
  28. 280  IF A = 4  AND B = 0  AND C = 96  THEN  PRINT "THE COMPUTER IS AN APPLE IIC REVISED RAM"
  29. 290  IF A = 4  AND B = 5  AND C = 0  THEN  PRINT "THE COMPUTER IS AN APPLE IIC PLUS"
  30. 300  IF A = 6  AND B = 0  AND C = 224  AND D < >96  THEN  PRINT "THE COMPUTER IS AN APPLE IIGS"