home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PROGRAMS / UTILS / TECLADO / CLICK_CO.ZIP / CLICK-CO.BAS
Encoding:
BASIC Source File  |  1984-03-16  |  2.0 KB  |  37 lines
  1.  
  2.  
  3. 10 REM **** this program creates CLICK.COM which will add an    ****
  4. 20 REM **** audio feedback to the keyboard on 4.33 ROM systems  ****
  5. 30 REM **** Click is selected by holding Ctrl-Alt and pressing: ****
  6. 40 REM **** F1 = off         F2 = soft click     F3 = med click ****
  7. 50 REM **** F4 = loud click  F5 = louder click   F6 = chirp     ****
  8. 60 REM **** F7 = high beep   F8 = medium beep    F9 = low beep  ****
  9. 70 REM ****                  F10 = boop                         ****
  10. 80 REM **** For use on 3.02 ROMs change the following 3 lines   ****
  11. 90 REM **** to read:     200 DATA 21208                         ****
  12. 100 REM****              230 DATA 254                           ****
  13. 110 REM****              320 DATA 23,11,0,254                   ****
  14. 120 SUM=0: READ CHECKSUM
  15. 130 FOR N=1 TO 193: READ X: SUM=SUM+X: NEXT
  16. 140 IF SUM<>CHECKSUM THEN PRINT "error, check data":END
  17. 150 RESTORE: READ X
  18. 160 OPEN "R",1,"CLICK.COM",1
  19. 170 FIELD 1,1 AS X$
  20. 180 FOR I=1 TO 193: READ X: LSET X$=CHR$(X): PUT 1: NEXT
  21. 190 CLOSE: PRINT"**** CLICK.COM successfully created ****"
  22. 200 DATA 21547
  23. 210 DATA 233,166,0,251,80,83,81,82,86,87,30,6,252,190,64,0
  24. 220 DATA 142,222,190,0
  25. 230 DATA 240
  26. 240 DATA 142,198,228,96,138,224,80,228,97,80,12
  27. 250 DATA 128,230,97,88,230,97,160,23,0,36,12,60,12,117,29,128
  28. 260 DATA 252,59,114,24,128,252,68,119,19,51,246,138,196,42,228,44
  29. 270 DATA 59,187,159,1,3,216,46,138,7,162,121,0,88,58,38,120
  30. 280 DATA 0,136,38,120,0,116,50,10,228,120,46,138,30,121,0,128
  31. 290 DATA 227,31,116,37,80,138,38,121,0,128,228,224,181,0,228,97
  32. 300 DATA 80,36,252,230,97,138,204,226,254,12,2,230,97,138,204,226
  33. 310 DATA 254,254,203,117,236,88,230,97,88,11,246,116,5,234
  34. 320 DATA 168,233,0,240
  35. 330 DATA 176,32,230,32,7,31,95,94,90,89,91,88,207,0
  36. 340 DATA 33,34,37,41,63,127,152,180,238,30,184,0,0,142,216,250
  37. 350 DATA 199,6,36,0,3,1,140,14,38,0,251,31,186,169,1,205,39
  38.