home *** CD-ROM | disk | FTP | other *** search
- 0 rem make (aug 25/84) :
- 1 :
- 2 rem 1 statement, 0 functions
- 3 :
- 4 rem keyword characters: 4
- 5 :
- 6 rem keyword routine line ser #
- 7 rem make mak 4106 048
- 8 :
- 9 rem ================================
- 10 :
- 111 .asc "mak[197]"
- 1111 .word mak-1
- 4106 mak jsr $b79e
- 4108 txa
- 4110 pha
- 4112 jsr $aefd
- 4114 jsr $ad9e
- 4116 jsr $b6a3
- 4118 tay
- 4120 pla
- 4122 sta t3
- 4124 tya
- 4126 mak1 ldx t3
- 4128 beq mak2
- 4130 dec t3
- 4132 pha
- 4134 jsr $ab24
- 4136 pla
- 4138 jmp mak1
- 4140 mak2 rts
- 4142 ;
-