; ; File generated by cc65 v 2.19 - Git ab8bb268 ; .fopt compiler,"cc65 v 2.19 - Git ab8bb268" .setcpu "6502" .smart on .autoimport on .case on .debuginfo off .importzp sp, sreg, regsave, regbank .importzp tmp1, tmp2, tmp3, tmp4, ptr1, ptr2, ptr3, ptr4 .macpack longbranch .import _strchr .export _strqtok .segment "RODATA" S0002: .byte $00 S0001 := S0002+0 ; --------------------------------------------------------------- ; char *__near__ __fastcall__ strqtok (register char *s1, const char *s2) ; --------------------------------------------------------------- .segment "CODE" .proc _strqtok: near .segment "CODE" jsr pushax ldy #$02 ldx #$04 jsr regswap2 lda regbank+4 ora regbank+4+1 bne L0008 lda M0003+1 sta regbank+4+1 lda M0003 sta regbank+4 lda M0001 cmp #$22 bne L0008 jmp L001F L0006: lda M0001 bne L0009 tax jmp L0001 L0009: inc regbank+4 bne L0008 inc regbank+4+1 L0008: jsr pushw0sp ldx #$00 lda (regbank+4,x) sta M0001 jsr _strchr stx tmp1 ora tmp1 bne L0006 lda M0001 cmp #$22 beq L000C lda regbank+4+1 sta M0002+1 lda regbank+4 sta M0002 jmp L000F L000D: inc regbank+4 bne L000F inc regbank+4+1 L000F: ldy #$00 lda (regbank+4),y sta M0001 cmp #$22 beq L001E jsr pushw0sp ldx #$00 lda M0001 jsr _strchr stx tmp1 ora tmp1 beq L000D L001E: lda M0001 bne L0018 jmp L0015 L000C: inc regbank+4 bne L001F inc regbank+4+1 L001F: lda #$00 sta M0001 lda regbank+4+1 sta M0002+1 lda regbank+4 sta M0002 lda regbank+4 ldx regbank+4+1 jsr pushax ldx #$00 lda #$22 jsr _strchr sta regbank+4 stx regbank+4+1 cpx #$00 bne L0018 cmp #$00 bne L0018 lda #>(S0002) sta M0003+1 lda #<(S0002) jmp L0021 L0018: lda #$00 tay sta (regbank+4),y inc regbank+4 bne L0015 inc regbank+4+1 L0015: lda regbank+4+1 sta M0003+1 lda regbank+4 L0021: sta M0003 lda M0002 ldx M0002+1 L0001: pha ldy #$02 lda (sp),y sta regbank+4 iny lda (sp),y sta regbank+5 pla jmp incsp4 .segment "DATA" M0003: .addr S0001 .segment "RODATA" M0005: .word $0000 M0004: .word $0000 M0007: .word $0000 M0006: .word $0000 .segment "BSS" M0001: .res 1,$00 M0002: .res 2,$00 .endproc