$E219/57881: Get Parameters For OPEN/CLOSE
Jump from $E1BE, $E1C7:
E219: A9 00 LDA #$00
E21B: 20 BD FF JSR $FFBD ; Set Filename
E21E: 20 11 E2 JSR $E211 ; Check For Comma
E221: 20 9E B7 JSR $B79E ; Evaluate Text to 1 Byte in XR
E224: 86 49 STX $49 ; Pointer: Index Variable for FOR/NEXT loop
E226: 8A TXA
E227: A2 01 LDX #$01
E229: A0 00 LDY #$00
E22B: 20 BA FF JSR $FFBA ; Set Logical File Parameters
E22E: 20 06 E2 JSR $E206 ; Check Default Parameters
E231: 20 00 E2 JSR $E200 ; Get Next One Byte Parameter
E234: 86 4A STX $4A ; Pointer: Index Variable for FOR/NEXT loop
E236: A0 00 LDY #$00
E238: A5 49 LDA $49 ; Pointer: Index Variable for FOR/NEXT loop
E23A: E0 03 CPX #$03
E23C: 90 01 BCC $E23F
E23E: 88 DEY
Jump from $E23C:
E23F: 20 BA FF JSR $FFBA ; Set Logical File Parameters
E242: 20 06 E2 JSR $E206 ; Check Default Parameters
E245: 20 00 E2 JSR $E200 ; Get Next One Byte Parameter
E248: 8A TXA
E249: A8 TAY
E24A: A6 4A LDX $4A ; Pointer: Index Variable for FOR/NEXT loop
E24C: A5 49 LDA $49 ; Pointer: Index Variable for FOR/NEXT loop
E24E: 20 BA FF JSR $FFBA ; Set Logical File Parameters
E251: 20 06 E2 JSR $E206 ; Check Default Parameters
E254: 20 0E E2 JSR $E20E ; Check For Comma
Jump from $E1E3:
E257: 20 9E AD JSR $AD9E ; Evaluate Expression in Text
E25A: 20 A3 B6 JSR $B6A3 ; Perform String Housekeeping
E25D: A6 22 LDX $22 ; Second Utility Pointer
E25F: A4 23 LDY $23 ; Second Utility Pointer
E261: 4C BD FF JMP $FFBD ; Set Filename
Previous Page / Next Page