home *** CD-ROM | disk | FTP | other *** search
/ The CIA World Factbook 1992 / k3bimage.iso / sel / 04 / 0063 / k2.bas < prev    next >
Encoding:
BASIC Source File  |  1991-12-02  |  3.8 KB  |  40 lines

  1. 0 ' ====> K2.bas
  2. 1 LOCATE 1:PRINT STRING$(35,219)+STRING$(19,32)+STRING$(26,219)
  3. 2 LOCATE 2:PRINT STRING$(2,219)+TOPKEY1$+TOPKEY1$+CHR$(219)+TOPKEY1$+STRING$(35,32)+TOPKEY5$+STRING$(2,219)
  4. 3 LOCATE 3:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY1$+STRING$(35,32)+MIDKEY5$+STRING$(2,219)
  5. 4 LOCATE 4:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY1$+STRING$(35,32)+MIDKEY5$+STRING$(2,219)
  6. 5 LOCATE 5:PRINT STRING$(2,219)+BOTKEY1$+BOTKEY1$+CHR$(219)+BOTKEY1$+STRING$(35,32)+BOTKEY5$+STRING$(2,219)
  7. 6 LOCATE 6:PRINT STRING$(2,219)+TOPKEY1$+TOPKEY1$+CHR$(219)+TOPKEY3$+STRING$(39,32)+TOPKEY1$+STRING$(2,219)
  8. 7 LOCATE 7:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY3$+STRING$(39,32)+MIDKEY1$+STRING$(2,219)
  9. 8 LOCATE 8:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY3$+STRING$(39,32)+MIDKEY1$+STRING$(2,219)
  10. 9 LOCATE 9:PRINT STRING$(2,219)+BOTKEY1$+BOTKEY1$+CHR$(219)+BOTKEY3$+STRING$(39,32)+BOTKEY1$+STRING$(2,219)
  11. 10 LOCATE 10:PRINT STRING$(2,219)+TOPKEY1$+TOPKEY1$+CHR$(219)+TOPKEY4$+STRING$(37,32)+TOPKEY1$+STRING$(2,219)
  12. 11 LOCATE 11:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY4$+STRING$(37,32)+MIDKEY1$+STRING$(2,219)
  13. 12 LOCATE 12:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY4$+STRING$(37,32)+MIDKEY1$+STRING$(2,219)
  14. 13 LOCATE 13:PRINT STRING$(2,219)+BOTKEY1$+BOTKEY1$+CHR$(219)+BOTKEY4$+STRING$(37,32)+MIDKEY1$+STRING$(2,219)
  15. 14 LOCATE 14:PRINT STRING$(2,219)+TOPKEY1$+TOPKEY1$+CHR$(219)+TOPKEY2$+STRING$(41,32)+SIDEKEY$+STRING$(2,219)
  16. 15 LOCATE 15:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY2$+STRING$(41,32)+MIDKEY1$+STRING$(2,219)
  17. 16 LOCATE 16:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY2$+STRING$(41,32)+MIDKEY1$+STRING$(2,219)
  18. 17 LOCATE 17:PRINT STRING$(2,219)+BOTKEY1$+BOTKEY1$+CHR$(219)+BOTKEY2$+STRING$(41,32)+SIDEKEY$+STRING$(2,219)
  19. 18 LOCATE 18:PRINT STRING$(2,219)+TOPKEY1$+TOPKEY1$+CHR$(219)+TOPKEY5$+STRING$(19,32)+TOPKEY5$+MIDKEY1$+STRING$(2,219)
  20. 19 LOCATE 19:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY5$+STRING$(19,32)+MIDKEY5$+MIDKEY1$+STRING$(2,219)
  21. 20 LOCATE 20:PRINT STRING$(2,219)+MIDKEY1$+MIDKEY1$+CHR$(219)+MIDKEY5$+STRING$(19,32)+MIDKEY5$+MIDKEY1$+STRING$(2,219)
  22. 21 LOCATE 21:PRINT STRING$(2,219)+BOTKEY1$+BOTKEY1$+CHR$(219)+BOTKEY5$+STRING$(19,32)+BOTKEY5$+BOTKEY1$+STRING$(2,219)
  23. 22 LOCATE 22:PRINT STRING$(35,219)+STRING$(19,32)+STRING$(26,219)
  24. 23 LOCATE 3,36:PRINT "System Reset Sequence"
  25. 24 LOCATE 5,36:PRINT "The last item of the":LOCATE 6,36:PRINT "keyboard introduction is the system":LOCATE 7,36:PRINT "reset sequence. By pressing the":LOCATE 8,36:PRINT "Ctrl, Alt and Del keys together,"
  26. 25 LOCATE 9,36:PRINT "you can "+CHR$(34)+"re-boot"+CHR$(34)+" the computer":LOCATE 10,36:PRINT "(this does the same thing as":LOCATE 11,36:PRINT "switching off and on the power)."
  27. 26 LOCATE 12,36:PRINT "Find, press and hold first the Ctrl":LOCATE 13,36:PRINT "key, then the Alt key and last the":LOCATE 14,36:PRINT "Del key."
  28. 27 LOCATE 15,36:COLOR C3,C4:PRINT "==> REMEMBER <==";:COLOR C1,C2:PRINT" This sequence will":LOCATE 16,36:PRINT "re-start the BASIC Prof. You should":LOCATE 17,36:PRINT "then continue with lesson one."
  29. 28 COLOR C3,C4:LOCATE 10,20:PRINT TOPKEY4$:LOCATE 11,20:PRINT MIDKEY4$:LOCATE 12,20:PRINT MIDKEY4$:LOCATE 13,20:PRINT BOTKEY4$
  30. 29 LOCATE 11,25:PRINT "Ctrl"
  31. 30 LOCATE 18,20:PRINT TOPKEY5$:LOCATE 19,20:PRINT MIDKEY5$:LOCATE 20,20:PRINT MIDKEY5$:LOCATE 21,20:PRINT BOTKEY5$
  32. 31 LOCATE 19,26:PRINT "Alt"
  33. 32 LOCATE 18,55:PRINT TOPKEY5$:LOCATE 19,55:PRINT MIDKEY5$:LOCATE 20,55:PRINT MIDKEY5$:LOCATE 21,55:PRINT BOTKEY5$
  34. 33 LOCATE 19,61:PRINT "∙":LOCATE 20,60:PRINT "Del":COLOR C1,C2
  35. 34 DEF SEG:POKE 91,24:POKE 92,25:LOCATE 24,1
  36. 35 GOTO 35
  37. Y5$
  38. 33 LOCATE 19,61:PRINT "∙":LOCATE 20,60:PRINT "Del":COLOR C1,C2
  39. 34 DEF SEG:POKE 91,24:POKE 92,25:LOCATE 24,1
  40. 35 GOTO 35