home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_11_1986_Transactor_Publishing.d64 / inline (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  764b  |  52 lines
  1. 0 rem inline (aug 25/84)              :
  2. 1 :
  3. 2 rem  1 statement, 0 functions
  4. 3 :
  5. 4 rem keyword characters:  6
  6. 5 :
  7. 6 rem keyword     routine  line   ser #
  8. 7 rem inline      inlin    3454    030
  9. 8 :
  10. 9 rem ================================
  11. 10 :
  12. 107 .asc "inlin[197]"
  13. 1107 .word inlin-1
  14. 3454 inlin cmp #$22
  15. 3456 bne inl1
  16. 3458 jsr $aebd
  17. 3460 lda #$3b
  18. 3462 jsr $aeff
  19. 3464 jsr $ab21
  20. 3466 inl1 jsr $b3a6
  21. 3468 jsr $a560
  22. 3470 stx $43
  23. 3472 sty $44
  24. 3474 lda #0
  25. 3476 jsr $b08b
  26. 3478 jsr $ad8f
  27. 3480 sta $49
  28. 3482 sty $4a
  29. 3484 lda $7a
  30. 3486 ldy $7b
  31. 3488 sta $4b
  32. 3490 sty $4c
  33. 3492 ldx $43
  34. 3494 ldy $44
  35. 3496 stx $7a
  36. 3498 sty $7b
  37. 3500 jsr $73
  38. 3502 lda #0
  39. 3504 sta $07
  40. 3506 sta $08
  41. 3508 lda $7a
  42. 3510 ldy $7b
  43. 3512 jsr $b48d
  44. 3514 jsr $b7e2
  45. 3516 jsr $a9da
  46. 3518 lda $4b
  47. 3520 ldy $4c
  48. 3522 sta $7a
  49. 3524 sty $7b
  50. 3526 rts
  51. 3528 ;
  52.