_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

TRANSQA

FILE INFORMATION

FILENAME(S): TRANSQA

FILE TYPE(S): SEQ

FILE SIZE: 451b

FIRST SEEN: 2025-11-30 21:11:47

APPEARS ON: 1 disk(s)

FILE HASH

8dcb57e9c970f823fe93103b1bd6e8448ba943ae4cdd8f8a2fb3004693a2a51c

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 ASSEMBLER TRANSQA SEQ DuncanTwain 14 20 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 2A 3D 24 37 41 37 30 0D  20 20 20 20 4C 44 58 20  |*=$7A70.    LDX |
00000010: 20 23 24 30 30 0D 53 41  50 20 42 45 51 20 20 52  | #$00.SAP BEQ  R|
00000020: 45 53 0D 20 20 20 20 4C  44 59 20 20 23 24 30 30  |ES.    LDY  #$00|
00000030: 0D 54 4F 4C 20 4C 44 41  20 20 24 30 30 30 30 2C  |.TOL LDA  $0000,|
00000040: 59 0D 20 20 20 20 53 54  41 20 20 24 30 30 30 30  |Y.    STA  $0000|
00000050: 2C 59 0D 20 20 20 20 44  45 59 0D 20 20 20 20 42  |,Y.    DEY.    B|
00000060: 4E 45 20 20 54 4F 4C 0D  20 20 20 20 49 4E 43 20  |NE  TOL.    INC |
00000070: 20 24 37 41 37 30 2B 24  38 0D 20 20 20 20 49 4E  | $7A70+$8.    IN|
00000080: 43 20 20 24 37 41 37 30  2B 24 42 0D 20 20 20 20  |C  $7A70+$B.    |
00000090: 44 45 58 0D 20 20 20 20  42 50 4C 20 20 53 41 50  |DEX.    BPL  SAP|
000000A0: 0D 20 20 20 20 42 4D 49  20 20 55 49 54 0D 52 45  |.    BMI  UIT.RE|
000000B0: 53 20 4C 44 59 20 20 23  24 30 30 0D 20 20 20 20  |S LDY  #$00.    |
000000C0: 42 45 51 20 20 55 49 54  0D 20 20 20 20 53 45 43  |BEQ  UIT.    SEC|
000000D0: 0D 20 20 20 20 4C 44 41  20 20 24 37 41 37 30 2B  |.    LDA  $7A70+|
000000E0: 24 37 0D 20 20 20 20 53  42 43 20 20 23 24 30 31  |$7.    SBC  #$01|
000000F0: 0D 20 20 20 20 53 54 41  20 20 24 37 41 37 30 2B  |.    STA  $7A70+|
00000100: 24 37 0D 20 20 20 20 4C  44 41 20 20 24 37 41 37  |$7.    LDA  $7A7|
00000110: 30 2B 24 38 0D 20 20 20  20 53 42 43 20 20 23 24  |0+$8.    SBC  #$|
00000120: 30 30 0D 20 20 20 20 53  54 41 20 20 24 37 41 37  |00.    STA  $7A7|
00000130: 30 2B 24 38 0D 20 20 20  20 53 45 43 0D 20 20 20  |0+$8.    SEC.   |
00000140: 20 4C 44 41 20 20 24 37  41 37 30 2B 24 41 0D 20  | LDA  $7A70+$A. |
00000150: 20 20 20 53 42 43 20 20  23 24 30 31 0D 20 20 20  |   SBC  #$01.   |
00000160: 20 53 54 41 20 20 24 37  41 37 30 2B 24 41 0D 20  | STA  $7A70+$A. |
00000170: 20 20 20 4C 44 41 20 20  24 37 41 37 30 2B 24 42  |   LDA  $7A70+$B|
00000180: 0D 20 20 20 20 53 42 43  20 20 23 24 30 30 0D 20  |.    SBC  #$00. |
00000190: 20 20 20 53 54 41 20 20  24 37 41 37 30 2B 24 42  |   STA  $7A70+$B|
000001A0: 0D 20 20 20 20 43 4C 43  0D 20 20 20 20 42 43 43  |.    CLC.    BCC|
000001B0: 20 20 54 4F 4C 0D 55 49  54 20 52 54 53 0D 2E 45  |  TOL.UIT RTS..E|
000001C0: 4E 44 0D                                          |ND.             |

*=$7A70.    LDX  #$00.SAP BEQ  RES.    L
DY  #$00.TOL LDA  $0000,Y.    STA  $0000
,Y.    DEY.    BNE  TOL.    INC  $7A70+$
8.    INC  $7A70+$B.    DEX.    BPL  SAP
.    BMI  UIT.RES LDY  #$00.    BEQ  UIT
.    SEC.    LDA  $7A70+$7.    SBC  #$01
.    STA  $7A70+$7.    LDA  $7A70+$8.   
 SBC  #$00.    STA  $7A70+$8.    SEC.   
 LDA  $7A70+$A.    SBC  #$01.    STA  $7
A70+$A.    LDA  $7A70+$B.    SBC  #$00. 
   STA  $7A70+$B.    CLC.    BCC  TOL.UI
T RTS..END.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL