home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_13_1986_Transactor_Publishing.d64 / ccmds (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  968b  |  62 lines
  1. 0 rem computed cmds (j. rubin sept/85):
  2. 1 :
  3. 2 rem 4 statements, 0 functions
  4. 3 :
  5. 4 rem keyword characters: 23
  6. 5 :
  7. 6 rem keyword    routine  line   ser #
  8. 7 rem s/cgoto    cgto     12358   167
  9. 8 rem s/cgosub   cgsb     12364   168
  10. 9 rem s/crun     crn      12396   169
  11. 10 rem s/crestore crsr     12406   170
  12. 11 :
  13. 12 rem ================================
  14. 13 :
  15. 152 .asc "cgot[207]cgosu[194]cru[206]crestor[197]"
  16. 1152 .word cgto-1,cgsb-1,crn-1,crsr-1
  17. 12358 cgto jsr clin
  18. 12360 jmp $a8a3
  19. 12362 ;
  20. 12364 cgsb lda #3
  21. 12366 jsr $a3fb
  22. 12368 lda $7b
  23. 12370 pha
  24. 12372 lda $7a
  25. 12374 pha
  26. 12376 lda $3a
  27. 12378 pha
  28. 12380 lda $39
  29. 12382 pha
  30. 12384 lda #$8d
  31. 12386 pha
  32. 12388 jsr $79
  33. 12390 cgs1 jsr cgto
  34. 12392 jmp $a7ae
  35. 12394 ;
  36. 12396 crn lda #0
  37. 12398 jsr $ff90
  38. 12400 jsr $a660
  39. 12402 beq cgs1
  40. 12404 ;
  41. 12406 crsr jsr clin
  42. 12408 lda $7a
  43. 12410 pha
  44. 12412 lda $7b
  45. 12414 pha
  46. 12416 jsr $a8a3
  47. 12418 sta $42
  48. 12420 lda $7a
  49. 12422 sta $41
  50. 12424 pla
  51. 12426 sta $7b
  52. 12428 pla
  53. 12430 sta $7a
  54. 12432 cre1 rts
  55. 12434 ;
  56. 12436 clin jsr $ad8a;eval num expr
  57. 12438 jsr $b7f7
  58. 12440 cmp #$fa
  59. 12442 bcc cre1
  60. 12444 jmp $b248
  61. 12446 ;
  62.