Updates 0.5.1

Added lores subroutines and macros, as well as most of the documentation for it. You will not find documentation for the library yet in the quick reference area.

At this point, it is likely that I will be going back to revisit older disks in order to do more optimization, make some strategic file name changes, and add extra subroutines/macros to each library. More content will be added to the documentation as well in order to accomodate multiple audiences.

After that, we will be moving to version 0.6.0, at which point the speaker library and the hires library will be added.
This commit is contained in:
nathanriggs 2019-11-02 04:27:42 -04:00
parent 9f35f32f67
commit d2c4fd2812
110 changed files with 308822 additions and 0 deletions

BIN
bin/d8_lores.dsk Normal file

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

867
source/d7_convert/ProDOS Normal file
View File

@ -0,0 +1,867 @@
2000- 4C FC 23 JMP $23FC
2003- EA NOP
2004- 0E 20 74 ASL $7420
2007- 23 ???
2008- D4 ???
2009- 23 ???
200A- D4 ???
200B- 03 ???
200C- 00 BRK
200D- 00 BRK
200E- 7B ???
200F- F4 ???
2010- C9 25 CMP #$25
2012- 2B ???
2013- 85 00 STA $00
2015- FA PLX
2016- 68 PLA
2017- 85 0C STA $0C
2019- 68 PLA
201A- 85 0E STA $0E
201C- 68 PLA
201D- 85 08 STA $08
201F- 68 PLA
2020- 85 0A STA $0A
2022- DA PHX
2023- A9 01 LDA #$01
2025- 00 BRK
2026- 85 06 STA $06
2028- A7 ???
2029- 08 PHP
202A- 1A INC
202B- 85 04 STA $04
202D- 64 16 STZ $16
202F- 8B ???
2030- 4B ???
2031- AB ???
2032- 20 B9 20 JSR $20B9
2035- B0 07 BCS $203E
2037- 20 D9 20 JSR $20D9
203A- B0 5E BCS $209A
203C- 80 F4 BRA $2032
203E- A0 15 LDY #$15
2040- 00 BRK
2041- B1 16 LDA ($16),Y
2043- 85 10 STA $10
2045- 83 ???
2046- 08 PHP
2047- C8 INY
2048- C8 INY
2049- B1 16 LDA ($16),Y
204B- 29 FF AND #$FF
204D- 00 BRK
204E- 85 12 STA $12
2050- 83 ???
2051- 0A ASL
2052- A0 1F LDY #$1F
2054- 00 BRK
2055- B1 16 LDA ($16),Y
2057- 83 ???
2058- 06 A0 ASL $A0
205A- 10 00 BPL $205C
205C- B1 16 LDA ($16),Y
205E- 29 FF AND #$FF
2060- 00 BRK
2061- 83 ???
2062- 04 A0 TSB $A0
2064- 11 00 ORA ($00),Y
2066- B1 16 LDA ($16),Y
2068- A8 TAY
2069- A2 00 LDX #$00
206B- 32 A9 AND ($A9)
206D- 00 BRK
206E- 00 BRK
206F- 20 A1 21 JSR $21A1
2072- B0 26 BCS $209A
2074- A5 11 LDA $11
2076- 4A LSR
2077- AA TAX
2078- A5 10 LDA $10
207A- 29 FF AND #$FF
207C- 01 F0 ORA ($F0,X)
207E- 01 E8 ORA ($E8,X)
2080- 86 14 STX $14
2082- A2 FF LDX #$FF
2084- FF ???
2085- 86 12 STX $12
2087- E6 12 INC $12
2089- A9 00 LDA #$00
208B- 32 A4 AND ($A4)
208D- 12 20 ORA ($20)
208F- 8E 21 A5 STX $A521
2092- 0E A6 0C ASL $0CA6
2095- 20 A1 21 JSR $21A1
2098- 90 07 BCC $20A1
209A- AB ???
209B- 48 PHA
209C- A5 00 LDA $00
209E- 5B ???
209F- 68 PLA
20A0- 60 RTS
20A1- C6 14 DEC $14
20A3- F0 0E BEQ $20B3
20A5- 18 CLC
20A6- A5 0C LDA $0C
20A8- 69 00 ADC #$00
20AA- 02 ???
20AB- 85 0C STA $0C
20AD- 90 D8 BCC $2087
20AF- E6 0E INC $0E
20B1- 80 D4 BRA $2087
20B3- AB ???
20B4- A5 00 LDA $00
20B6- 5B ???
20B7- 18 CLC
20B8- 60 RTS
20B9- E2 ???
20BA- 30 A4 BMI $2060
20BC- 06 C4 ASL $C4
20BE- 04 B0 TSB $B0
20C0- 15 A2 ORA $A2,X
20C2- 00 BRK
20C3- C8 INY
20C4- B7 ???
20C5- 08 PHP
20C6- C9 3A CMP #$3A
20C8- F0 07 BEQ $20D1
20CA- E8 INX
20CB- 95 2C STA $2C,X
20CD- C4 04 CPY $04
20CF- D0 F2 BNE $20C3
20D1- 84 06 STY $06
20D3- 86 2C STX $2C
20D5- 18 CLC
20D6- C2 ???
20D7- 30 60 BMI $2139
20D9- 64 20 STZ $20
20DB- A9 01 LDA #$01
20DD- 00 BRK
20DE- 85 24 STA $24
20E0- A0 02 LDY #$02
20E2- 00 BRK
20E3- A5 16 LDA $16
20E5- F0 13 BEQ $20FA
20E7- A0 00 LDY #$00
20E9- 00 BRK
20EA- B1 16 LDA ($16),Y
20EC- 29 F0 AND #$F0
20EE- 00 BRK
20EF- C9 D0 CMP #$D0
20F1- 00 BRK
20F2- D0 46 BNE $213A
20F4- A0 11 LDY #$11
20F6- 00 BRK
20F7- B1 16 LDA ($16),Y
20F9- A8 TAY
20FA- A2 00 LDX #$00
20FC- 30 A9 BMI $20A7
20FE- 00 BRK
20FF- 00 BRK
2100- 20 A1 21 JSR $21A1
2103- B0 38 BCS $213D
2105- A5 24 LDA $24
2107- F0 15 BEQ $211E
2109- AD 23 30 LDA $3023
210C- 29 FF AND #$FF
210E- 00 BRK
210F- 85 18 STA $18
2111- AD 24 30 LDA $3024
2114- 29 FF AND #$FF
2116- 00 BRK
2117- 85 1A STA $1A
2119- AD 25 30 LDA $3025
211C- 85 22 STA $22
211E- 20 41 21 JSR $2141
2121- 90 1C BCC $213F
2123- 18 CLC
2124- A5 1E LDA $1E
2126- 65 20 ADC $20
2128- 85 20 STA $20
212A- C5 22 CMP $22
212C- F0 0C BEQ $213A
212E- A2 02 LDX #$02
2130- 00 BRK
2131- BC 00 30 LDY $3000,X
2134- F0 04 BEQ $213A
2136- 64 24 STZ $24
2138- 80 C0 BRA $20FA
213A- A9 46 LDA #$46
213C- 00 BRK
213D- 38 SEC
213E- 60 RTS
213F- 18 CLC
2140- 60 RTS
2141- 64 1E STZ $1E
2143- A5 1A LDA $1A
2145- 85 1C STA $1C
2147- A9 00 LDA #$00
2149- 30 18 BMI $2163
214B- 69 04 ADC #$04
214D- 00 BRK
214E- 85 16 STA $16
2150- A6 24 LDX $24
2152- F0 0B BEQ $215F
2154- 18 CLC
2155- A5 16 LDA $16
2157- 65 18 ADC $18
2159- 85 16 STA $16
215B- C6 1C DEC $1C
215D- F0 0F BEQ $216E
215F- B2 16 LDA ($16)
2161- 29 FF AND #$FF
2163- 00 BRK
2164- F0 EE BEQ $2154
2166- E6 1E INC $1E
2168- 20 70 21 JSR $2170
216B- B0 E7 BCS $2154
216D- 60 RTS
216E- 38 SEC
216F- 60 RTS
2170- E2 ???
2171- 30 B2 BMI $2125
2173- 16 29 ASL $29,X
2175- 0F ???
2176- C5 2C CMP $2C
2178- D0 10 BNE $218A
217A- A8 TAY
217B- AA TAX
217C- B1 16 LDA ($16),Y
217E- D5 2C CMP $2C,X
2180- D0 08 BNE $218A
2182- 88 DEY
2183- CA DEX
2184- D0 F6 BNE $217C
2186- 18 CLC
2187- C2 ???
2188- 30 60 BMI $21EA
218A- 38 SEC
218B- C2 ???
218C- 30 60 BMI $21EE
218E- 85 28 STA $28
2190- 18 CLC
2191- 69 00 ADC #$00
2193- 01 85 ORA ($85,X)
2195- 2A ROL
2196- E2 ???
2197- 20 B1 2A JSR $2AB1
219A- EB ???
219B- B1 28 LDA ($28),Y
219D- C2 ???
219E- 20 A8 60 JSR $60A8
21A1- 0B ???
21A2- F4 ???
21A3- 00 BRK
21A4- 00 BRK
21A5- 2B ???
21A6- 9C EE 22 STZ $22EE
21A9- 8D E6 22 STA $22E6
21AC- 8E E4 22 STX $22E4
21AF- 86 44 STX $44
21B1- 8C E8 22 STY $22E8
21B4- 84 46 STY $46
21B6- 9C EA 22 STZ $22EA
21B9- AD EC 22 LDA $22EC
21BC- 0A ASL
21BD- 0A ASL
21BE- 0A ASL
21BF- 0A ASL
21C0- 29 00 AND #$00
21C2- 70 09 BVS $21CD
21C4- 01 00 ORA ($00,X)
21C6- 85 42 STA $42
21C8- 8D F0 22 STA $22F0
21CB- C0 00 CPY #$00
21CD- 00 BRK
21CE- D0 14 BNE $21E4
21D0- AD E6 22 LDA $22E6
21D3- 85 46 STA $46
21D5- A0 FE LDY #$FE
21D7- 01 A9 ORA ($A9,X)
21D9- 00 BRK
21DA- 00 BRK
21DB- 97 ???
21DC- 44 ???
21DD- 88 DEY
21DE- 88 DEY
21DF- 10 FA BPL $21DB
21E1- 2B ???
21E2- 18 CLC
21E3- 60 RTS
21E4- CC F2 22 CPY $22F2
21E7- D0 14 BNE $21FD
21E9- AD E6 22 LDA $22E6
21EC- 85 46 STA $46
21EE- A0 FE LDY #$FE
21F0- 01 B9 ORA ($B9,X)
21F2- 00 BRK
21F3- 34 97 BIT $97,X
21F5- 44 ???
21F6- 88 DEY
21F7- 88 DEY
21F8- 10 F7 BPL $21F1
21FA- 2B ???
21FB- 18 CLC
21FC- 60 RTS
21FD- CC F4 22 CPY $22F4
2200- D0 13 BNE $2215
2202- AD E6 22 LDA $22E6
2205- 85 46 STA $46
2207- A0 FE LDY #$FE
2209- 01 B9 ORA ($B9,X)
220B- 00 BRK
220C- 36 97 ROL $97,X
220E- 44 ???
220F- 88 DEY
2210- 88 DEY
2211- 10 F7 BPL $220A
2213- 80 E5 BRA $21FA
2215- AD D3 22 LDA $22D3
2218- 30 05 BMI $221F
221A- 20 BE 22 JSR $22BE
221D- 80 2C BRA $224B
221F- AD E6 22 LDA $22E6
2222- D0 05 BNE $2229
2224- 20 BE 22 JSR $22BE
2227- 80 22 BRA $224B
2229- A9 00 LDA #$00
222B- 30 85 BMI $21B2
222D- 44 ???
222E- 20 BE 22 JSR $22BE
2231- B0 18 BCS $224B
2233- F4 ???
2234- 00 BRK
2235- 00 BRK
2236- F4 ???
2237- 00 BRK
2238- 30 AD BMI $21E7
223A- E6 22 INC $22
223C- 48 PHA
223D- AD E4 22 LDA $22E4
2240- 48 PHA
2241- F4 ???
2242- 00 BRK
2243- 00 BRK
2244- F4 ???
2245- 00 BRK
2246- 02 ???
2247- 20 F6 22 JSR $22F6
224A- 18 CLC
224B- 29 FF AND #$FF
224D- 00 BRK
224E- 90 26 BCC $2276
2250- 89 40 BIT #$40
2252- 00 BRK
2253- D0 21 BNE $2276
2255- C9 2E CMP #$2E
2257- 00 BRK
2258- D0 19 BNE $2273
225A- AE EE 22 LDX $22EE
225D- D0 14 BNE $2273
225F- EE EE 22 INC $22EE
2262- AD E4 22 LDA $22E4
2265- 85 44 STA $44
2267- AD E8 22 LDA $22E8
226A- 85 46 STA $46
226C- AD F0 22 LDA $22F0
226F- 85 42 STA $42
2271- 80 A2 BRA $2215
2273- 38 SEC
2274- 80 46 BRA $22BC
2276- 18 CLC
2277- AD F2 22 LDA $22F2
227A- D0 1E BNE $229A
227C- AD E8 22 LDA $22E8
227F- 8D F2 22 STA $22F2
2282- AD E6 22 LDA $22E6
2285- 85 46 STA $46
2287- AD E4 22 LDA $22E4
228A- 85 44 STA $44
228C- A0 FE LDY #$FE
228E- 01 B7 ORA ($B7,X)
2290- 44 ???
2291- 99 00 34 STA $3400,Y
2294- 88 DEY
2295- 88 DEY
2296- 10 F7 BPL $228F
2298- 80 22 BRA $22BC
229A- AD F4 22 LDA $22F4
229D- D0 1D BNE $22BC
229F- AD E8 22 LDA $22E8
22A2- 8D F4 22 STA $22F4
22A5- AD E6 22 LDA $22E6
22A8- 85 46 STA $46
22AA- AD E4 22 LDA $22E4
22AD- 85 44 STA $44
22AF- A0 FE LDY #$FE
22B1- 01 B7 ORA ($B7,X)
22B3- 44 ???
22B4- 99 00 36 STA $3600,Y
22B7- 88 DEY
22B8- 88 DEY
22B9- 10 F7 BPL $22B2
22BB- 18 CLC
22BC- 2B ???
22BD- 60 RTS
22BE- 3B ???
22BF- AA TAX
22C0- E2 ???
22C1- 20 EB 3A JSR $3AEB
22C4- F0 08 BEQ $22CE
22C6- A9 01 LDA #$01
22C8- EB ???
22C9- AF ???
22CA- 00 BRK
22CB- 01 01 ORA ($01,X)
22CD- 1B ???
22CE- DA PHX
22CF- 38 SEC
22D0- FB ???
22D1- 20 00 C0 JSR $C000 r:KBD w:CLR80COL
22D4- EA NOP
22D5- EA NOP
22D6- EA NOP
22D7- EA NOP
22D8- EA NOP
22D9- 08 PHP
22DA- 18 CLC
22DB- FB ???
22DC- 28 PLP
22DD- C2 ???
22DE- 30 FA BMI $22DA
22E0- 9A TXS
22E1- 60 RTS
22E2- 03 ???
22E3- 01 00 ORA ($00,X)
22E5- 00 BRK
22E6- 00 BRK
22E7- 00 BRK
22E8- 00 BRK
22E9- 00 BRK
22EA- 00 BRK
22EB- 00 BRK
22EC- 00 BRK
22ED- 00 BRK
22EE- 00 BRK
22EF- 00 BRK
22F0- 00 BRK
22F1- 00 BRK
22F2- 01 00 ORA ($00,X)
22F4- 01 00 ORA ($00,X)
22F6- 48 PHA
22F7- 0B ???
22F8- 3B ???
22F9- 5B ???
22FA- 8B ???
22FB- A5 07 LDA $07
22FD- 05 09 ORA $09
22FF- F0 66 BEQ $2367
2301- A6 0F LDX $0F
2303- A4 0B LDY $0B
2305- A5 0D LDA $0D
2307- 29 FF AND #$FF
2309- 00 BRK
230A- 85 0D STA $0D
230C- A5 11 LDA $11
230E- 29 FF AND #$FF
2310- 00 BRK
2311- EB ???
2312- 05 0D ORA $0D
2314- 8F ???
2315- 55 23 EOR $23,X
2317- 00 BRK
2318- A5 07 LDA $07
231A- D0 02 BNE $231E
231C- C6 09 DEC $09
231E- C6 07 DEC $07
2320- A5 07 LDA $07
2322- 85 03 STA $03
2324- 80 18 BRA $233E
2326- 85 09 STA $09
2328- AF ???
2329- 55 23 EOR $23,X
232B- 00 BRK
232C- E0 01 CPX #$01
232E- 00 BRK
232F- B0 03 BCS $2334
2331- 69 00 ADC #$00
2333- 01 C0 ORA ($C0,X)
2335- 00 BRK
2336- 00 BRK
2337- D0 01 BNE $233A
2339- 1A INC
233A- 8F ???
233B- 55 23 EOR $23,X
233D- 00 BRK
233E- 8A TXA
233F- 49 FF EOR #$FF
2341- FF ???
2342- C5 03 CMP $03
2344- B0 02 BCS $2348
2346- 85 03 STA $03
2348- 98 TYA
2349- 49 FF EOR #$FF
234B- FF ???
234C- C5 03 CMP $03
234E- B0 02 BCS $2352
2350- 85 03 STA $03
2352- A5 03 LDA $03
2354- 54 ???
2355- 00 BRK
2356- 00 BRK
2357- A5 07 LDA $07
2359- 18 CLC
235A- E5 03 SBC $03
235C- 85 07 STA $07
235E- 85 03 STA $03
2360- A5 09 LDA $09
2362- E9 00 SBC #$00
2364- 00 BRK
2365- 10 BF BPL $2326
2367- AB ???
2368- A5 05 LDA $05
236A- 85 11 STA $11
236C- 2B ???
236D- 3B ???
236E- 18 CLC
236F- 69 0E ADC #$0E
2371- 00 BRK
2372- 1B ???
2373- 60 RTS
2374- 7B ???
2375- F4 ???
2376- C9 25 CMP #$25
2378- 2B ???
2379- 85 00 STA $00
237B- FA PLX
237C- 68 PLA
237D- 85 08 STA $08
237F- 68 PLA
2380- 85 0A STA $0A
2382- DA PHX
2383- A9 00 LDA #$00
2385- 00 BRK
2386- A2 00 LDX #$00
2388- 30 A0 BMI $232A
238A- 02 ???
238B- 00 BRK
238C- 20 A1 21 JSR $21A1
238F- B0 37 BCS $23C8
2391- 64 02 STZ $02
2393- AD 1A 30 LDA $301A
2396- 10 03 BPL $239B
2398- 0A ASL
2399- 85 02 STA $02
239B- AD 04 30 LDA $3004
239E- 29 0F AND #$0F
23A0- 00 BRK
23A1- 85 26 STA $26
23A3- 1A INC
23A4- 87 ???
23A5- 08 PHP
23A6- E2 ???
23A7- 30 A2 BMI $234B
23A9- 00 BRK
23AA- A0 02 LDY #$02
23AC- A9 3A LDA #$3A
23AE- 97 ???
23AF- 08 PHP
23B0- E8 INX
23B1- C8 INY
23B2- BD 04 30 LDA $3004,X
23B5- C2 ???
23B6- 20 26 02 JSR $0226
23B9- E2 ???
23BA- 20 90 02 JSR $0290
23BD- 09 20 ORA #$20
23BF- 97 ???
23C0- 08 PHP
23C1- E4 26 CPX $26
23C3- D0 EB BNE $23B0
23C5- C2 ???
23C6- 30 18 BMI $23E0
23C8- 48 PHA
23C9- A5 00 LDA $00
23CB- 5B ???
23CC- 68 PLA
23CD- 9C F2 22 STZ $22F2
23D0- 9C F4 22 STZ $22F4
23D3- 60 RTS
23D4- 7B ???
23D5- F4 ???
23D6- C9 25 CMP #$25
23D8- 2B ???
23D9- 85 00 STA $00
23DB- FA PLX
23DC- 68 PLA
23DD- 85 08 STA $08
23DF- 68 PLA
23E0- 85 0A STA $0A
23E2- DA PHX
23E3- 8B ???
23E4- 4B ???
23E5- AB ???
23E6- AD 29 25 LDA $2529
23E9- 1A INC
23EA- A8 TAY
23EB- E2 ???
23EC- 30 B9 BMI $23A7
23EE- 29 25 AND #$25
23F0- 97 ???
23F1- 08 PHP
23F2- 88 DEY
23F3- 10 F8 BPL $23ED
23F5- C2 ???
23F6- 30 AB BMI $23A3
23F8- A5 00 LDA $00
23FA- 5B ???
23FB- 60 RTS
23FC- BA TSX
23FD- A9 30 LDA #$30
23FF- 30 EA BMI $23EB
2401- 48 PHA
2402- 28 PLP
2403- 9A TXS
2404- AD 81 C0 LDA $C081 rw:ROMIN
2407- 38 SEC
2408- 20 1F FE JSR $FE1F F8ROM:IDROUTINE
240B- B0 49 BCS $2456
240D- C0 01 CPY #$01
240F- 90 45 BCC $2456
2411- F4 ???
2412- 00 BRK
2413- 00 BRK
2414- 2B ???
2415- 4B ???
2416- AB ???
2417- 20 97 24 JSR $2497
241A- 18 CLC
241B- FB ???
241C- C2 ???
241D- 30 A9 BMI $23C8
241F- FF ???
2420- 01 1B ORA ($1B,X)
2422- 48 PHA
2423- 48 PHA
2424- 48 PHA
2425- 48 PHA
2426- F4 ???
2427- 00 BRK
2428- 00 BRK
2429- F4 ???
242A- 15 25 ORA $25,X
242C- F4 ???
242D- 00 BRK
242E- 00 BRK
242F- F4 ???
2430- 00 BRK
2431- 68 PLA
2432- 20 0E 20 JSR $200E
2435- 90 0E BCC $2445
2437- 48 PHA
2438- F4 ???
2439- 00 BRK
243A- 00 BRK
243B- F4 ???
243C- 32 25 AND ($25)
243E- A2 03 LDX #$03
2440- 15 22 ORA $22,X
2442- 00 BRK
2443- 00 BRK
2444- E1 68 SBC ($68,X)
2446- 68 PLA
2447- 8D 0C 20 STA $200C
244A- 68 PLA
244B- 68 PLA
244C- 9C F2 22 STZ $22F2
244F- 9C F4 22 STZ $22F4
2452- 5C ???
2453- 00 BRK
2454- 68 PLA
2455- 00 BRK
2456- 08 PHP
2457- AD 81 C0 LDA $C081 rw:ROMIN
245A- 8D 0C C0 STA $C00C w:CLR80VID
245D- 8D 0E C0 STA $C00E w:CLRALTCHAR
2460- 8D 00 C0 STA $C000 r:KBD w:CLR80COL
2463- 20 2F FB JSR $FB2F F8ROM:INIT
2466- 20 93 FE JSR $FE93 F8ROM:SETVID
2469- 20 84 FE JSR $FE84 F8ROM:SETNORM
246C- 20 58 FC JSR $FC58 F8ROM:HOME
246F- 28 PLP
2470- AC 5B 25 LDY $255B
2473- B0 03 BCS $2478
2475- AC 7F 25 LDY $257F
2478- B9 5B 25 LDA $255B,Y
247B- B0 03 BCS $2480
247D- B9 7F 25 LDA $257F,Y
2480- 99 A8 05 STA $05A8,Y
2483- 88 DEY
2484- D0 F2 BNE $2478
2486- B0 0C BCS $2494
2488- AC A6 25 LDY $25A6
248B- B9 A6 25 LDA $25A6,Y
248E- 99 A8 06 STA $06A8,Y
2491- 88 DEY
2492- D0 F7 BNE $248B
2494- 4C 94 24 JMP $2494
2497- AD F8 07 LDA $07F8
249A- 09 C0 ORA #$C0
249C- 85 45 STA $45
249E- 8D D3 22 STA $22D3
24A1- 8D ED 22 STA $22ED
24A4- 64 44 STZ $44
24A6- 20 E5 24 JSR $24E5
24A9- 8D D2 22 STA $22D2
24AC- A0 07 LDY #$07
24AE- B1 44 LDA ($44),Y
24B0- D0 32 BNE $24E4
24B2- A0 FB LDY #$FB
24B4- B1 44 LDA ($44),Y
24B6- 10 2C BPL $24E4
24B8- 20 E5 24 JSR $24E5
24BB- 69 03 ADC #$03
24BD- 8D C9 24 STA $24C9
24C0- A5 45 LDA $45
24C2- 8D D3 22 STA $22D3
24C5- 8D CA 24 STA $24CA
24C8- 20 00 C0 JSR $C000 r:KBD w:CLR80COL
24CB- 00 BRK
24CC- EB ???
24CD- 24 AD BIT $AD
24CF- 06 25 ASL $25
24D1- 10 11 BPL $24E4
24D3- AD C9 24 LDA $24C9
24D6- 8D D2 22 STA $22D2
24D9- A2 04 LDX #$04
24DB- BD 10 25 LDA $2510,X
24DE- 9D D4 22 STA $22D4,X
24E1- CA DEX
24E2- 10 F7 BPL $24DB
24E4- 60 RTS
24E5- A0 FF LDY #$FF
24E7- 18 CLC
24E8- B1 44 LDA ($44),Y
24EA- 60 RTS
24EB- 03 ???
24EC- 01 F0 ORA ($F0,X)
24EE- 24 03 BIT $03
24F0- 00 BRK
24F1- 00 BRK
24F2- 00 BRK
24F3- 00 BRK
24F4- 00 BRK
24F5- 20 20 20 JSR $2020
24F8- 20 20 20 JSR $2020
24FB- 20 20 20 JSR $2020
24FE- 20 20 20 JSR $2020
2501- 20 20 20 JSR $2020
2504- 20 00 00 JSR $0000
2507- 00 BRK
2508- 00 BRK
2509- 00 BRK
250A- 00 BRK
250B- 00 BRK
250C- 00 BRK
250D- 00 BRK
250E- 00 BRK
250F- 00 BRK
2510- 41 E2 EOR ($E2,X)
2512- 22 ???
2513- 00 BRK
2514- 00 BRK
2515- 12 00 ORA ($00)
2517- 53 ???
2518- 59 53 54 EOR $5453,Y
251B- 45 4D EOR $4D
251D- 3A DEC
251E- 53 ???
251F- 54 ???
2520- 41 52 EOR ($52,X)
2522- 54 ???
2523- 2E 47 53 ROL $5347
2526- 2E 4F 53 ROL $534F
2529- 07 ???
252A- 00 BRK
252B- 50 52 BVC $257F
252D- 4F ???
252E- 2E 46 53 ROL $5346
2531- 54 ???
2532- 28 PLP
2533- 55 6E EOR $6E,X
2535- 61 62 ADC ($62,X)
2537- 6C 65 20 JMP ($2065)
253A- 74 6F STZ $6F,X
253C- 20 6C 6F JSR $6F6C
253F- 61 64 ADC ($64,X)
2541- 20 53 54 JSR $5453
2544- 41 52 EOR ($52,X)
2546- 54 ???
2547- 2E 47 53 ROL $5347
254A- 2E 4F 53 ROL $534F
254D- 20 66 69 JSR $6966
2550- 6C 65 2E JMP ($2E65)
2553- 20 45 72 JSR $7245
2556- 72 6F ADC ($6F)
2558- 72 3D ADC ($3D)
255A- 24 23 BIT $23
255C- C7 ???
255D- D3 ???
255E- AF ???
255F- CF ???
2560- D3 ???
2561- A0 D2 LDY #$D2
2563- C5 D1 CMP $D1
2565- D5 C9 CMP $C9,X
2567- D2 C5 CMP ($C5)
2569- D3 ???
256A- A0 C1 LDY #$C1
256C- D0 D0 BNE $253E
256E- CC C5 A0 CPY $A0C5
2571- C9 C9 CMP #$C9
2573- C7 ???
2574- D3 ???
2575- A0 C8 LDY #$C8
2577- C1 D2 CMP ($D2,X)
2579- C4 D7 CPY $D7
257B- C1 D2 CMP ($D2,X)
257D- C5 A0 CMP $A0
257F- 26 C7 ROL $C7
2581- D3 ???
2582- AF ???
2583- CF ???
2584- D3 ???
2585- A0 EE LDY #$EE
2587- E5 E5 SBC $E5
2589- E4 F3 CPX $F3
258B- A0 D2 LDY #$D2
258D- CF ???
258E- CD A0 F6 CMP $F6A0
2591- E5 F2 SBC $F2
2593- F3 ???
2594- E9 EF SBC #$EF
2596- EE A0 B0 INC $B0A0
2599- B1 A0 LDA ($A0),Y
259B- EF ???
259C- F2 A0 SBC ($A0)
259E- E7 ???
259F- F2 E5 SBC ($E5)
25A1- E1 F4 SBC ($F4,X)
25A3- E5 F2 SBC $F2
25A5- AE 22 D3 LDX $D322
25A8- E5 E5 SBC $E5
25AA- A0 F9 LDY #$F9
25AC- EF ???
25AD- F5 F2 SBC $F2,X
25AF- A0 E4 LDY #$E4
25B1- E5 E1 SBC $E1
25B3- EC E5 F2 CPX $F2E5
25B6- A0 E6 LDY #$E6
25B8- EF ???
25B9- F2 A0 SBC ($A0)
25BB- E1 A0 SBC ($A0,X)
25BD- D2 CF CMP ($CF)
25BF- CD A0 F5 CMP $F5A0
25C2- F0 E7 BEQ $25AB
25C4- F2 E1 SBC ($E1)
25C6- E4 E5 CPX $E5
25C8- AE 00 00 LDX $0000

Binary file not shown.

Binary file not shown.

View File

View File

View File

View File

View File

View File

View File

View File

View File

View File

View File

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,413 @@
[ Valid OMF expected but not found ]
00/0000: 02 00 COP 00
00/0002: 00 00 BRK 00
00/0004: 00 00 BRK 00
00/0006: 00 00 BRK 00
00/0008: C3 01 CMP 01,S
00/000A: 00 00 BRK 00
00/000C: 00 0A BRK 0A
00/000E: 04 01 TSB 01
00/0010: 00 00 BRK 00
00/0012: 01 00 ORA (00,X)
00/0014: 00 00 BRK 00
00/0016: 00 00 BRK 00
00/0018: 00 00 BRK 00
00/001A: 00 00 BRK 00
00/001C: 00 00 BRK 00
00/001E: 00 00 BRK 00
00/0020: 00 00 BRK 00
00/0022: 01 00 ORA (00,X)
00/0024: 00 00 BRK 00
00/0026: 00 00 BRK 00
00/0028: 2C 00 40 BIT 4000
00/002B: 00 20 BRK 20
00/002D: 20 20 20 JSR 2020
00/0030: 20 20 20 JSR 2020
00/0033: 20 20 20 JSR 2020
00/0036: 20 20 20 JSR 2020
00/0039: 20 20 20 JSR 2020
00/003C: 20 20 20 JSR 2020
00/003F: 20 F2 C3 JSR C3F2
00/0042: 01 00 ORA (00,X)
00/0044: 00 20 BRK 20
00/0046: 00 00 BRK 00
00/0048: 00 D8 BRK D8
00/004A: 00 00 BRK 00
00/004C: 00 F7 BRK F7
00/004E: 00 00 BRK 00
00/0050: 00 C2 BRK C2
00/0052: 01 00 ORA (00,X)
00/0054: 00 3C BRK 3C
00/0056: 00 FF BRK FF
00/0058: FF 20 20 43 SBC 432020,X
00/005C: 6C 6F 63 JMP (636F)
00/005F: 6B RTL
00/0060: 5C 48 2A 2A JMP 2A2A48
00/0064: 0D AF AF ORA AFAF
00/0067: 00 00 BRK 00
00/0069: D0 3A BNE 00A5 {+3A}
00/006B: F4 00 00 PEA 0000
00/006E: F4 00 00 PEA 0000
00/0071: F4 00 00 PEA 0000
00/0074: F4 61 00 PEA 0061
00/0077: A2 0E 09 LDX #090E
00/007A: 22 00 00 E1 JSL E10000 NewWindow(@Parms):@Wind
00/007E: FA PLX
00/007F: 68 PLA
00/0080: 83 06 STA 06,S
00/0082: 8F B9 00 00 STA 0000B9
00/0086: 8A TXA
00/0087: 83 04 STA 04,S
00/0089: 8F B7 00 00 STA 0000B7
00/008D: AF B9 00 00 LDA 0000B9
00/0091: 48 PHA
00/0092: AF B7 00 00 LDA 0000B7
00/0096: 48 PHA
00/0097: A2 0E 4B LDX #4B0E
00/009A: 22 00 00 E1 JSL E10000 SetSysWindow(@Wind)
00/009E: A9 00 80 LDA #8000
00/00A1: 8F AF 00 00 STA 0000AF
00/00A5: 6B RTL
00/00A6: 4E 00 A0 LSR A000
00/00A9: C0 B1 00 CPY #00B1
00/00AC: 00 00 BRK 00
00/00AE: 00 00 BRK 00
00/00B0: 00 00 BRK 00
00/00B2: 00 00 BRK 00
00/00B4: 00 00 BRK 00
00/00B6: 00 00 BRK 00
00/00B8: 00 00 BRK 00
00/00BA: 00 00 BRK 00
00/00BC: 00 00 BRK 00
00/00BE: 00 00 BRK 00
00/00C0: 00 00 BRK 00
00/00C2: 00 00 BRK 00
00/00C4: 00 00 BRK 00
00/00C6: 00 00 BRK 00
00/00C8: 00 00 BRK 00
00/00CA: 00 00 BRK 00
00/00CC: 00 00 BRK 00
00/00CE: 00 00 BRK 00
00/00D0: 00 00 BRK 00
00/00D2: 00 00 BRK 00
00/00D4: 00 00 BRK 00
00/00D6: 00 00 BRK 00
00/00D8: 00 00 BRK 00
00/00DA: 00 00 BRK 00
00/00DC: 00 00 BRK 00
00/00DE: 00 00 BRK 00
00/00E0: 00 00 BRK 00
00/00E2: 00 00 BRK 00
00/00E4: 32 00 AND (00)
00/00E6: 32 00 AND (00)
00/00E8: 3E 00 C8 ROL C800,X
00/00EB: 00 FF BRK FF
00/00ED: FF FF FF 00 SBC 00FFFF,X
00/00F1: 00 00 BRK 00
00/00F3: 00 00 BRK 00
00/00F5: 00 05 BRK 05
00/00F7: 43 6C EOR 6C,S
00/00F9: 6F 63 6B 00 ADC 006B63
00/00FD: 00 00 BRK 00
00/00FF: 00 00 BRK 00
00/0101: 00 00 BRK 00
00/0103: 00 00 BRK 00
00/0105: 00 00 BRK 00
00/0107: 00 00 BRK 00
00/0109: 00 00 BRK 00
00/010B: 00 00 BRK 00
00/010D: 00 00 BRK 00
00/010F: 00 00 BRK 00
00/0111: 00 00 BRK 00
00/0113: 00 20 BRK 20
00/0115: 20 20 20 JSR 2020
00/0118: 20 20 20 JSR 2020
00/011B: 20 00 AF JSR AF00
00/011E: AF 00 00 F0 LDA F00000
00/0122: 18 CLC
00/0123: AF B9 00 00 LDA 0000B9
00/0127: 48 PHA
00/0128: AF B7 00 00 LDA 0000B7
00/012C: 48 PHA
00/012D: A2 0E 0B LDX #0B0E
00/0130: 22 00 00 E1 JSL E10000 CloseWindow(@Wind)
00/0134: A9 00 00 LDA #0000
00/0137: 8F AF 00 00 STA 0000AF
00/013B: 6B RTL
00/013C: 5A PHY
00/013D: DA PHX
00/013E: 0A ASL
00/013F: AA TAX
00/0140: FC 01 01 JSR (0101,X)
00/0143: 68 PLA
00/0144: 68 PLA
00/0145: 6B RTL
00/0146: 15 01 ORA 01,X
00/0148: 41 01 EOR (01,X)
00/014A: 16 01 ASL 01,X
00/014C: 15 01 ORA 01,X
00/014E: 15 01 ORA 01,X
00/0150: 15 01 ORA 01,X
00/0152: 15 01 ORA 01,X
00/0154: 15 01 ORA 01,X
00/0156: 15 01 ORA 01,X
00/0158: 15 01 ORA 01,X
00/015A: 60 RTS
00/015B: 8B PHB
00/015C: 4B PHK
00/015D: AB PLB
00/015E: F4 00 00 PEA 0000
00/0161: F4 00 00 PEA 0000
00/0164: A2 04 1C LDX #1C04
00/0167: 22 00 00 E1 JSL E10000 GetPort():@Port
00/016B: AD B9 00 LDA 00B9
00/016E: 48 PHA
00/016F: AD B7 00 LDA 00B7
00/0172: 48 PHA
00/0173: A2 04 1B LDX #1B04
00/0176: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/017A: 20 88 01 JSR 0188
00/017D: A2 04 1B LDX #1B04
00/0180: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/0184: AB PLB
00/0185: 60 RTS
00/0186: 0B PHD
00/0187: 3B TSC
00/0188: 5B TCD
00/0189: A7 05 LDA [05]
00/018B: 0A ASL
00/018C: AA TAX
00/018D: FC 4D 01 JSR (014D,X)
00/0190: 2B PLD
00/0191: 60 RTS
00/0192: 15 01 ORA 01,X
00/0194: 15 01 ORA 01,X
00/0196: 15 01 ORA 01,X
00/0198: 61 01 ADC (01,X)
00/019A: 15 01 ORA 01,X
00/019C: 61 01 ADC (01,X)
00/019E: 62 01 15 PER 16A2 {+1501}
00/01A1: 01 15 ORA (15,X)
00/01A3: 01 15 ORA (15,X)
00/01A5: 01 60 ORA (60,X)
00/01A7: 8B PHB
00/01A8: 4B PHK
00/01A9: AB PLB
00/01AA: AD B9 00 LDA 00B9
00/01AD: 48 PHA
00/01AE: AD B7 00 LDA 00B7
00/01B1: 48 PHA
00/01B2: A2 0E 1E LDX #1E0E
00/01B5: 22 00 00 E1 JSL E10000 BeginUpdate(@Wind)
00/01B9: 20 88 01 JSR 0188
00/01BC: AD B9 00 LDA 00B9
00/01BF: 48 PHA
00/01C0: AD B7 00 LDA 00B7
00/01C3: 48 PHA
00/01C4: A2 0E 1F LDX #1F0E
00/01C7: 22 00 00 E1 JSL E10000 EndUpdate(@Wind)
00/01CB: AB PLB
00/01CC: 60 RTS
00/01CD: F4 00 00 PEA 0000
00/01D0: F4 BB 00 PEA 00BB
00/01D3: A2 03 0F LDX #0F03
00/01D6: 22 00 00 E1 JSL E10000 ReadAsciiTime(@Buff)
00/01DA: E2 20 SEP #20
00/01DC: A2 13 00 LDX #0013
00/01DF: BD BB 00 LDA 00BB,X
00/01E2: 29 7F 9D AND #9D7F
00/01E5: BB TYX
00/01E6: 00 CA BRK CA
00/01E8: 10 F5 BPL 01DF {-0B}
00/01EA: C2 20 REP #20
00/01EC: F4 07 00 PEA 0007
00/01EF: F4 0A 00 PEA 000A
00/01F2: A2 04 3A LDX #3A04
00/01F5: 22 00 00 E1 JSL E10000 MoveTo(h,v)
00/01F9: F4 00 00 PEA 0000
00/01FC: F4 BB 00 PEA 00BB
00/01FF: A2 04 A6 LDX #A604
00/0202: 22 00 00 E1 JSL E10000 DrawCString(@cStr)
00/0206: 60 RTS
00/0207: 6B RTL
00/0208: F5 04 SBC 04,X
00/020A: 00 00 BRK 00
00/020C: 00 20 BRK 20
00/020E: 00 F5 BRK F5
00/0210: 04 00 TSB 00
00/0212: 04 00 TSB 00
00/0214: D8 CLD
00/0215: 00 F5 BRK F5
00/0217: 04 00 TSB 00
00/0219: 08 PHP
00/021A: 00 F7 BRK F7
00/021C: 00 F5 BRK F5
00/021E: 04 00 TSB 00
00/0220: 0C 00 C2 TSB C200
00/0223: 01 F5 ORA (F5,X)
00/0225: 03 00 ORA 00,S
00/0227: 21 00 AND (00,X)
00/0229: AF 00 F5 02 LDA 02F500
00/022D: F0 2D BEQ 025C {+2D}
00/022F: 00 61 BRK 61
00/0231: 00 F5 BRK F5
00/0233: 02 00 COP 00
00/0235: 30 00 BMI 0237 {+00}
00/0237: 61 00 ADC (00,X)
00/0239: F5 03 SBC 03,X
00/023B: 00 3E BRK 3E
00/023D: 00 B9 BRK B9
00/023F: 00 F5 BRK F5
00/0241: 03 00 ORA 00,S
00/0243: 45 00 EOR 00
00/0245: B7 00 LDA [00],Y
00/0247: F5 03 SBC 03,X
00/0249: 00 49 BRK 49
00/024B: 00 B9 BRK B9
00/024D: 00 F5 BRK F5
00/024F: 03 00 ORA 00,S
00/0251: 4E 00 B7 LSR B700
00/0254: 00 F5 BRK F5
00/0256: 03 00 ORA 00,S
00/0258: 5D 00 AF EOR AF00,X
00/025B: 00 F5 BRK F5
00/025D: 04 00 TSB 00
00/025F: 65 00 ADC 00
00/0261: B1 00 LDA (00),Y
00/0263: F5 03 SBC 03,X
00/0265: 00 D9 BRK D9
00/0267: 00 AF BRK AF
00/0269: 00 F5 BRK F5
00/026B: 03 00 ORA 00,S
00/026D: DF 00 B9 00 CMP 00B900,X
00/0271: F5 03 SBC 03,X
00/0273: 00 E4 BRK E4
00/0275: 00 B7 BRK B7
00/0277: 00 F5 BRK F5
00/0279: 03 00 ORA 00,S
00/027B: F3 00 SBC (00,S),Y
00/027D: AF 00 F5 02 LDA 02F500
00/0281: 00 FC BRK FC
00/0283: 00 01 BRK 01
00/0285: 01 F5 ORA (F5,X)
00/0287: 02 00 COP 00
00/0289: 01 01 ORA (01,X)
00/028B: 15 01 ORA 01,X
00/028D: F5 02 SBC 02,X
00/028F: 00 03 BRK 03
00/0291: 01 41 ORA (41,X)
00/0293: 01 F5 ORA (F5,X)
00/0295: 02 00 COP 00
00/0297: 05 01 ORA 01
00/0299: 16 01 ASL 01,X
00/029B: F5 02 SBC 02,X
00/029D: 00 07 BRK 07
00/029F: 01 15 ORA (15,X)
00/02A1: 01 F5 ORA (F5,X)
00/02A3: 02 00 COP 00
00/02A5: 09 01 15 ORA #1501
00/02A8: 01 F5 ORA (F5,X)
00/02AA: 02 00 COP 00
00/02AC: 0B PHD
00/02AD: 01 15 ORA (15,X)
00/02AF: 01 F5 ORA (F5,X)
00/02B1: 02 00 COP 00
00/02B3: 0D 01 15 ORA 1501
00/02B6: 01 F5 ORA (F5,X)
00/02B8: 02 00 COP 00
00/02BA: 0F 01 15 01 ORA 011501
00/02BE: F5 02 SBC 02,X
00/02C0: 00 11 BRK 11
00/02C2: 01 15 ORA (15,X)
00/02C4: 01 F5 ORA (F5,X)
00/02C6: 02 00 COP 00
00/02C8: 13 01 ORA (01,S),Y
00/02CA: 15 01 ORA 01,X
00/02CC: F5 02 SBC 02,X
00/02CE: 00 27 BRK 27
00/02D0: 01 B9 ORA (B9,X)
00/02D2: 00 F5 BRK F5
00/02D4: 02 00 COP 00
00/02D6: 2B PLD
00/02D7: 01 B7 ORA (B7,X)
00/02D9: 00 F5 BRK F5
00/02DB: 02 00 COP 00
00/02DD: 36 01 ROL 01,X
00/02DF: 88 DEY
00/02E0: 01 F5 ORA (F5,X)
00/02E2: 02 00 COP 00
00/02E4: 49 01 4D EOR #4D01
00/02E7: 01 F5 ORA (F5,X)
00/02E9: 02 00 COP 00
00/02EB: 4D 01 15 EOR 1501
00/02EE: 01 F5 ORA (F5,X)
00/02F0: 02 00 COP 00
00/02F2: 4F 01 15 01 EOR 011501
00/02F6: F5 02 SBC 02,X
00/02F8: 00 51 BRK 51
00/02FA: 01 15 ORA (15,X)
00/02FC: 01 F5 ORA (F5,X)
00/02FE: 02 00 COP 00
00/0300: 53 01 EOR (01,S),Y
00/0302: 61 01 ADC (01,X)
00/0304: F5 02 SBC 02,X
00/0306: 00 55 BRK 55
00/0308: 01 15 ORA (15,X)
00/030A: 01 F5 ORA (F5,X)
00/030C: 02 00 COP 00
00/030E: 57 01 EOR [01],Y
00/0310: 61 01 ADC (01,X)
00/0312: F5 02 SBC 02,X
00/0314: 00 59 BRK 59
00/0316: 01 62 ORA (62,X)
00/0318: 01 F5 ORA (F5,X)
00/031A: 02 00 COP 00
00/031C: 5B TCD
00/031D: 01 15 ORA (15,X)
00/031F: 01 F5 ORA (F5,X)
00/0321: 02 00 COP 00
00/0323: 5D 01 15 EOR 1501,X
00/0326: 01 F5 ORA (F5,X)
00/0328: 02 00 COP 00
00/032A: 5F 01 15 01 EOR 011501,X
00/032E: F5 02 SBC 02,X
00/0330: 00 66 BRK 66
00/0332: 01 B9 ORA (B9,X)
00/0334: 00 F5 BRK F5
00/0336: 02 00 COP 00
00/0338: 6A ROR
00/0339: 01 B7 ORA (B7,X)
00/033B: 00 F5 BRK F5
00/033D: 02 00 COP 00
00/033F: 75 01 ADC 01,X
00/0341: 88 DEY
00/0342: 01 F5 ORA (F5,X)
00/0344: 02 00 COP 00
00/0346: 78 SEI
00/0347: 01 B9 ORA (B9,X)
00/0349: 00 F5 BRK F5
00/034B: 02 00 COP 00
00/034D: 7C 01 B7 JMP (B701,X)
00/0350: 00 F5 BRK F5
00/0352: 02 F0 COP F0
00/0354: 89 01 BB BIT #BB01
00/0357: 00 F5 BRK F5
00/0359: 02 00 COP 00
00/035B: 8C 01 BB STY BB01
00/035E: 00 F5 BRK F5
00/0360: 02 00 COP 00
00/0362: 9B TXY
00/0363: 01 BB ORA (BB,X)
00/0365: 00 F5 BRK F5
00/0367: 02 00 COP 00
00/0369: A0 01 BB LDY #BB01
00/036C: 00 F5 BRK F5
00/036E: 02 F0 COP F0
00/0370: B5 01 LDA 01,X
00/0372: BB TYX
00/0373: 00 F5 BRK F5
00/0375: 02 00 COP 00
00/0377: B8 CLV
00/0378: 01 BB ORA (BB,X)
00/037A: 00 00 BRK 00

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,508 @@
;
; OMF segment summary:
;
; #01: DATA len=0x0004c9 loadName=' ' segName=' '
;
;
; Segment #1 (1): loadName=' ' segName=' ':
; type=DATA length=1225 OMF v2.1
; flags:
;
OMF: LCONST record (0x03a3 bytes follow)
00/0000: A1 00 LDA (00,X)
00/0002: 00 00 BRK 00
00/0004: 46 01 LSR 01
00/0006: 00 00 BRK 00
00/0008: 5E 01 00 LSR 0001,X
00/000B: 00 D8 BRK D8
00/000D: 02 00 COP 00
00/000F: 00 0A BRK 0A
00/0011: 00 FF BRK FF
00/0013: FF 20 20 4D SBC 4D2020,X
00/0017: 72 2E ADC (2E)
00/0019: 20 41 70 JSR 7041
00/001C: 70 6C BVS 008A {+6C}
00/001E: 65 20 ADC 20
00/0020: 5C 48 2A 2A JMP 2A2A48
00/0024: 00 00 BRK 00
00/0026: 00 00 BRK 00
00/0028: 00 00 BRK 00
00/002A: 00 00 BRK 00
00/002C: 00 00 BRK 00
00/002E: 4E 00 C8 LSR C800
00/0031: C0 7C 00 CPY #007C
00/0034: 00 00 BRK 00
00/0036: 00 00 BRK 00
00/0038: 00 00 BRK 00
00/003A: 00 00 BRK 00
00/003C: 00 00 BRK 00
00/003E: 00 00 BRK 00
00/0040: 00 00 BRK 00
00/0042: 00 00 BRK 00
00/0044: 00 00 BRK 00
00/0046: 00 00 BRK 00
00/0048: 00 00 BRK 00
00/004A: 00 00 BRK 00
00/004C: 00 00 BRK 00
00/004E: 00 00 BRK 00
00/0050: 00 00 BRK 00
00/0052: 00 00 BRK 00
00/0054: 00 00 BRK 00
00/0056: 00 00 BRK 00
00/0058: 00 00 BRK 00
00/005A: 00 00 BRK 00
00/005C: 00 00 BRK 00
00/005E: 00 00 BRK 00
00/0060: 00 00 BRK 00
00/0062: 00 00 BRK 00
00/0064: 00 00 BRK 00
00/0066: 00 00 BRK 00
00/0068: C8 INY
00/0069: 02 00 COP 00
00/006B: 00 28 BRK 28
00/006D: 00 1E BRK 1E
00/006F: 00 46 BRK 46
00/0071: 00 09 BRK 09
00/0073: 01 FF ORA (FF,X)
00/0075: FF FF FF 00 SBC 00FFFF,X
00/0079: 00 00 BRK 00
00/007B: 00 09 BRK 09
00/007D: 4D 72 2E EOR 2E72
00/0080: 20 41 70 JSR 7041
00/0083: 70 6C BVS 00F1 {+6C}
00/0085: 65 04 ADC 04
00/0087: 00 0A BRK 0A
00/0089: 00 0E BRK 0E
00/008B: 00 DC BRK DC
00/008D: 00 10 BRK 10
00/008F: 4D 72 2E EOR 2E72
00/0092: 20 41 70 JSR 7041
00/0095: 70 6C BVS 0103 {+6C}
00/0097: 65 20 ADC 20
00/0099: 61 63 ADC (63,X)
00/009B: 74 69 STZ 69,X
00/009D: 76 65 ROR 65,X
00/009F: 01 00 ORA (00,X)
00/00A1: 0B PHD
00/00A2: 3B TSC
00/00A3: 5B TCD
00/00A4: 8B PHB
00/00A5: 4B PHK
00/00A6: AB PLB
00/00A7: AD 24 00 LDA 0024
00/00AA: F0 03 BEQ 00AF {+03}
00/00AC: 4C 1B 01 JMP 011B
00/00AF: EE 24 00 INC 0024
00/00B2: 48 PHA
00/00B3: 48 PHA
00/00B4: F4 00 00 PEA 0000
00/00B7: F4 2E 00 PEA 002E
00/00BA: A2 0E 09 LDX #090E
00/00BD: 22 00 00 E1 JSL E10000 NewWindow(@Parms):@Wind
00/00C1: 68 PLA
00/00C2: 8D 26 00 STA 0026
00/00C5: 68 PLA
00/00C6: 8D 28 00 STA 0028
00/00C9: AD 28 00 LDA 0028
00/00CC: 48 PHA
00/00CD: AD 26 00 LDA 0026
00/00D0: 48 PHA
00/00D1: A2 0E 4B LDX #4B0E
00/00D4: 22 00 00 E1 JSL E10000 SetSysWindow(@Wind)
00/00D8: 48 PHA
00/00D9: 48 PHA
00/00DA: AD 28 00 LDA 0028
00/00DD: 48 PHA
00/00DE: AD 26 00 LDA 0026
00/00E1: 48 PHA
00/00E2: F4 00 00 PEA 0000
00/00E5: F4 86 00 PEA 0086
00/00E8: F4 00 00 PEA 0000
00/00EB: F4 8E 00 PEA 008E
00/00EE: F4 00 00 PEA 0000
00/00F1: F4 01 00 PEA 0001
00/00F4: F4 00 00 PEA 0000
00/00F7: F4 00 00 PEA 0000
00/00FA: F4 00 02 PEA 0200
00/00FD: F4 00 00 PEA 0000
00/0100: F4 00 00 PEA 0000
00/0103: F4 00 00 PEA 0000
00/0106: F4 00 00 PEA 0000
00/0109: F4 00 00 PEA 0000
00/010C: A2 10 09 LDX #0910
00/010F: 22 00 00 E1 JSL E10000 NewControl(@W,@R,@T,F,V,P1,P2,@p,r/4,@C):cH
00/0113: 68 PLA
00/0114: 8D 2A 00 STA 002A
00/0117: 68 PLA
00/0118: 8D 2C 00 STA 002C
00/011B: AD 28 00 LDA 0028
00/011E: 48 PHA
00/011F: AD 26 00 LDA 0026
00/0122: 48 PHA
00/0123: A2 0E 13 LDX #130E
00/0126: 22 00 00 E1 JSL E10000 ShowWindow(@Wind)
00/012A: AD 28 00 LDA 0028
00/012D: 48 PHA
00/012E: AD 26 00 LDA 0026
00/0131: 48 PHA
00/0132: A2 0E 11 LDX #110E
00/0135: 22 00 00 E1 JSL E10000 SelectWindow(@Wind)
00/0139: AD 26 00 LDA 0026
00/013C: 85 06 STA 06
00/013E: AD 28 00 LDA 0028
00/0141: 85 08 STA 08
00/0143: AB PLB
00/0144: 2B PLD
00/0145: 6B RTL
00/0146: AF 24 00 00 LDA 000024
00/014A: F0 11 BEQ 015D {+11}
00/014C: AF 28 00 00 LDA 000028
00/0150: 48 PHA
00/0151: AF 26 00 00 LDA 000026
00/0155: 48 PHA
00/0156: A2 0E 12 LDX #120E
00/0159: 22 00 00 E1 JSL E10000 HideWindow(@Wind)
00/015D: 6B RTL
00/015E: C9 01 00 CMP #0001
00/0161: F0 01 BEQ 0164 {+01}
00/0163: 6B RTL
00/0164: 0B PHD
00/0165: 3B TSC
00/0166: 38 SEC
00/0167: E9 04 00 SBC #0004
00/016A: 1B TCS
00/016B: 5B TCD
00/016C: 8B PHB
00/016D: 4B PHK
00/016E: AB PLB
00/016F: 86 01 STX 01
00/0171: 84 03 STY 03
00/0173: A0 00 00 LDY #0000
00/0176: B7 01 LDA [01],Y
00/0178: 0A ASL
00/0179: 0A ASL
00/017A: AA TAX
00/017B: BD 95 01 LDA 0195,X
00/017E: 8D 89 01 STA 0189
00/0181: BD 94 01 LDA 0194,X
00/0184: 8D 88 01 STA 0188
00/0187: 22 87 01 00 JSL 000187
00/018B: AB PLB
00/018C: 3B TSC
00/018D: 18 CLC
00/018E: 69 04 00 ADC #0004
00/0191: 1B TCS
00/0192: 2B PLD
00/0193: 6B RTL
00/0194: 5D 02 00 EOR 0002,X
00/0197: 00 B8 BRK B8
00/0199: 01 00 ORA (00,X)
00/019B: 00 5D BRK 5D
00/019D: 02 00 COP 00
00/019F: 00 5D BRK 5D
00/01A1: 02 00 COP 00
00/01A3: 00 5D BRK 5D
00/01A5: 02 00 COP 00
00/01A7: 00 5D BRK 5D
00/01A9: 02 00 COP 00
00/01AB: 00 82 BRK 82
00/01AD: 02 00 COP 00
00/01AF: 00 5D BRK 5D
00/01B1: 02 00 COP 00
00/01B3: 00 5E BRK 5E
00/01B5: 02 00 COP 00
00/01B7: 00 48 BRK 48
00/01B9: F4 00 00 PEA 0000
00/01BC: F4 59 02 PEA 0259
00/01BF: A0 0C 00 LDY #000C
00/01C2: B7 01 LDA [01],Y
00/01C4: 48 PHA
00/01C5: A0 0A 00 LDY #000A
00/01C8: B7 01 LDA [01],Y
00/01CA: 48 PHA
00/01CB: A2 0E 17 LDX #170E
00/01CE: 22 00 00 E1 JSL E10000 FindWindow(@WindVar,X,Y):Where
00/01D2: 68 PLA
00/01D3: AD 5B 02 LDA 025B
00/01D6: CD 28 00 CMP 0028
00/01D9: D0 06 BNE 01E1 {+06}
00/01DB: AD 59 02 LDA 0259
00/01DE: CD 26 00 CMP 0026
00/01E1: F0 01 BEQ 01E4 {+01}
00/01E3: 6B RTL
00/01E4: 48 PHA
00/01E5: F4 00 00 PEA 0000
00/01E8: F4 59 02 PEA 0259
00/01EB: A0 0C 00 LDY #000C
00/01EE: B7 01 LDA [01],Y
00/01F0: 48 PHA
00/01F1: A0 0A 00 LDY #000A
00/01F4: B7 01 LDA [01],Y
00/01F6: 48 PHA
00/01F7: AD 28 00 LDA 0028
00/01FA: 48 PHA
00/01FB: AD 26 00 LDA 0026
00/01FE: 48 PHA
00/01FF: A2 10 13 LDX #1310
00/0202: 22 00 00 E1 JSL E10000 FindControl(@CtrlHVar,X,Y,@Wind):Part
00/0206: 68 PLA
00/0207: D0 01 BNE 020A {+01}
00/0209: 6B RTL
00/020A: 48 PHA
00/020B: A0 0C 00 LDY #000C
00/020E: B7 01 LDA [01],Y
00/0210: 48 PHA
00/0211: A0 0A 00 LDY #000A
00/0214: B7 01 LDA [01],Y
00/0216: 48 PHA
00/0217: F4 00 00 PEA 0000
00/021A: F4 00 00 PEA 0000
00/021D: AD 5B 02 LDA 025B
00/0220: 48 PHA
00/0221: AD 59 02 LDA 0259
00/0224: 48 PHA
00/0225: A2 10 15 LDX #1510
00/0228: 22 00 00 E1 JSL E10000 TrackControl(X,Y,@ActProc,CtrlH):Part
00/022C: 68 PLA
00/022D: D0 01 BNE 0230 {+01}
00/022F: 6B RTL
00/0230: 48 PHA
00/0231: AD 5B 02 LDA 025B
00/0234: 48 PHA
00/0235: AD 59 02 LDA 0259
00/0238: 48 PHA
00/0239: A2 10 1A LDX #1A10
00/023C: 22 00 00 E1 JSL E10000 GetCtlValue(CtrlH):Val
00/0240: 68 PLA
00/0241: 49 01 00 EOR #0001
00/0244: 8F 9F 00 00 STA 00009F
00/0248: 48 PHA
00/0249: AD 5B 02 LDA 025B
00/024C: 48 PHA
00/024D: AD 59 02 LDA 0259
00/0250: 48 PHA
00/0251: A2 10 19 LDX #1910
00/0254: 22 00 00 E1 JSL E10000 SetCtlValue(Val,CtrlH)
00/0258: 6B RTL
00/0259: 00 00 BRK 00
00/025B: 00 00 BRK 00
00/025D: 6B RTL
00/025E: 48 PHA
00/025F: 48 PHA
00/0260: A2 04 1C LDX #1C04
00/0263: 22 00 00 E1 JSL E10000 GetPort():@Port
00/0267: AD 28 00 LDA 0028
00/026A: 48 PHA
00/026B: AD 26 00 LDA 0026
00/026E: 48 PHA
00/026F: A2 04 1B LDX #1B04
00/0272: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/0276: 22 C8 02 00 JSL 0002C8
00/027A: A2 04 1B LDX #1B04
00/027D: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/0281: 6B RTL
00/0282: 8B PHB
00/0283: 4B PHK
00/0284: AB PLB
00/0285: 48 PHA
00/0286: 48 PHA
00/0287: A2 04 1C LDX #1C04
00/028A: 22 00 00 E1 JSL E10000 GetPort():@Port
00/028E: AD 28 00 LDA 0028
00/0291: 48 PHA
00/0292: AD 26 00 LDA 0026
00/0295: 48 PHA
00/0296: A2 04 1B LDX #1B04
00/0299: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/029D: AD 28 00 LDA 0028
00/02A0: 48 PHA
00/02A1: AD 26 00 LDA 0026
00/02A4: 48 PHA
00/02A5: A2 0E 1E LDX #1E0E
00/02A8: 22 00 00 E1 JSL E10000 BeginUpdate(@Wind)
00/02AC: 22 C8 02 00 JSL 0002C8
00/02B0: AD 28 00 LDA 0028
00/02B3: 48 PHA
00/02B4: AD 26 00 LDA 0026
00/02B7: 48 PHA
00/02B8: A2 0E 1F LDX #1F0E
00/02BB: 22 00 00 E1 JSL E10000 EndUpdate(@Wind)
00/02BF: A2 04 1B LDX #1B04
00/02C2: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/02C6: AB PLB
00/02C7: 6B RTL
00/02C8: AD 28 00 LDA 0028
00/02CB: 48 PHA
00/02CC: AD 26 00 LDA 0026
00/02CF: 48 PHA
00/02D0: A2 10 10 LDX #1010
00/02D3: 22 00 00 E1 JSL E10000 DrawControls(@Wind)
00/02D7: 6B RTL
00/02D8: F4 00 00 PEA 0000
00/02DB: F4 E6 02 PEA 02E6
00/02DE: A2 03 12 LDX #1203
00/02E1: 22 00 00 E1 JSL E10000 SetHeartBeat(@Task)
00/02E5: 6B RTL
00/02E6: 00 00 BRK 00
00/02E8: 00 00 BRK 00
00/02EA: 07 00 ORA [00]
00/02EC: 5A PHY
00/02ED: A5 08 LDA 08
00/02EF: C2 30 REP #30
00/02F1: A9 0A 00 LDA #000A
00/02F4: 8F EA 02 00 STA 0002EA
00/02F8: AF 9F 00 00 LDA 00009F
00/02FC: D0 03 BNE 0301 {+03}
00/02FE: 4C A1 03 JMP 03A1
00/0301: 48 PHA
00/0302: A2 04 17 LDX #1704
00/0305: 22 00 00 E1 JSL E10000 GetMasterSCB():SCB
00/0309: 68 PLA
00/030A: 29 80 00 AND #0080
00/030D: D0 2C BNE 033B {+2C}
00/030F: AF A2 9E E1 LDA E19EA2
00/0313: 48 PHA
00/0314: AF 82 9E E1 LDA E19E82
00/0318: 8F A2 9E E1 STA E19EA2
00/031C: AF 62 9E E1 LDA E19E62
00/0320: 8F 82 9E E1 STA E19E82
00/0324: AF 42 9E E1 LDA E19E42
00/0328: 8F 62 9E E1 STA E19E62
00/032C: AF 22 9E E1 LDA E19E22
00/0330: 8F 42 9E E1 STA E19E42
00/0334: 68 PLA
00/0335: 8F 22 9E E1 STA E19E22
00/0339: 80 66 BRA 03A1 {+66}
00/033B: AF A2 9E E1 LDA E19EA2
00/033F: 48 PHA
00/0340: AF 82 9E E1 LDA E19E82
00/0344: 8F A2 9E E1 STA E19EA2
00/0348: 8F AA 9E E1 STA E19EAA
00/034C: 8F B2 9E E1 STA E19EB2
00/0350: 8F BA 9E E1 STA E19EBA
00/0354: AF 62 9E E1 LDA E19E62
00/0358: 8F 82 9E E1 STA E19E82
00/035C: 8F 8A 9E E1 STA E19E8A
00/0360: 8F 92 9E E1 STA E19E92
00/0364: 8F 9A 9E E1 STA E19E9A
00/0368: AF 42 9E E1 LDA E19E42
00/036C: 8F 62 9E E1 STA E19E62
00/0370: 8F 6A 9E E1 STA E19E6A
00/0374: 8F 72 9E E1 STA E19E72
00/0378: 8F 7A 9E E1 STA E19E7A
00/037C: AF 22 9E E1 LDA E19E22
00/0380: 8F 42 9E E1 STA E19E42
00/0384: 8F 4A 9E E1 STA E19E4A
00/0388: 8F 52 9E E1 STA E19E52
00/038C: 8F 5A 9E E1 STA E19E5A
00/0390: 68 PLA
00/0391: 8F 22 9E E1 STA E19E22
00/0395: 8F 2A 9E E1 STA E19E2A
00/0399: 8F 32 9E E1 STA E19E32
00/039D: 8F 3A 9E E1 STA E19E3A
00/03A1: 28 PLP
00/03A2: 6B RTL
00/03A3: F5 04 SBC 04,X
00/03A5: 00 00 BRK 00
00/03A7: 00 A1 BRK A1
00/03A9: 00 F5 BRK F5
00/03AB: 04 00 TSB 00
00/03AD: 04 00 TSB 00
00/03AF: 46 01 LSR 01
00/03B1: F5 04 SBC 04,X
00/03B3: 00 08 BRK 08
00/03B5: 00 5E BRK 5E
00/03B7: 01 F5 ORA (F5,X)
00/03B9: 04 00 TSB 00
00/03BB: 0C 00 D8 TSB D800
00/03BE: 02 F5 COP F5
00/03C0: 04 00 TSB 00
00/03C2: 32 00 AND (00)
00/03C4: 7C 00 F5 JMP (F500,X)
00/03C7: 04 00 TSB 00
00/03C9: 68 PLA
00/03CA: 00 C8 BRK C8
00/03CC: 02 F5 COP F5
00/03CE: 02 F0 COP F0
00/03D0: B5 00 LDA 00,X
00/03D2: 2E 00 F5 ROL F500
00/03D5: 02 F0 COP F0
00/03D7: E3 00 SBC 00,S
00/03D9: 86 00 STX 00
00/03DB: F5 02 SBC 02,X
00/03DD: F0 E9 BEQ 03C8 {-17}
00/03DF: 00 8E BRK 8E
00/03E1: 00 F5 BRK F5
00/03E3: 04 00 TSB 00
00/03E5: 94 01 STY 01,X
00/03E7: 5D 02 F5 EOR F502,X
00/03EA: 04 00 TSB 00
00/03EC: 98 TYA
00/03ED: 01 B8 ORA (B8,X)
00/03EF: 01 F5 ORA (F5,X)
00/03F1: 04 00 TSB 00
00/03F3: 9C 01 5D STZ 5D01
00/03F6: 02 F5 COP F5
00/03F8: 04 00 TSB 00
00/03FA: A0 01 5D LDY #5D01
00/03FD: 02 F5 COP F5
00/03FF: 04 00 TSB 00
00/0401: A4 01 LDY 01
00/0403: 5D 02 F5 EOR F502,X
00/0406: 04 00 TSB 00
00/0408: A8 TAY
00/0409: 01 5D ORA (5D,X)
00/040B: 02 F5 COP F5
00/040D: 04 00 TSB 00
00/040F: AC 01 82 LDY 8201
00/0412: 02 F5 COP F5
00/0414: 04 00 TSB 00
00/0416: B0 01 BCS 0419 {+01}
00/0418: 5D 02 F5 EOR F502,X
00/041B: 04 00 TSB 00
00/041D: B4 01 LDY 01,X
00/041F: 5E 02 F5 LSR F502,X
00/0422: 02 F0 COP F0
00/0424: BA TSX
00/0425: 01 59 ORA (59,X)
00/0427: 02 F5 COP F5
00/0429: 02 F0 COP F0
00/042B: E6 01 INC 01
00/042D: 59 02 F5 EOR F502,Y
00/0430: 02 F0 COP F0
00/0432: D9 02 E6 CMP E602,Y
00/0435: 02 F7 COP F7
00/0437: 36 00 ROL 00,X
00/0439: 00 00 BRK 00
00/043B: 00 0B BRK 0B
00/043D: A8 TAY
00/043E: AD B0 B8 LDA B8B0
00/0441: C3 C7 CMP C7,S
00/0443: CA DEX
00/0444: CE DB DF DEC DFDB
00/0447: E6 EC INC EC
00/0449: 13 15 ORA (15,S),Y
00/044B: 19 1C 20 ORA 201C,Y
00/044E: 2B PLD
00/044F: 2F 3A 3F 7C AND 7C3F3A
00/0453: 7F 82 85 BD ADC BD8582,X
00/0457: D4 D7 PEI D7
00/0459: DC DF E9 JML (E9DF)
00/045C: F8 SED
00/045D: FC 11 1E JSR (1E11,X)
00/0460: 22 32 36 4A JSL 4A3632
00/0464: 4E 68 6C LSR 6C68
00/0467: 8F 93 9E A2 STA A29E93
00/046B: B1 B5 LDA (B5),Y
00/046D: C9 CD DC CMP #DCCD
00/0470: FF F7 0D 00 SBC 000DF7,X
00/0474: 00 00 BRK 00
00/0476: 01 81 ORA (81,X)
00/0478: 03 47 ORA 47,S
00/047A: 4D 52 88 EOR 8852
00/047D: 04 45 TSB 45
00/047F: 77 AD ADC [AD],Y
00/0481: F5 F9 SBC F9,X
00/0483: 00 00 BRK 00

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,3 @@
0000- 01 00 ORA ($00,X)
0002- 28 PLP
0003- 23 ???

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,961 @@
;
; OMF segment summary:
;
; #01: DATA len=0x000098 loadName='' segName='~ExpressLoad'
; #02: CODE len=0x0007ae loadName='' segName='main'
;
;
; Segment #1 (1): loadName='' segName='~ExpressLoad':
; type=DATA length=152 OMF v2.1
; flags: dynamic
;
OMF: LCONST record (0x004f bytes follow)
00/0000: 00 00 BRK 00
00/0002: 00 00 BRK 00
00/0004: 00 00 BRK 00
00/0006: 0A ASL
00/0007: 00 00 BRK 00
00/0009: 00 00 BRK 00
00/000B: 00 00 BRK 00
00/000D: 00 02 BRK 02
00/000F: 00 D8 BRK D8
00/0011: 00 00 BRK 00
00/0013: 00 31 BRK 31
00/0015: 06 00 ASL 00
00/0017: 00 09 BRK 09
00/0019: 07 00 ORA [00]
00/001B: 00 3C BRK 3C
00/001D: 01 00 ORA (00,X)
00/001F: 00 00 BRK 00
00/0021: 00 04 BRK 04
00/0023: 02 00 COP 00
00/0025: 00 01 BRK 01
00/0027: 00 00 BRK 00
00/0029: 00 00 BRK 00
00/002B: 00 00 BRK 00
00/002D: 00 00 BRK 00
00/002F: 00 00 BRK 00
00/0031: 00 00 BRK 00
00/0033: 00 00 BRK 00
00/0035: 00 02 BRK 02
00/0037: 00 00 BRK 00
00/0039: 00 00 BRK 00
00/003B: 00 2C BRK 2C
00/003D: 00 00 BRK 00
00/003F: 00 00 BRK 00
00/0041: 00 00 BRK 00
00/0043: 00 00 BRK 00
00/0045: 00 00 BRK 00
00/0047: 00 00 BRK 00
00/0049: 00 04 BRK 04
00/004B: 6D 61 69 ADC 6961
00/004E: 6E 00 00 ROR 0000
;
; Segment #2 (2): loadName='' segName='main':
; type=CODE length=1966 OMF v2.1
; flags:
;
OMF: LCONST record (0x0631 bytes follow)
00/0000: 00 00 BRK 00
00/0002: 0C 00 7C TSB 7C00
00/0005: 08 PHP
00/0006: 00 6B BRK 6B
00/0008: 43 00 EOR 00,S
00/000A: 00 00 BRK 00
00/000C: 50 00 BVC 000E {+00}
00/000E: 00 00 BRK 00
00/0010: 56 00 LSR 00,X
00/0012: 00 00 BRK 00
00/0014: 5C 00 00 00 JMP 000000
00/0018: 8A TXA
00/0019: 01 00 ORA (00,X)
00/001B: 00 1D BRK 1D
00/001D: 02 00 COP 00
00/001F: 00 53 BRK 53
00/0021: 02 00 COP 00
00/0023: 00 CA BRK CA
00/0025: 03 00 ORA 00,S
00/0027: 00 D0 BRK D0
00/0029: 03 00 ORA 00,S
00/002B: 00 E0 BRK E0
00/002D: 03 00 ORA 00,S
00/002F: 00 38 BRK 38
00/0031: 00 00 BRK 00
00/0033: 00 E6 BRK E6
00/0035: 03 00 ORA 00,S
00/0037: 00 A9 BRK A9
00/0039: 00 02 BRK 02
00/003B: 83 07 STA 07,S
00/003D: A9 00 00 LDA #0000
00/0040: 4C 2C 05 JMP 052C
00/0043: 20 30 04 JSR 0430
00/0046: 90 05 BCC 004D {+05}
00/0048: 48 PHA
00/0049: 20 FD 03 JSR 03FD
00/004C: 68 PLA
00/004D: 4C 0A 05 JMP 050A
00/0050: 20 30 04 JSR 0430
00/0053: 4C E1 04 JMP 04E1
00/0056: 20 30 04 JSR 0430
00/0059: 4C 2C 05 JMP 052C
00/005C: 20 30 04 JSR 0430
00/005F: 90 03 BCC 0064 {+03}
00/0061: 4C E1 04 JMP 04E1
00/0064: 0B PHD
00/0065: 8B PHB
00/0066: 4B PHK
00/0067: AB PLB
00/0068: A3 0E LDA 0E,S
00/006A: 8D 5F 01 STA 015F
00/006D: A3 10 LDA 10,S
00/006F: 8D 61 01 STA 0161
00/0072: A9 00 00 LDA #0000
00/0075: 48 PHA
00/0076: 48 PHA
00/0077: 48 PHA
00/0078: A2 0C 12 LDX #120C
00/007B: 22 00 00 E1 JSL E10000 GetInputDevice():Type,@drvr|Slot/4
00/007F: 68 PLA
00/0080: 8D 76 01 STA 0176
00/0083: 68 PLA
00/0084: 8D 78 01 STA 0178
00/0087: 68 PLA
00/0088: 8D 7A 01 STA 017A
00/008B: A9 00 00 LDA #0000
00/008E: 48 PHA
00/008F: 48 PHA
00/0090: A2 0C 0C LDX #0C0C
00/0093: 22 00 00 E1 JSL E10000 GetInGlobals():ANDmsk,ORmsk
00/0097: 68 PLA
00/0098: 8D 7C 01 STA 017C
00/009B: 68 PLA
00/009C: 8D 7E 01 STA 017E
00/009F: A9 00 00 LDA #0000
00/00A2: 48 PHA
00/00A3: 48 PHA
00/00A4: 48 PHA
00/00A5: A2 0C 13 LDX #130C
00/00A8: 22 00 00 E1 JSL E10000 GetOutputDevice():Type,@drvr|Slot/4
00/00AC: 68 PLA
00/00AD: 8D 80 01 STA 0180
00/00B0: 68 PLA
00/00B1: 8D 82 01 STA 0182
00/00B4: 68 PLA
00/00B5: 8D 84 01 STA 0184
00/00B8: A9 00 00 LDA #0000
00/00BB: 48 PHA
00/00BC: 48 PHA
00/00BD: A2 0C 0D LDX #0D0C
00/00C0: 22 00 00 E1 JSL E10000 GetOutGlobals():ANDmsk,ORmsk
00/00C4: 68 PLA
00/00C5: 8D 86 01 STA 0186
00/00C8: 68 PLA
00/00C9: 8D 88 01 STA 0188
00/00CC: F4 01 00 PEA 0001
00/00CF: F4 00 00 PEA 0000
00/00D2: F4 02 00 PEA 0002
00/00D5: A2 0C 0F LDX #0F0C
00/00D8: 22 00 00 E1 JSL E10000 SetInputDevice(Type,@drvr|Slot/4)
00/00DC: F4 FF FF PEA FFFF
00/00DF: F4 00 00 PEA 0000
00/00E2: A2 0C 09 LDX #090C
00/00E5: 22 00 00 E1 JSL E10000 SetInGlobals(ANDmsk,ORmsk)
00/00E9: F4 00 00 PEA 0000
00/00EC: A2 0C 15 LDX #150C
00/00EF: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/00F3: F4 01 00 PEA 0001
00/00F6: F4 00 00 PEA 0000
00/00F9: F4 02 00 PEA 0002
00/00FC: A2 0C 10 LDX #100C
00/00FF: 22 00 00 E1 JSL E10000 SetOutputDevice(Type,@drvr|Slot/4)
00/0103: F4 FF FF PEA FFFF
00/0106: F4 00 00 PEA 0000
00/0109: A2 0C 0A LDX #0A0C
00/010C: 22 00 00 E1 JSL E10000 SetOutGlobals(ANDmsk,ORmsk)
00/0110: F4 01 00 PEA 0001
00/0113: A2 0C 15 LDX #150C
00/0116: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/011A: F4 64 01 PEA 0164
00/011D: F4 64 01 PEA 0164
00/0120: F4 00 00 PEA 0000
00/0123: AD 63 01 LDA 0163
00/0126: 29 FF 00 AND #00FF
00/0129: 48 PHA
00/012A: A2 0C 1E LDX #1E0C
00/012D: 22 00 00 E1 JSL E10000 TextWriteBlock(@Text,Offset,Len)
00/0131: F4 72 01 PEA 0172
00/0134: F4 72 01 PEA 0172
00/0137: A2 0C 1C LDX #1C0C
00/013A: 22 00 00 E1 JSL E10000 WriteString(@Str)
00/013E: 22 47 01 00 JSL 000147
00/0142: AB PLB
00/0143: 2B PLD
00/0144: 4C E1 04 JMP 04E1
00/0147: AD 5F 01 LDA 015F
00/014A: 0D 61 01 ORA 0161
00/014D: D0 01 BNE 0150 {+01}
00/014F: 6B RTL
00/0150: AD 60 01 LDA 0160
00/0153: 48 PHA
00/0154: 8B PHB
00/0155: 68 PLA
00/0156: AD 5F 01 LDA 015F
00/0159: 38 SEC
00/015A: E9 01 00 SBC #0001
00/015D: 48 PHA
00/015E: 6B RTL
00/015F: 00 00 BRK 00
00/0161: 00 00 BRK 00
00/0163: 0E 09 43 ASL 4309
00/0166: 44 09 54 MVP 5409
00/0169: 09 46 44 ORA #4446
00/016C: 09 4D 44 ORA #444D
00/016F: 09 4C 44 ORA #444C
00/0172: 03 09 ORA 09,S
00/0174: 42 45 WDM 45
00/0176: 00 00 BRK 00
00/0178: 00 00 BRK 00
00/017A: 00 00 BRK 00
00/017C: 00 00 BRK 00
00/017E: 00 00 BRK 00
00/0180: 00 00 BRK 00
00/0182: 00 00 BRK 00
00/0184: 00 00 BRK 00
00/0186: 00 00 BRK 00
00/0188: 00 00 BRK 00
00/018A: 20 30 04 JSR 0430
00/018D: 90 03 BCC 0192 {+03}
00/018F: 4C F6 04 JMP 04F6
00/0192: 0B PHD
00/0193: 8B PHB
00/0194: 4B PHK
00/0195: AB PLB
00/0196: A3 0E LDA 0E,S
00/0198: 8D 14 02 STA 0214
00/019B: A3 0C LDA 0C,S
00/019D: 8D 12 02 STA 0212
00/01A0: A3 0A LDA 0A,S
00/01A2: 8D 16 02 STA 0216
00/01A5: A9 FF FF LDA #FFFF
00/01A8: 8D 18 02 STA 0218
00/01AB: A9 00 00 LDA #0000
00/01AE: 48 PHA
00/01AF: 48 PHA
00/01B0: 48 PHA
00/01B1: 48 PHA
00/01B2: 1A INC
00/01B3: 48 PHA
00/01B4: A9 C2 00 LDA #00C2
00/01B7: 48 PHA
00/01B8: A9 20 00 LDA #0020
00/01BB: 48 PHA
00/01BC: AF 10 C2 00 LDA 00C210
00/01C0: 18 CLC
00/01C1: 69 00 C2 ADC #C200
00/01C4: 48 PHA
00/01C5: A2 03 24 LDX #2403
00/01C8: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/01CC: 68 PLA
00/01CD: 68 PLA
00/01CE: 68 PLA
00/01CF: 68 PLA
00/01D0: EB XBA
00/01D1: 29 01 00 AND #0001
00/01D4: D0 0B BNE 01E1 {+0B}
00/01D6: AD 18 02 LDA 0218
00/01D9: 3A DEC
00/01DA: F0 22 BEQ 01FE {+22}
00/01DC: 8D 18 02 STA 0218
00/01DF: 80 CA BRA 01AB {-36}
00/01E1: 48 PHA
00/01E2: AD 14 02 LDA 0214
00/01E5: 48 PHA
00/01E6: AD 12 02 LDA 0212
00/01E9: 48 PHA
00/01EA: AD 16 02 LDA 0216
00/01ED: 48 PHA
00/01EE: A9 0D 00 LDA #000D
00/01F1: 48 PHA
00/01F2: A9 00 00 LDA #0000
00/01F5: 48 PHA
00/01F6: A2 0C 24 LDX #240C
00/01F9: 22 00 00 E1 JSL E10000 ReadLine(@Buff,Max,EOLch,EchoFlg):Count
00/01FD: 68 PLA
00/01FE: 83 10 STA 10,S
00/0200: F4 1A 02 PEA 021A
00/0203: F4 1A 02 PEA 021A
00/0206: A2 0C 1C LDX #1C0C
00/0209: 22 00 00 E1 JSL E10000 WriteString(@Str)
00/020D: AB PLB
00/020E: 2B PLD
00/020F: 4C F6 04 JMP 04F6
00/0212: 00 00 BRK 00
00/0214: 00 00 BRK 00
00/0216: 00 00 BRK 00
00/0218: 00 00 BRK 00
00/021A: 02 09 COP 09
00/021C: 5A PHY
00/021D: 20 30 04 JSR 0430
00/0220: 90 03 BCC 0225 {+03}
00/0222: 4C CA 04 JMP 04CA
00/0225: 0B PHD
00/0226: 8B PHB
00/0227: 4B PHK
00/0228: AB PLB
00/0229: A3 10 LDA 10,S
00/022B: 8D 5F 01 STA 015F
00/022E: A3 12 LDA 12,S
00/0230: 8D 61 01 STA 0161
00/0233: A3 0E LDA 0E,S
00/0235: 48 PHA
00/0236: A3 0E LDA 0E,S
00/0238: 48 PHA
00/0239: A3 0E LDA 0E,S
00/023B: AA TAX
00/023C: A9 00 00 LDA #0000
00/023F: 48 PHA
00/0240: DA PHX
00/0241: A2 0C 1E LDX #1E0C
00/0244: 22 00 00 E1 JSL E10000 TextWriteBlock(@Text,Offset,Len)
00/0248: 48 PHA
00/0249: 22 47 01 00 JSL 000147
00/024D: 68 PLA
00/024E: AB PLB
00/024F: 2B PLD
00/0250: 4C CA 04 JMP 04CA
00/0253: 20 30 04 JSR 0430
00/0256: 90 03 BCC 025B {+03}
00/0258: 4C 2C 05 JMP 052C
00/025B: 0B PHD
00/025C: 8B PHB
00/025D: 4B PHK
00/025E: AB PLB
00/025F: 08 PHP
00/0260: 78 SEI
00/0261: A9 00 00 LDA #0000
00/0264: 48 PHA
00/0265: 48 PHA
00/0266: 48 PHA
00/0267: 48 PHA
00/0268: A9 A4 03 LDA #03A4
00/026B: AA TAX
00/026C: 29 FF 00 AND #00FF
00/026F: 48 PHA
00/0270: 8A TXA
00/0271: EB XBA
00/0272: 29 FF 00 AND #00FF
00/0275: 48 PHA
00/0276: A9 A4 03 LDA #03A4
00/0279: 29 FF 00 AND #00FF
00/027C: 48 PHA
00/027D: AF 12 C2 00 LDA 00C212
00/0281: 18 CLC
00/0282: 69 00 C2 ADC #C200
00/0285: 48 PHA
00/0286: A2 03 24 LDX #2403
00/0289: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/028D: 68 PLA
00/028E: 68 PLA
00/028F: 68 PLA
00/0290: 68 PLA
00/0291: AD A8 03 LDA 03A8
00/0294: 8D B0 03 STA 03B0
00/0297: AD AA 03 LDA 03AA
00/029A: 29 7F FF AND #FF7F
00/029D: 8D B2 03 STA 03B2
00/02A0: A9 00 00 LDA #0000
00/02A3: 48 PHA
00/02A4: 48 PHA
00/02A5: 48 PHA
00/02A6: 48 PHA
00/02A7: A9 AC 03 LDA #03AC
00/02AA: AA TAX
00/02AB: 29 FF 00 AND #00FF
00/02AE: 48 PHA
00/02AF: 8A TXA
00/02B0: EB XBA
00/02B1: 29 FF 00 AND #00FF
00/02B4: 48 PHA
00/02B5: A9 AC 03 LDA #03AC
00/02B8: 29 FF 00 AND #00FF
00/02BB: 48 PHA
00/02BC: AF 12 C2 00 LDA 00C212
00/02C0: 18 CLC
00/02C1: 69 00 C2 ADC #C200
00/02C4: 48 PHA
00/02C5: A2 03 24 LDX #2403
00/02C8: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/02CC: 68 PLA
00/02CD: 68 PLA
00/02CE: 68 PLA
00/02CF: 68 PLA
00/02D0: 28 PLP
00/02D1: A9 00 00 LDA #0000
00/02D4: 48 PHA
00/02D5: 48 PHA
00/02D6: 48 PHA
00/02D7: 48 PHA
00/02D8: A9 B4 03 LDA #03B4
00/02DB: AA TAX
00/02DC: 29 FF 00 AND #00FF
00/02DF: 48 PHA
00/02E0: 8A TXA
00/02E1: EB XBA
00/02E2: 29 FF 00 AND #00FF
00/02E5: 48 PHA
00/02E6: A9 B4 03 LDA #03B4
00/02E9: 29 FF 00 AND #00FF
00/02EC: 48 PHA
00/02ED: AF 12 C2 00 LDA 00C212
00/02F1: 18 CLC
00/02F2: 69 00 C2 ADC #C200
00/02F5: 48 PHA
00/02F6: A2 03 24 LDX #2403
00/02F9: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/02FD: 68 PLA
00/02FE: 68 PLA
00/02FF: 68 PLA
00/0300: 68 PLA
00/0301: A9 00 00 LDA #0000
00/0304: 48 PHA
00/0305: 48 PHA
00/0306: 48 PHA
00/0307: 48 PHA
00/0308: A9 BE 03 LDA #03BE
00/030B: AA TAX
00/030C: 29 FF 00 AND #00FF
00/030F: 48 PHA
00/0310: 8A TXA
00/0311: EB XBA
00/0312: 29 FF 00 AND #00FF
00/0315: 48 PHA
00/0316: A9 BE 03 LDA #03BE
00/0319: 29 FF 00 AND #00FF
00/031C: 48 PHA
00/031D: AF 12 C2 00 LDA 00C212
00/0321: 18 CLC
00/0322: 69 00 C2 ADC #C200
00/0325: 48 PHA
00/0326: A2 03 24 LDX #2403
00/0329: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/032D: 68 PLA
00/032E: 68 PLA
00/032F: 68 PLA
00/0330: 68 PLA
00/0331: AD BC 03 LDA 03BC
00/0334: 3A DEC
00/0335: CD C2 03 CMP 03C2
00/0338: D0 C7 BNE 0301 {-39}
00/033A: F4 C6 03 PEA 03C6
00/033D: F4 C6 03 PEA 03C6
00/0340: A2 0C 1C LDX #1C0C
00/0343: 22 00 00 E1 JSL E10000 WriteString(@Str)
00/0347: AD 7A 01 LDA 017A
00/034A: 48 PHA
00/034B: AD 78 01 LDA 0178
00/034E: 48 PHA
00/034F: AD 76 01 LDA 0176
00/0352: 48 PHA
00/0353: A2 0C 0F LDX #0F0C
00/0356: 22 00 00 E1 JSL E10000 SetInputDevice(Type,@drvr|Slot/4)
00/035A: AD 7E 01 LDA 017E
00/035D: 48 PHA
00/035E: AD 7C 01 LDA 017C
00/0361: 48 PHA
00/0362: A2 0C 09 LDX #090C
00/0365: 22 00 00 E1 JSL E10000 SetInGlobals(ANDmsk,ORmsk)
00/0369: F4 00 00 PEA 0000
00/036C: A2 0C 15 LDX #150C
00/036F: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/0373: AD 84 01 LDA 0184
00/0376: 48 PHA
00/0377: AD 82 01 LDA 0182
00/037A: 48 PHA
00/037B: AD 80 01 LDA 0180
00/037E: 48 PHA
00/037F: A2 0C 10 LDX #100C
00/0382: 22 00 00 E1 JSL E10000 SetOutputDevice(Type,@drvr|Slot/4)
00/0386: AD 88 01 LDA 0188
00/0389: 48 PHA
00/038A: AD 86 01 LDA 0186
00/038D: 48 PHA
00/038E: A2 0C 0A LDX #0A0C
00/0391: 22 00 00 E1 JSL E10000 SetOutGlobals(ANDmsk,ORmsk)
00/0395: F4 01 00 PEA 0001
00/0398: A2 0C 15 LDX #150C
00/039B: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/039F: AB PLB
00/03A0: 2B PLD
00/03A1: 4C 2C 05 JMP 052C
00/03A4: 03 00 ORA 00,S
00/03A6: 00 00 BRK 00
00/03A8: 00 00 BRK 00
00/03AA: 00 00 BRK 00
00/03AC: 03 01 ORA 01,S
00/03AE: 00 00 BRK 00
00/03B0: 00 00 BRK 00
00/03B2: 00 00 BRK 00
00/03B4: 04 11 TSB 11
00/03B6: 00 00 BRK 00
00/03B8: 00 00 BRK 00
00/03BA: 00 00 BRK 00
00/03BC: 00 00 BRK 00
00/03BE: 04 17 TSB 17
00/03C0: 00 00 BRK 00
00/03C2: 00 00 BRK 00
00/03C4: 00 00 BRK 00
00/03C6: 03 09 ORA 09,S
00/03C8: 52 0D EOR (0D)
00/03CA: 20 30 04 JSR 0430
00/03CD: 4C 0A 05 JMP 050A
00/03D0: 20 30 04 JSR 0430
00/03D3: 90 03 BCC 03D8 {+03}
00/03D5: 4C CA 04 JMP 04CA
00/03D8: A9 00 00 LDA #0000
00/03DB: 83 14 STA 14,S
00/03DD: 4C CA 04 JMP 04CA
00/03E0: 20 30 04 JSR 0430
00/03E3: 4C CA 04 JMP 04CA
00/03E6: 20 30 04 JSR 0430
00/03E9: 90 0B BCC 03F6 {+0B}
00/03EB: A9 00 00 LDA #0000
00/03EE: 83 07 STA 07,S
00/03F0: A9 00 00 LDA #0000
00/03F3: 4C 2C 05 JMP 052C
00/03F6: A9 FF FF LDA #FFFF
00/03F9: 83 07 STA 07,S
00/03FB: 80 F3 BRA 03F0 {-0D}
00/03FD: A2 04 CA LDX #CA04
00/0400: 22 00 00 E1 JSL E10000 InitCursor()
00/0404: 48 PHA
00/0405: A2 04 17 LDX #1704
00/0408: 22 00 00 E1 JSL E10000 GetMasterSCB():SCB
00/040C: 68 PLA
00/040D: 48 PHA
00/040E: 29 80 00 AND #0080
00/0411: F0 08 BEQ 041B {+08}
00/0413: F4 30 05 PEA 0530
00/0416: F4 30 05 PEA 0530
00/0419: 80 06 BRA 0421 {+06}
00/041B: F4 B2 05 PEA 05B2
00/041E: F4 B2 05 PEA 05B2
00/0421: F4 00 00 PEA 0000
00/0424: F4 00 00 PEA 0000
00/0427: A2 15 18 LDX #1815
00/042A: 22 00 00 E1 JSL E10000 StopAlert(@AlertTmpl,@FiltProc):Hit
00/042E: 68 PLA
00/042F: 60 RTS
00/0430: AF 2D C0 E0 LDA E0C02D
00/0434: 29 04 00 AND #0004
00/0437: D0 2A BNE 0463 {+2A}
00/0439: 48 PHA
00/043A: 48 PHA
00/043B: 48 PHA
00/043C: 48 PHA
00/043D: 48 PHA
00/043E: 48 PHA
00/043F: 48 PHA
00/0440: A9 1F FE LDA #FE1F
00/0443: 48 PHA
00/0444: A2 03 24 LDX #2403
00/0447: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/044B: 68 PLA
00/044C: FA PLX
00/044D: FA PLX
00/044E: FA PLX
00/044F: 29 FF 00 AND #00FF
00/0452: C9 03 00 CMP #0003
00/0455: 90 11 BCC 0468 {+11}
00/0457: AF C0 01 E1 LDA E101C0
00/045B: 29 FF 00 AND #00FF
00/045E: C9 02 00 CMP #0002
00/0461: D0 05 BNE 0468 {+05}
00/0463: A9 02 13 LDA #1302
00/0466: 80 03 BRA 046B {+03}
00/0468: A9 00 00 LDA #0000
00/046B: C9 01 00 CMP #0001
00/046E: 60 RTS
00/046F: AA TAX
00/0470: A3 05 LDA 05,S
00/0472: 83 19 STA 19,S
00/0474: A3 03 LDA 03,S
00/0476: 83 17 STA 17,S
00/0478: A3 01 LDA 01,S
00/047A: 83 15 STA 15,S
00/047C: 3B TSC
00/047D: 18 CLC
00/047E: 69 14 00 ADC #0014
00/0481: 1B TCS
00/0482: 8A TXA
00/0483: 82 A6 00 BRL 052C {+A6}
00/0486: AA TAX
00/0487: A3 05 LDA 05,S
00/0489: 83 15 STA 15,S
00/048B: A3 03 LDA 03,S
00/048D: 83 13 STA 13,S
00/048F: A3 01 LDA 01,S
00/0491: 83 11 STA 11,S
00/0493: 3B TSC
00/0494: 18 CLC
00/0495: 69 10 00 ADC #0010
00/0498: 1B TCS
00/0499: 8A TXA
00/049A: 82 8F 00 BRL 052C {+8F}
00/049D: AA TAX
00/049E: A3 05 LDA 05,S
00/04A0: 83 13 STA 13,S
00/04A2: A3 03 LDA 03,S
00/04A4: 83 11 STA 11,S
00/04A6: A3 01 LDA 01,S
00/04A8: 83 0F STA 0F,S
00/04AA: 3B TSC
00/04AB: 18 CLC
00/04AC: 69 0E 00 ADC #000E
00/04AF: 1B TCS
00/04B0: 8A TXA
00/04B1: 82 78 00 BRL 052C {+78}
00/04B4: AA TAX
00/04B5: A3 05 LDA 05,S
00/04B7: 83 11 STA 11,S
00/04B9: A3 03 LDA 03,S
00/04BB: 83 0F STA 0F,S
00/04BD: A3 01 LDA 01,S
00/04BF: 83 0D STA 0D,S
00/04C1: 3B TSC
00/04C2: 18 CLC
00/04C3: 69 0C 00 ADC #000C
00/04C6: 1B TCS
00/04C7: 8A TXA
00/04C8: 80 62 BRA 052C {+62}
00/04CA: AA TAX
00/04CB: A3 05 LDA 05,S
00/04CD: 83 0F STA 0F,S
00/04CF: A3 03 LDA 03,S
00/04D1: 83 0D STA 0D,S
00/04D3: A3 01 LDA 01,S
00/04D5: 83 0B STA 0B,S
00/04D7: 3B TSC
00/04D8: 18 CLC
00/04D9: 69 0A 00 ADC #000A
00/04DC: 1B TCS
00/04DD: 8A TXA
00/04DE: 82 4B 00 BRL 052C {+4B}
00/04E1: AA TAX
00/04E2: A3 05 LDA 05,S
00/04E4: 83 0D STA 0D,S
00/04E6: A3 03 LDA 03,S
00/04E8: 83 0B STA 0B,S
00/04EA: A3 01 LDA 01,S
00/04EC: 83 09 STA 09,S
00/04EE: 68 PLA
00/04EF: 68 PLA
00/04F0: 68 PLA
00/04F1: 68 PLA
00/04F2: 8A TXA
00/04F3: 82 36 00 BRL 052C {+36}
00/04F6: AA TAX
00/04F7: A3 05 LDA 05,S
00/04F9: 83 0B STA 0B,S
00/04FB: A3 03 LDA 03,S
00/04FD: 83 09 STA 09,S
00/04FF: A3 01 LDA 01,S
00/0501: 83 07 STA 07,S
00/0503: 68 PLA
00/0504: 68 PLA
00/0505: 68 PLA
00/0506: 8A TXA
00/0507: 82 22 00 BRL 052C {+22}
00/050A: AA TAX
00/050B: A3 05 LDA 05,S
00/050D: 83 09 STA 09,S
00/050F: A3 03 LDA 03,S
00/0511: 83 07 STA 07,S
00/0513: A3 01 LDA 01,S
00/0515: 83 05 STA 05,S
00/0517: 68 PLA
00/0518: 68 PLA
00/0519: 8A TXA
00/051A: 82 0F 00 BRL 052C {+0F}
00/051D: AA TAX
00/051E: A3 05 LDA 05,S
00/0520: 83 07 STA 07,S
00/0522: A3 03 LDA 03,S
00/0524: 83 05 STA 05,S
00/0526: A3 01 LDA 01,S
00/0528: 83 03 STA 03,S
00/052A: 68 PLA
00/052B: 8A TXA
00/052C: C9 01 00 CMP #0001
00/052F: 6B RTL
00/0530: 1E 00 28 ASL 2800,X
00/0533: 00 4B BRK 4B
00/0535: 00 58 BRK 58
00/0537: 02 15 COP 15
00/0539: 05 80 ORA 80
00/053B: 80 80 BRA 04BD {-80}
00/053D: 80 4A BRA 0589 {+4A}
00/053F: 05 00 ORA 00
00/0541: 00 62 BRK 62
00/0543: 05 00 ORA 00
00/0545: 00 00 BRK 00
00/0547: 00 00 BRK 00
00/0549: 00 01 BRK 01
00/054B: 00 16 BRK 16
00/054D: 00 D6 BRK D6
00/054F: 01 00 ORA (00,X)
00/0551: 00 00 BRK 00
00/0553: 00 0A BRK 0A
00/0555: 00 7A BRK 7A
00/0557: 05 00 ORA 00
00/0559: 00 00 BRK 00
00/055B: 00 00 BRK 00
00/055D: 00 00 BRK 00
00/055F: 00 00 BRK 00
00/0561: 00 02 BRK 02
00/0563: 00 03 BRK 03
00/0565: 00 64 BRK 64
00/0567: 00 2B BRK 2B
00/0569: 00 90 BRK 90
00/056B: 01 10 ORA (10,X)
00/056D: 00 7D BRK 7D
00/056F: 05 00 ORA 00
00/0571: 00 35 BRK 35
00/0573: 00 00 BRK 00
00/0575: 00 00 BRK 00
00/0577: 00 00 BRK 00
00/0579: 00 02 BRK 02
00/057B: 4F 4B 0D 54 EOR 540D4B
00/057F: 68 PLA
00/0580: 65 20 ADC 20
00/0582: 6D 6F 64 ADC 646F
00/0585: 65 6D ADC 6D
00/0587: 20 70 6F JSR 6F70
00/058A: 72 74 ADC (74)
00/058C: 20 69 73 JSR 7369
00/058F: 20 6E 6F JSR 6F6E
00/0592: 74 20 STZ 20,X
00/0594: 73 65 ADC (65,S),Y
00/0596: 6C 65 63 JMP (6365)
00/0599: 74 65 STZ 65,X
00/059B: 64 0D STZ 0D
00/059D: 69 6E 20 ADC #206E
00/05A0: 74 68 STZ 68,X
00/05A2: 65 20 ADC 20
00/05A4: 43 6F EOR 6F,S
00/05A6: 6E 74 72 ROR 7274
00/05A9: 6F 6C 20 50 ADC 50206C
00/05AD: 61 6E ADC (6E,X)
00/05AF: 65 6C ADC 6C
00/05B1: 2E 1E 00 ROL 001E
00/05B4: 0A ASL
00/05B5: 00 5F BRK 5F
00/05B7: 00 36 BRK 36
00/05B9: 01 15 ORA (15,X)
00/05BB: 05 80 ORA 80
00/05BD: 80 80 BRA 053F {-80}
00/05BF: 80 CC BRA 058D {-34}
00/05C1: 05 00 ORA 00
00/05C3: 00 E4 BRK E4
00/05C5: 05 00 ORA 00
00/05C7: 00 00 BRK 00
00/05C9: 00 00 BRK 00
00/05CB: 00 01 BRK 01
00/05CD: 00 2D BRK 2D
00/05CF: 00 EB BRK EB
00/05D1: 00 00 BRK 00
00/05D3: 00 00 BRK 00
00/05D5: 00 0A BRK 0A
00/05D7: 00 7A BRK 7A
00/05D9: 05 00 ORA 00
00/05DB: 00 00 BRK 00
00/05DD: 00 00 BRK 00
00/05DF: 00 00 BRK 00
00/05E1: 00 00 BRK 00
00/05E3: 00 02 BRK 02
00/05E5: 00 03 BRK 03
00/05E7: 00 37 BRK 37
00/05E9: 00 3F BRK 3F
00/05EB: 00 E1 BRK E1
00/05ED: 00 10 BRK 10
00/05EF: 00 FC BRK FC
00/05F1: 05 00 ORA 00
00/05F3: 00 35 BRK 35
00/05F5: 00 00 BRK 00
00/05F7: 00 00 BRK 00
00/05F9: 00 00 BRK 00
00/05FB: 00 0D BRK 0D
00/05FD: 54 68 65 MVN 6568
00/0600: 20 6D 6F JSR 6F6D
00/0603: 64 65 STZ 65
00/0605: 6D 20 70 ADC 7020
00/0608: 6F 72 74 20 ADC 207472
00/060C: 69 73 20 ADC #2073
00/060F: 6E 6F 74 ROR 746F
00/0612: 0D 73 65 ORA 6573
00/0615: 6C 65 63 JMP (6365)
00/0618: 74 65 STZ 65,X
00/061A: 64 20 STZ 20
00/061C: 69 6E 20 ADC #206E
00/061F: 74 68 STZ 68,X
00/0621: 65 20 ADC 20
00/0623: 43 6F EOR 6F,S
00/0625: 6E 74 72 ROR 7274
00/0628: 6F 6C 0D 50 ADC 500D6C
00/062C: 61 6E ADC (6E,X)
00/062E: 65 6C ADC 6C
00/0630: 2E F5 04 ROL 04F5
00/0633: 00 08 BRK 08
00/0635: 00 43 BRK 43
00/0637: 00 F5 BRK F5
00/0639: 04 00 TSB 00
00/063B: 0C 00 50 TSB 5000
00/063E: 00 F5 BRK F5
00/0640: 04 00 TSB 00
00/0642: 10 00 BPL 0644 {+00}
00/0644: 56 00 LSR 00,X
00/0646: F5 04 SBC 04,X
00/0648: 00 14 BRK 14
00/064A: 00 5C BRK 5C
00/064C: 00 F5 BRK F5
00/064E: 04 00 TSB 00
00/0650: 18 CLC
00/0651: 00 8A BRK 8A
00/0653: 01 F5 ORA (F5,X)
00/0655: 04 00 TSB 00
00/0657: 1C 00 1D TRB 1D00
00/065A: 02 F5 COP F5
00/065C: 04 00 TSB 00
00/065E: 20 00 53 JSR 5300
00/0661: 02 F5 COP F5
00/0663: 04 00 TSB 00
00/0665: 24 00 BIT 00
00/0667: CA DEX
00/0668: 03 F5 ORA F5,S
00/066A: 04 00 TSB 00
00/066C: 28 PLP
00/066D: 00 D0 BRK D0
00/066F: 03 F5 ORA F5,S
00/0671: 04 00 TSB 00
00/0673: 2C 00 E0 BIT E000
00/0676: 03 F5 ORA F5,S
00/0678: 04 00 TSB 00
00/067A: 30 00 BMI 067C {+00}
00/067C: 38 SEC
00/067D: 00 F5 BRK F5
00/067F: 04 00 TSB 00
00/0681: 34 00 BIT 00,X
00/0683: E6 03 INC 03
00/0685: F5 02 SBC 02,X
00/0687: F0 1B BEQ 06A4 {+1B}
00/0689: 01 64 ORA (64,X)
00/068B: 01 F5 ORA (F5,X)
00/068D: 02 F0 COP F0
00/068F: 32 01 AND (01)
00/0691: 72 01 ADC (01)
00/0693: F5 02 SBC 02,X
00/0695: F0 01 BEQ 0698 {+01}
00/0697: 02 1A COP 1A
00/0699: 02 F5 COP F5
00/069B: 02 F0 COP F0
00/069D: 77 02 ADC [02],Y
00/069F: A4 03 LDY 03
00/06A1: F5 02 SBC 02,X
00/06A3: F0 B6 BEQ 065B {-4A}
00/06A5: 02 AC COP AC
00/06A7: 03 F5 ORA F5,S
00/06A9: 02 F0 COP F0
00/06AB: E7 02 SBC [02]
00/06AD: B4 03 LDY 03,X
00/06AF: F5 02 SBC 02,X
00/06B1: F0 17 BEQ 06CA {+17}
00/06B3: 03 BE ORA BE,S
00/06B5: 03 F5 ORA F5,S
00/06B7: 02 F0 COP F0
00/06B9: 3B TSC
00/06BA: 03 C6 ORA C6,S
00/06BC: 03 F5 ORA F5,S
00/06BE: 02 F0 COP F0
00/06C0: 14 04 TRB 04
00/06C2: 30 05 BMI 06C9 {+05}
00/06C4: F5 02 SBC 02,X
00/06C6: F0 1C BEQ 06E4 {+1C}
00/06C8: 04 B2 TSB B2
00/06CA: 05 F5 ORA F5
00/06CC: 04 00 TSB 00
00/06CE: 3E 05 4A ROL 4A05,X
00/06D1: 05 F5 ORA F5
00/06D3: 04 00 TSB 00
00/06D5: 42 05 WDM 05
00/06D7: 62 05 F5 PER FBDF {-AFB}
00/06DA: 04 00 TSB 00
00/06DC: 56 05 LSR 05,X
00/06DE: 7A PLY
00/06DF: 05 F5 ORA F5
00/06E1: 04 00 TSB 00
00/06E3: 6E 05 7D ROR 7D05
00/06E6: 05 F5 ORA F5
00/06E8: 04 00 TSB 00
00/06EA: C0 05 CC CPY #CC05
00/06ED: 05 F5 ORA F5
00/06EF: 04 00 TSB 00
00/06F1: C4 05 CPY 05
00/06F3: E4 05 CPX 05
00/06F5: F5 04 SBC 04,X
00/06F7: 00 D8 BRK D8
00/06F9: 05 7A ORA 7A
00/06FB: 05 F5 ORA F5
00/06FD: 04 00 TSB 00
00/06FF: F0 05 BEQ 0706 {+05}
00/0701: FC 05 F7 JSR (F705,X)
00/0704: 5A PHY
00/0705: 00 00 BRK 00
00/0707: 00 00 BRK 00
00/0709: 16 05 ASL 05,X
00/070B: 41 44 EOR (44,X)
00/070D: 4A LSR
00/070E: 4E 51 54 LSR 5451
00/0711: 57 5A EOR [5A],Y
00/0713: 5D 62 6B EOR 6B62,X
00/0716: 70 81 BVS 0699 {-7F}
00/0718: 85 89 STA 89
00/071A: 99 9D AE STA AE9D,Y
00/071D: B2 B6 LDA (B6)
00/071F: C6 CA DEC CA
00/0721: 12 1E ORA (1E)
00/0723: 24 35 BIT 35
00/0725: 45 48 EOR 48
00/0727: 4B PHK
00/0728: 51 57 EOR (57),Y
00/072A: 8B PHB
00/072B: 90 99 BCC 06C6 {-67}
00/072D: 9E A3 A9 STZ A9A3,X
00/0730: D7 DD CMP [DD],Y
00/0732: E3 E7 SBC E7,S
00/0734: EB XBA
00/0735: 0F 04 10 1E ORA 1E1004
00/0739: 23 2C AND 2C,S
00/073B: 31 51 AND (51),Y
00/073D: 54 59 69 MVN 6959
00/0740: 92 95 STA (95)
00/0742: 98 TYA
00/0743: 9E A8 D9 STZ D9A8,X
00/0746: 17 09 ORA [09],Y
00/0748: 32 36 AND (36)
00/074A: 3E 48 4C ROL 4C48,X
00/074D: 50 5B BVC 07AA {+5B}
00/074F: 5F 74 78 7C EOR 7C7874,X
00/0753: 87 8B STA [8B]
00/0755: A2 CB CE LDX #CECB
00/0758: D1 D6 CMP (D6),Y
00/075A: DE E1 E4 DEC E4E1,X
00/075D: E7 F4 SBC [F4]
00/075F: 01 17 ORA (17,X)
00/0761: 1F F7 06 00 ORA 0006F7,X
00/0765: 00 00 BRK 00
00/0767: 01 81 ORA (81,X)
00/0769: 00 3F BRK 3F
00/076B: 00 4A BRK 4A
00/076D: 00 00 BRK 00

View File

@ -0,0 +1,963 @@
;
; OMF segment summary:
;
; #01: DATA len=0x000098 loadName='' segName='~ExpressLoad'
; #02: CODE len=0x0007b2 loadName='' segName='main'
;
;
; Segment #1 (1): loadName='' segName='~ExpressLoad':
; type=DATA length=152 OMF v2.1
; flags: dynamic
;
OMF: LCONST record (0x004f bytes follow)
00/0000: 00 00 BRK 00
00/0002: 00 00 BRK 00
00/0004: 00 00 BRK 00
00/0006: 0A ASL
00/0007: 00 00 BRK 00
00/0009: 00 00 BRK 00
00/000B: 00 00 BRK 00
00/000D: 00 02 BRK 02
00/000F: 00 D8 BRK D8
00/0011: 00 00 BRK 00
00/0013: 00 35 BRK 35
00/0015: 06 00 ASL 00
00/0017: 00 0D BRK 0D
00/0019: 07 00 ORA [00]
00/001B: 00 3C BRK 3C
00/001D: 01 00 ORA (00,X)
00/001F: 00 00 BRK 00
00/0021: 00 04 BRK 04
00/0023: 02 00 COP 00
00/0025: 00 01 BRK 01
00/0027: 00 00 BRK 00
00/0029: 00 00 BRK 00
00/002B: 00 00 BRK 00
00/002D: 00 00 BRK 00
00/002F: 00 00 BRK 00
00/0031: 00 00 BRK 00
00/0033: 00 00 BRK 00
00/0035: 00 02 BRK 02
00/0037: 00 00 BRK 00
00/0039: 00 00 BRK 00
00/003B: 00 2C BRK 2C
00/003D: 00 00 BRK 00
00/003F: 00 00 BRK 00
00/0041: 00 00 BRK 00
00/0043: 00 00 BRK 00
00/0045: 00 00 BRK 00
00/0047: 00 00 BRK 00
00/0049: 00 04 BRK 04
00/004B: 6D 61 69 ADC 6961
00/004E: 6E 00 00 ROR 0000
;
; Segment #2 (2): loadName='' segName='main':
; type=CODE length=1970 OMF v2.1
; flags:
;
OMF: LCONST record (0x0635 bytes follow)
00/0000: 00 00 BRK 00
00/0002: 0C 00 7C TSB 7C00
00/0005: 08 PHP
00/0006: 00 6B BRK 6B
00/0008: 43 00 EOR 00,S
00/000A: 00 00 BRK 00
00/000C: 50 00 BVC 000E {+00}
00/000E: 00 00 BRK 00
00/0010: 56 00 LSR 00,X
00/0012: 00 00 BRK 00
00/0014: 5C 00 00 00 JMP 000000
00/0018: 8A TXA
00/0019: 01 00 ORA (00,X)
00/001B: 00 1D BRK 1D
00/001D: 02 00 COP 00
00/001F: 00 53 BRK 53
00/0021: 02 00 COP 00
00/0023: 00 CA BRK CA
00/0025: 03 00 ORA 00,S
00/0027: 00 D0 BRK D0
00/0029: 03 00 ORA 00,S
00/002B: 00 E0 BRK E0
00/002D: 03 00 ORA 00,S
00/002F: 00 38 BRK 38
00/0031: 00 00 BRK 00
00/0033: 00 E6 BRK E6
00/0035: 03 00 ORA 00,S
00/0037: 00 A9 BRK A9
00/0039: 00 02 BRK 02
00/003B: 83 07 STA 07,S
00/003D: A9 00 00 LDA #0000
00/0040: 4C 2C 05 JMP 052C
00/0043: 20 FD 03 JSR 03FD
00/0046: 90 05 BCC 004D {+05}
00/0048: 48 PHA
00/0049: 20 3C 04 JSR 043C
00/004C: 68 PLA
00/004D: 4C 0A 05 JMP 050A
00/0050: 20 FD 03 JSR 03FD
00/0053: 4C E1 04 JMP 04E1
00/0056: 20 FD 03 JSR 03FD
00/0059: 4C 2C 05 JMP 052C
00/005C: 20 FD 03 JSR 03FD
00/005F: 90 03 BCC 0064 {+03}
00/0061: 4C E1 04 JMP 04E1
00/0064: 0B PHD
00/0065: 8B PHB
00/0066: 4B PHK
00/0067: AB PLB
00/0068: A3 0E LDA 0E,S
00/006A: 8D 5F 01 STA 015F
00/006D: A3 10 LDA 10,S
00/006F: 8D 61 01 STA 0161
00/0072: A9 00 00 LDA #0000
00/0075: 48 PHA
00/0076: 48 PHA
00/0077: 48 PHA
00/0078: A2 0C 12 LDX #120C
00/007B: 22 00 00 E1 JSL E10000 GetInputDevice():Type,@drvr|Slot/4
00/007F: 68 PLA
00/0080: 8D 76 01 STA 0176
00/0083: 68 PLA
00/0084: 8D 78 01 STA 0178
00/0087: 68 PLA
00/0088: 8D 7A 01 STA 017A
00/008B: A9 00 00 LDA #0000
00/008E: 48 PHA
00/008F: 48 PHA
00/0090: A2 0C 0C LDX #0C0C
00/0093: 22 00 00 E1 JSL E10000 GetInGlobals():ANDmsk,ORmsk
00/0097: 68 PLA
00/0098: 8D 7C 01 STA 017C
00/009B: 68 PLA
00/009C: 8D 7E 01 STA 017E
00/009F: A9 00 00 LDA #0000
00/00A2: 48 PHA
00/00A3: 48 PHA
00/00A4: 48 PHA
00/00A5: A2 0C 13 LDX #130C
00/00A8: 22 00 00 E1 JSL E10000 GetOutputDevice():Type,@drvr|Slot/4
00/00AC: 68 PLA
00/00AD: 8D 80 01 STA 0180
00/00B0: 68 PLA
00/00B1: 8D 82 01 STA 0182
00/00B4: 68 PLA
00/00B5: 8D 84 01 STA 0184
00/00B8: A9 00 00 LDA #0000
00/00BB: 48 PHA
00/00BC: 48 PHA
00/00BD: A2 0C 0D LDX #0D0C
00/00C0: 22 00 00 E1 JSL E10000 GetOutGlobals():ANDmsk,ORmsk
00/00C4: 68 PLA
00/00C5: 8D 86 01 STA 0186
00/00C8: 68 PLA
00/00C9: 8D 88 01 STA 0188
00/00CC: F4 01 00 PEA 0001
00/00CF: F4 00 00 PEA 0000
00/00D2: F4 01 00 PEA 0001
00/00D5: A2 0C 0F LDX #0F0C
00/00D8: 22 00 00 E1 JSL E10000 SetInputDevice(Type,@drvr|Slot/4)
00/00DC: F4 FF FF PEA FFFF
00/00DF: F4 00 00 PEA 0000
00/00E2: A2 0C 09 LDX #090C
00/00E5: 22 00 00 E1 JSL E10000 SetInGlobals(ANDmsk,ORmsk)
00/00E9: F4 00 00 PEA 0000
00/00EC: A2 0C 15 LDX #150C
00/00EF: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/00F3: F4 01 00 PEA 0001
00/00F6: F4 00 00 PEA 0000
00/00F9: F4 01 00 PEA 0001
00/00FC: A2 0C 10 LDX #100C
00/00FF: 22 00 00 E1 JSL E10000 SetOutputDevice(Type,@drvr|Slot/4)
00/0103: F4 FF FF PEA FFFF
00/0106: F4 00 00 PEA 0000
00/0109: A2 0C 0A LDX #0A0C
00/010C: 22 00 00 E1 JSL E10000 SetOutGlobals(ANDmsk,ORmsk)
00/0110: F4 01 00 PEA 0001
00/0113: A2 0C 15 LDX #150C
00/0116: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/011A: F4 64 01 PEA 0164
00/011D: F4 64 01 PEA 0164
00/0120: F4 00 00 PEA 0000
00/0123: AD 63 01 LDA 0163
00/0126: 29 FF 00 AND #00FF
00/0129: 48 PHA
00/012A: A2 0C 1E LDX #1E0C
00/012D: 22 00 00 E1 JSL E10000 TextWriteBlock(@Text,Offset,Len)
00/0131: F4 72 01 PEA 0172
00/0134: F4 72 01 PEA 0172
00/0137: A2 0C 1C LDX #1C0C
00/013A: 22 00 00 E1 JSL E10000 WriteString(@Str)
00/013E: 22 47 01 00 JSL 000147
00/0142: AB PLB
00/0143: 2B PLD
00/0144: 4C E1 04 JMP 04E1
00/0147: AD 5F 01 LDA 015F
00/014A: 0D 61 01 ORA 0161
00/014D: D0 01 BNE 0150 {+01}
00/014F: 6B RTL
00/0150: AD 60 01 LDA 0160
00/0153: 48 PHA
00/0154: 8B PHB
00/0155: 68 PLA
00/0156: AD 5F 01 LDA 015F
00/0159: 38 SEC
00/015A: E9 01 00 SBC #0001
00/015D: 48 PHA
00/015E: 6B RTL
00/015F: 00 00 BRK 00
00/0161: 00 00 BRK 00
00/0163: 0E 09 43 ASL 4309
00/0166: 44 09 54 MVP 5409
00/0169: 09 46 44 ORA #4446
00/016C: 09 4D 44 ORA #444D
00/016F: 09 4C 44 ORA #444C
00/0172: 03 09 ORA 09,S
00/0174: 42 45 WDM 45
00/0176: 00 00 BRK 00
00/0178: 00 00 BRK 00
00/017A: 00 00 BRK 00
00/017C: 00 00 BRK 00
00/017E: 00 00 BRK 00
00/0180: 00 00 BRK 00
00/0182: 00 00 BRK 00
00/0184: 00 00 BRK 00
00/0186: 00 00 BRK 00
00/0188: 00 00 BRK 00
00/018A: 20 FD 03 JSR 03FD
00/018D: 90 03 BCC 0192 {+03}
00/018F: 4C F6 04 JMP 04F6
00/0192: 0B PHD
00/0193: 8B PHB
00/0194: 4B PHK
00/0195: AB PLB
00/0196: A3 0E LDA 0E,S
00/0198: 8D 14 02 STA 0214
00/019B: A3 0C LDA 0C,S
00/019D: 8D 12 02 STA 0212
00/01A0: A3 0A LDA 0A,S
00/01A2: 8D 16 02 STA 0216
00/01A5: A9 FF FF LDA #FFFF
00/01A8: 8D 18 02 STA 0218
00/01AB: A9 00 00 LDA #0000
00/01AE: 48 PHA
00/01AF: 48 PHA
00/01B0: 48 PHA
00/01B1: 48 PHA
00/01B2: 1A INC
00/01B3: 48 PHA
00/01B4: A9 C1 00 LDA #00C1
00/01B7: 48 PHA
00/01B8: A9 10 00 LDA #0010
00/01BB: 48 PHA
00/01BC: AF 10 C1 00 LDA 00C110
00/01C0: 18 CLC
00/01C1: 69 00 C1 ADC #C100
00/01C4: 48 PHA
00/01C5: A2 03 24 LDX #2403
00/01C8: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/01CC: 68 PLA
00/01CD: 68 PLA
00/01CE: 68 PLA
00/01CF: 68 PLA
00/01D0: EB XBA
00/01D1: 29 01 00 AND #0001
00/01D4: D0 0B BNE 01E1 {+0B}
00/01D6: AD 18 02 LDA 0218
00/01D9: 3A DEC
00/01DA: F0 22 BEQ 01FE {+22}
00/01DC: 8D 18 02 STA 0218
00/01DF: 80 CA BRA 01AB {-36}
00/01E1: 48 PHA
00/01E2: AD 14 02 LDA 0214
00/01E5: 48 PHA
00/01E6: AD 12 02 LDA 0212
00/01E9: 48 PHA
00/01EA: AD 16 02 LDA 0216
00/01ED: 48 PHA
00/01EE: A9 0D 00 LDA #000D
00/01F1: 48 PHA
00/01F2: A9 00 00 LDA #0000
00/01F5: 48 PHA
00/01F6: A2 0C 24 LDX #240C
00/01F9: 22 00 00 E1 JSL E10000 ReadLine(@Buff,Max,EOLch,EchoFlg):Count
00/01FD: 68 PLA
00/01FE: 83 10 STA 10,S
00/0200: F4 1A 02 PEA 021A
00/0203: F4 1A 02 PEA 021A
00/0206: A2 0C 1C LDX #1C0C
00/0209: 22 00 00 E1 JSL E10000 WriteString(@Str)
00/020D: AB PLB
00/020E: 2B PLD
00/020F: 4C F6 04 JMP 04F6
00/0212: 00 00 BRK 00
00/0214: 00 00 BRK 00
00/0216: 00 00 BRK 00
00/0218: 00 00 BRK 00
00/021A: 02 09 COP 09
00/021C: 5A PHY
00/021D: 20 FD 03 JSR 03FD
00/0220: 90 03 BCC 0225 {+03}
00/0222: 4C CA 04 JMP 04CA
00/0225: 0B PHD
00/0226: 8B PHB
00/0227: 4B PHK
00/0228: AB PLB
00/0229: A3 10 LDA 10,S
00/022B: 8D 5F 01 STA 015F
00/022E: A3 12 LDA 12,S
00/0230: 8D 61 01 STA 0161
00/0233: A3 0E LDA 0E,S
00/0235: 48 PHA
00/0236: A3 0E LDA 0E,S
00/0238: 48 PHA
00/0239: A3 0E LDA 0E,S
00/023B: AA TAX
00/023C: A9 00 00 LDA #0000
00/023F: 48 PHA
00/0240: DA PHX
00/0241: A2 0C 1E LDX #1E0C
00/0244: 22 00 00 E1 JSL E10000 TextWriteBlock(@Text,Offset,Len)
00/0248: 48 PHA
00/0249: 22 47 01 00 JSL 000147
00/024D: 68 PLA
00/024E: AB PLB
00/024F: 2B PLD
00/0250: 4C CA 04 JMP 04CA
00/0253: 20 FD 03 JSR 03FD
00/0256: 90 03 BCC 025B {+03}
00/0258: 4C 2C 05 JMP 052C
00/025B: 0B PHD
00/025C: 8B PHB
00/025D: 4B PHK
00/025E: AB PLB
00/025F: 08 PHP
00/0260: 78 SEI
00/0261: A9 00 00 LDA #0000
00/0264: 48 PHA
00/0265: 48 PHA
00/0266: 48 PHA
00/0267: 48 PHA
00/0268: A9 A4 03 LDA #03A4
00/026B: AA TAX
00/026C: 29 FF 00 AND #00FF
00/026F: 48 PHA
00/0270: 8A TXA
00/0271: EB XBA
00/0272: 29 FF 00 AND #00FF
00/0275: 48 PHA
00/0276: A9 A4 03 LDA #03A4
00/0279: 29 FF 00 AND #00FF
00/027C: 48 PHA
00/027D: AF 12 C1 00 LDA 00C112
00/0281: 18 CLC
00/0282: 69 00 C1 ADC #C100
00/0285: 48 PHA
00/0286: A2 03 24 LDX #2403
00/0289: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/028D: 68 PLA
00/028E: 68 PLA
00/028F: 68 PLA
00/0290: 68 PLA
00/0291: AD A8 03 LDA 03A8
00/0294: 8D B0 03 STA 03B0
00/0297: AD AA 03 LDA 03AA
00/029A: 29 7F FF AND #FF7F
00/029D: 8D B2 03 STA 03B2
00/02A0: A9 00 00 LDA #0000
00/02A3: 48 PHA
00/02A4: 48 PHA
00/02A5: 48 PHA
00/02A6: 48 PHA
00/02A7: A9 AC 03 LDA #03AC
00/02AA: AA TAX
00/02AB: 29 FF 00 AND #00FF
00/02AE: 48 PHA
00/02AF: 8A TXA
00/02B0: EB XBA
00/02B1: 29 FF 00 AND #00FF
00/02B4: 48 PHA
00/02B5: A9 AC 03 LDA #03AC
00/02B8: 29 FF 00 AND #00FF
00/02BB: 48 PHA
00/02BC: AF 12 C1 00 LDA 00C112
00/02C0: 18 CLC
00/02C1: 69 00 C1 ADC #C100
00/02C4: 48 PHA
00/02C5: A2 03 24 LDX #2403
00/02C8: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/02CC: 68 PLA
00/02CD: 68 PLA
00/02CE: 68 PLA
00/02CF: 68 PLA
00/02D0: 28 PLP
00/02D1: A9 00 00 LDA #0000
00/02D4: 48 PHA
00/02D5: 48 PHA
00/02D6: 48 PHA
00/02D7: 48 PHA
00/02D8: A9 B4 03 LDA #03B4
00/02DB: AA TAX
00/02DC: 29 FF 00 AND #00FF
00/02DF: 48 PHA
00/02E0: 8A TXA
00/02E1: EB XBA
00/02E2: 29 FF 00 AND #00FF
00/02E5: 48 PHA
00/02E6: A9 B4 03 LDA #03B4
00/02E9: 29 FF 00 AND #00FF
00/02EC: 48 PHA
00/02ED: AF 12 C1 00 LDA 00C112
00/02F1: 18 CLC
00/02F2: 69 00 C1 ADC #C100
00/02F5: 48 PHA
00/02F6: A2 03 24 LDX #2403
00/02F9: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/02FD: 68 PLA
00/02FE: 68 PLA
00/02FF: 68 PLA
00/0300: 68 PLA
00/0301: A9 00 00 LDA #0000
00/0304: 48 PHA
00/0305: 48 PHA
00/0306: 48 PHA
00/0307: 48 PHA
00/0308: A9 BE 03 LDA #03BE
00/030B: AA TAX
00/030C: 29 FF 00 AND #00FF
00/030F: 48 PHA
00/0310: 8A TXA
00/0311: EB XBA
00/0312: 29 FF 00 AND #00FF
00/0315: 48 PHA
00/0316: A9 BE 03 LDA #03BE
00/0319: 29 FF 00 AND #00FF
00/031C: 48 PHA
00/031D: AF 12 C1 00 LDA 00C112
00/0321: 18 CLC
00/0322: 69 00 C1 ADC #C100
00/0325: 48 PHA
00/0326: A2 03 24 LDX #2403
00/0329: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/032D: 68 PLA
00/032E: 68 PLA
00/032F: 68 PLA
00/0330: 68 PLA
00/0331: AD BC 03 LDA 03BC
00/0334: 3A DEC
00/0335: CD C2 03 CMP 03C2
00/0338: D0 C7 BNE 0301 {-39}
00/033A: F4 C6 03 PEA 03C6
00/033D: F4 C6 03 PEA 03C6
00/0340: A2 0C 1C LDX #1C0C
00/0343: 22 00 00 E1 JSL E10000 WriteString(@Str)
00/0347: AD 7A 01 LDA 017A
00/034A: 48 PHA
00/034B: AD 78 01 LDA 0178
00/034E: 48 PHA
00/034F: AD 76 01 LDA 0176
00/0352: 48 PHA
00/0353: A2 0C 0F LDX #0F0C
00/0356: 22 00 00 E1 JSL E10000 SetInputDevice(Type,@drvr|Slot/4)
00/035A: AD 7E 01 LDA 017E
00/035D: 48 PHA
00/035E: AD 7C 01 LDA 017C
00/0361: 48 PHA
00/0362: A2 0C 09 LDX #090C
00/0365: 22 00 00 E1 JSL E10000 SetInGlobals(ANDmsk,ORmsk)
00/0369: F4 00 00 PEA 0000
00/036C: A2 0C 15 LDX #150C
00/036F: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/0373: AD 84 01 LDA 0184
00/0376: 48 PHA
00/0377: AD 82 01 LDA 0182
00/037A: 48 PHA
00/037B: AD 80 01 LDA 0180
00/037E: 48 PHA
00/037F: A2 0C 10 LDX #100C
00/0382: 22 00 00 E1 JSL E10000 SetOutputDevice(Type,@drvr|Slot/4)
00/0386: AD 88 01 LDA 0188
00/0389: 48 PHA
00/038A: AD 86 01 LDA 0186
00/038D: 48 PHA
00/038E: A2 0C 0A LDX #0A0C
00/0391: 22 00 00 E1 JSL E10000 SetOutGlobals(ANDmsk,ORmsk)
00/0395: F4 01 00 PEA 0001
00/0398: A2 0C 15 LDX #150C
00/039B: 22 00 00 E1 JSL E10000 InitTextDev(dev)
00/039F: AB PLB
00/03A0: 2B PLD
00/03A1: 4C 2C 05 JMP 052C
00/03A4: 03 00 ORA 00,S
00/03A6: 00 00 BRK 00
00/03A8: 00 00 BRK 00
00/03AA: 00 00 BRK 00
00/03AC: 03 01 ORA 01,S
00/03AE: 00 00 BRK 00
00/03B0: 00 00 BRK 00
00/03B2: 00 00 BRK 00
00/03B4: 04 11 TSB 11
00/03B6: 00 00 BRK 00
00/03B8: 00 00 BRK 00
00/03BA: 00 00 BRK 00
00/03BC: 00 00 BRK 00
00/03BE: 04 17 TSB 17
00/03C0: 00 00 BRK 00
00/03C2: 00 00 BRK 00
00/03C4: 00 00 BRK 00
00/03C6: 03 09 ORA 09,S
00/03C8: 52 0D EOR (0D)
00/03CA: 20 FD 03 JSR 03FD
00/03CD: 4C 0A 05 JMP 050A
00/03D0: 20 FD 03 JSR 03FD
00/03D3: 90 03 BCC 03D8 {+03}
00/03D5: 4C CA 04 JMP 04CA
00/03D8: A9 00 00 LDA #0000
00/03DB: 83 14 STA 14,S
00/03DD: 4C CA 04 JMP 04CA
00/03E0: 20 FD 03 JSR 03FD
00/03E3: 4C CA 04 JMP 04CA
00/03E6: 20 FD 03 JSR 03FD
00/03E9: 90 0B BCC 03F6 {+0B}
00/03EB: A9 00 00 LDA #0000
00/03EE: 83 07 STA 07,S
00/03F0: A9 00 00 LDA #0000
00/03F3: 4C 2C 05 JMP 052C
00/03F6: A9 FF FF LDA #FFFF
00/03F9: 83 07 STA 07,S
00/03FB: 80 F3 BRA 03F0 {-0D}
00/03FD: AF 2D C0 E0 LDA E0C02D
00/0401: 29 02 00 AND #0002
00/0404: D0 2A BNE 0430 {+2A}
00/0406: 48 PHA
00/0407: 48 PHA
00/0408: 48 PHA
00/0409: 48 PHA
00/040A: 48 PHA
00/040B: 48 PHA
00/040C: 48 PHA
00/040D: A9 1F FE LDA #FE1F
00/0410: 48 PHA
00/0411: A2 03 24 LDX #2403
00/0414: 22 00 00 E1 JSL E10000 FWEntry(A,X,Y,Address):P,A,X,Y
00/0418: 68 PLA
00/0419: FA PLX
00/041A: FA PLX
00/041B: FA PLX
00/041C: 29 FF 00 AND #00FF
00/041F: C9 03 00 CMP #0003
00/0422: 90 11 BCC 0435 {+11}
00/0424: AF C0 01 E1 LDA E101C0
00/0428: 29 FF 00 AND #00FF
00/042B: C9 01 00 CMP #0001
00/042E: D0 05 BNE 0435 {+05}
00/0430: A9 02 13 LDA #1302
00/0433: 80 03 BRA 0438 {+03}
00/0435: A9 00 00 LDA #0000
00/0438: C9 01 00 CMP #0001
00/043B: 60 RTS
00/043C: A2 04 CA LDX #CA04
00/043F: 22 00 00 E1 JSL E10000 InitCursor()
00/0443: 48 PHA
00/0444: A2 04 17 LDX #1704
00/0447: 22 00 00 E1 JSL E10000 GetMasterSCB():SCB
00/044B: 68 PLA
00/044C: 48 PHA
00/044D: 29 80 00 AND #0080
00/0450: F0 08 BEQ 045A {+08}
00/0452: F4 30 05 PEA 0530
00/0455: F4 30 05 PEA 0530
00/0458: 80 06 BRA 0460 {+06}
00/045A: F4 B4 05 PEA 05B4
00/045D: F4 B4 05 PEA 05B4
00/0460: F4 00 00 PEA 0000
00/0463: F4 00 00 PEA 0000
00/0466: A2 15 18 LDX #1815
00/0469: 22 00 00 E1 JSL E10000 StopAlert(@AlertTmpl,@FiltProc):Hit
00/046D: 68 PLA
00/046E: 60 RTS
00/046F: AA TAX
00/0470: A3 05 LDA 05,S
00/0472: 83 19 STA 19,S
00/0474: A3 03 LDA 03,S
00/0476: 83 17 STA 17,S
00/0478: A3 01 LDA 01,S
00/047A: 83 15 STA 15,S
00/047C: 3B TSC
00/047D: 18 CLC
00/047E: 69 14 00 ADC #0014
00/0481: 1B TCS
00/0482: 8A TXA
00/0483: 82 A6 00 BRL 052C {+A6}
00/0486: AA TAX
00/0487: A3 05 LDA 05,S
00/0489: 83 15 STA 15,S
00/048B: A3 03 LDA 03,S
00/048D: 83 13 STA 13,S
00/048F: A3 01 LDA 01,S
00/0491: 83 11 STA 11,S
00/0493: 3B TSC
00/0494: 18 CLC
00/0495: 69 10 00 ADC #0010
00/0498: 1B TCS
00/0499: 8A TXA
00/049A: 82 8F 00 BRL 052C {+8F}
00/049D: AA TAX
00/049E: A3 05 LDA 05,S
00/04A0: 83 13 STA 13,S
00/04A2: A3 03 LDA 03,S
00/04A4: 83 11 STA 11,S
00/04A6: A3 01 LDA 01,S
00/04A8: 83 0F STA 0F,S
00/04AA: 3B TSC
00/04AB: 18 CLC
00/04AC: 69 0E 00 ADC #000E
00/04AF: 1B TCS
00/04B0: 8A TXA
00/04B1: 82 78 00 BRL 052C {+78}
00/04B4: AA TAX
00/04B5: A3 05 LDA 05,S
00/04B7: 83 11 STA 11,S
00/04B9: A3 03 LDA 03,S
00/04BB: 83 0F STA 0F,S
00/04BD: A3 01 LDA 01,S
00/04BF: 83 0D STA 0D,S
00/04C1: 3B TSC
00/04C2: 18 CLC
00/04C3: 69 0C 00 ADC #000C
00/04C6: 1B TCS
00/04C7: 8A TXA
00/04C8: 80 62 BRA 052C {+62}
00/04CA: AA TAX
00/04CB: A3 05 LDA 05,S
00/04CD: 83 0F STA 0F,S
00/04CF: A3 03 LDA 03,S
00/04D1: 83 0D STA 0D,S
00/04D3: A3 01 LDA 01,S
00/04D5: 83 0B STA 0B,S
00/04D7: 3B TSC
00/04D8: 18 CLC
00/04D9: 69 0A 00 ADC #000A
00/04DC: 1B TCS
00/04DD: 8A TXA
00/04DE: 82 4B 00 BRL 052C {+4B}
00/04E1: AA TAX
00/04E2: A3 05 LDA 05,S
00/04E4: 83 0D STA 0D,S
00/04E6: A3 03 LDA 03,S
00/04E8: 83 0B STA 0B,S
00/04EA: A3 01 LDA 01,S
00/04EC: 83 09 STA 09,S
00/04EE: 68 PLA
00/04EF: 68 PLA
00/04F0: 68 PLA
00/04F1: 68 PLA
00/04F2: 8A TXA
00/04F3: 82 36 00 BRL 052C {+36}
00/04F6: AA TAX
00/04F7: A3 05 LDA 05,S
00/04F9: 83 0B STA 0B,S
00/04FB: A3 03 LDA 03,S
00/04FD: 83 09 STA 09,S
00/04FF: A3 01 LDA 01,S
00/0501: 83 07 STA 07,S
00/0503: 68 PLA
00/0504: 68 PLA
00/0505: 68 PLA
00/0506: 8A TXA
00/0507: 82 22 00 BRL 052C {+22}
00/050A: AA TAX
00/050B: A3 05 LDA 05,S
00/050D: 83 09 STA 09,S
00/050F: A3 03 LDA 03,S
00/0511: 83 07 STA 07,S
00/0513: A3 01 LDA 01,S
00/0515: 83 05 STA 05,S
00/0517: 68 PLA
00/0518: 68 PLA
00/0519: 8A TXA
00/051A: 82 0F 00 BRL 052C {+0F}
00/051D: AA TAX
00/051E: A3 05 LDA 05,S
00/0520: 83 07 STA 07,S
00/0522: A3 03 LDA 03,S
00/0524: 83 05 STA 05,S
00/0526: A3 01 LDA 01,S
00/0528: 83 03 STA 03,S
00/052A: 68 PLA
00/052B: 8A TXA
00/052C: C9 01 00 CMP #0001
00/052F: 6B RTL
00/0530: 1E 00 28 ASL 2800,X
00/0533: 00 4B BRK 4B
00/0535: 00 58 BRK 58
00/0537: 02 15 COP 15
00/0539: 05 80 ORA 80
00/053B: 80 80 BRA 04BD {-80}
00/053D: 80 4A BRA 0589 {+4A}
00/053F: 05 00 ORA 00
00/0541: 00 62 BRK 62
00/0543: 05 00 ORA 00
00/0545: 00 00 BRK 00
00/0547: 00 00 BRK 00
00/0549: 00 01 BRK 01
00/054B: 00 16 BRK 16
00/054D: 00 D6 BRK D6
00/054F: 01 00 ORA (00,X)
00/0551: 00 00 BRK 00
00/0553: 00 0A BRK 0A
00/0555: 00 7A BRK 7A
00/0557: 05 00 ORA 00
00/0559: 00 00 BRK 00
00/055B: 00 00 BRK 00
00/055D: 00 00 BRK 00
00/055F: 00 00 BRK 00
00/0561: 00 02 BRK 02
00/0563: 00 03 BRK 03
00/0565: 00 64 BRK 64
00/0567: 00 2B BRK 2B
00/0569: 00 90 BRK 90
00/056B: 01 10 ORA (10,X)
00/056D: 00 7D BRK 7D
00/056F: 05 00 ORA 00
00/0571: 00 37 BRK 37
00/0573: 00 00 BRK 00
00/0575: 00 00 BRK 00
00/0577: 00 00 BRK 00
00/0579: 00 02 BRK 02
00/057B: 4F 4B 0D 54 EOR 540D4B
00/057F: 68 PLA
00/0580: 65 20 ADC 20
00/0582: 70 72 BVS 05F6 {+72}
00/0584: 69 6E 74 ADC #746E
00/0587: 65 72 ADC 72
00/0589: 20 70 6F JSR 6F70
00/058C: 72 74 ADC (74)
00/058E: 20 69 73 JSR 7369
00/0591: 20 6E 6F JSR 6F6E
00/0594: 74 20 STZ 20,X
00/0596: 73 65 ADC (65,S),Y
00/0598: 6C 65 63 JMP (6365)
00/059B: 74 65 STZ 65,X
00/059D: 64 0D STZ 0D
00/059F: 69 6E 20 ADC #206E
00/05A2: 74 68 STZ 68,X
00/05A4: 65 20 ADC 20
00/05A6: 43 6F EOR 6F,S
00/05A8: 6E 74 72 ROR 7274
00/05AB: 6F 6C 20 50 ADC 50206C
00/05AF: 61 6E ADC (6E,X)
00/05B1: 65 6C ADC 6C
00/05B3: 2E 1E 00 ROL 001E
00/05B6: 0A ASL
00/05B7: 00 5F BRK 5F
00/05B9: 00 36 BRK 36
00/05BB: 01 15 ORA (15,X)
00/05BD: 05 80 ORA 80
00/05BF: 80 80 BRA 0541 {-80}
00/05C1: 80 CE BRA 0591 {-32}
00/05C3: 05 00 ORA 00
00/05C5: 00 E6 BRK E6
00/05C7: 05 00 ORA 00
00/05C9: 00 00 BRK 00
00/05CB: 00 00 BRK 00
00/05CD: 00 01 BRK 01
00/05CF: 00 2D BRK 2D
00/05D1: 00 EB BRK EB
00/05D3: 00 00 BRK 00
00/05D5: 00 00 BRK 00
00/05D7: 00 0A BRK 0A
00/05D9: 00 7A BRK 7A
00/05DB: 05 00 ORA 00
00/05DD: 00 00 BRK 00
00/05DF: 00 00 BRK 00
00/05E1: 00 00 BRK 00
00/05E3: 00 00 BRK 00
00/05E5: 00 02 BRK 02
00/05E7: 00 03 BRK 03
00/05E9: 00 37 BRK 37
00/05EB: 00 3F BRK 3F
00/05ED: 00 E1 BRK E1
00/05EF: 00 10 BRK 10
00/05F1: 00 FE BRK FE
00/05F3: 05 00 ORA 00
00/05F5: 00 37 BRK 37
00/05F7: 00 00 BRK 00
00/05F9: 00 00 BRK 00
00/05FB: 00 00 BRK 00
00/05FD: 00 0D BRK 0D
00/05FF: 54 68 65 MVN 6568
00/0602: 20 70 72 JSR 7270
00/0605: 69 6E 74 ADC #746E
00/0608: 65 72 ADC 72
00/060A: 20 70 6F JSR 6F70
00/060D: 72 74 ADC (74)
00/060F: 20 69 73 JSR 7369
00/0612: 20 6E 6F JSR 6F6E
00/0615: 74 0D STZ 0D,X
00/0617: 73 65 ADC (65,S),Y
00/0619: 6C 65 63 JMP (6365)
00/061C: 74 65 STZ 65,X
00/061E: 64 20 STZ 20
00/0620: 69 6E 20 ADC #206E
00/0623: 74 68 STZ 68,X
00/0625: 65 20 ADC 20
00/0627: 43 6F EOR 6F,S
00/0629: 6E 74 72 ROR 7274
00/062C: 6F 6C 0D 50 ADC 500D6C
00/0630: 61 6E ADC (6E,X)
00/0632: 65 6C ADC 6C
00/0634: 2E F5 04 ROL 04F5
00/0637: 00 08 BRK 08
00/0639: 00 43 BRK 43
00/063B: 00 F5 BRK F5
00/063D: 04 00 TSB 00
00/063F: 0C 00 50 TSB 5000
00/0642: 00 F5 BRK F5
00/0644: 04 00 TSB 00
00/0646: 10 00 BPL 0648 {+00}
00/0648: 56 00 LSR 00,X
00/064A: F5 04 SBC 04,X
00/064C: 00 14 BRK 14
00/064E: 00 5C BRK 5C
00/0650: 00 F5 BRK F5
00/0652: 04 00 TSB 00
00/0654: 18 CLC
00/0655: 00 8A BRK 8A
00/0657: 01 F5 ORA (F5,X)
00/0659: 04 00 TSB 00
00/065B: 1C 00 1D TRB 1D00
00/065E: 02 F5 COP F5
00/0660: 04 00 TSB 00
00/0662: 20 00 53 JSR 5300
00/0665: 02 F5 COP F5
00/0667: 04 00 TSB 00
00/0669: 24 00 BIT 00
00/066B: CA DEX
00/066C: 03 F5 ORA F5,S
00/066E: 04 00 TSB 00
00/0670: 28 PLP
00/0671: 00 D0 BRK D0
00/0673: 03 F5 ORA F5,S
00/0675: 04 00 TSB 00
00/0677: 2C 00 E0 BIT E000
00/067A: 03 F5 ORA F5,S
00/067C: 04 00 TSB 00
00/067E: 30 00 BMI 0680 {+00}
00/0680: 38 SEC
00/0681: 00 F5 BRK F5
00/0683: 04 00 TSB 00
00/0685: 34 00 BIT 00,X
00/0687: E6 03 INC 03
00/0689: F5 02 SBC 02,X
00/068B: F0 1B BEQ 06A8 {+1B}
00/068D: 01 64 ORA (64,X)
00/068F: 01 F5 ORA (F5,X)
00/0691: 02 F0 COP F0
00/0693: 32 01 AND (01)
00/0695: 72 01 ADC (01)
00/0697: F5 02 SBC 02,X
00/0699: F0 01 BEQ 069C {+01}
00/069B: 02 1A COP 1A
00/069D: 02 F5 COP F5
00/069F: 02 F0 COP F0
00/06A1: 77 02 ADC [02],Y
00/06A3: A4 03 LDY 03
00/06A5: F5 02 SBC 02,X
00/06A7: F0 B6 BEQ 065F {-4A}
00/06A9: 02 AC COP AC
00/06AB: 03 F5 ORA F5,S
00/06AD: 02 F0 COP F0
00/06AF: E7 02 SBC [02]
00/06B1: B4 03 LDY 03,X
00/06B3: F5 02 SBC 02,X
00/06B5: F0 17 BEQ 06CE {+17}
00/06B7: 03 BE ORA BE,S
00/06B9: 03 F5 ORA F5,S
00/06BB: 02 F0 COP F0
00/06BD: 3B TSC
00/06BE: 03 C6 ORA C6,S
00/06C0: 03 F5 ORA F5,S
00/06C2: 02 F0 COP F0
00/06C4: 53 04 EOR (04,S),Y
00/06C6: 30 05 BMI 06CD {+05}
00/06C8: F5 02 SBC 02,X
00/06CA: F0 5B BEQ 0727 {+5B}
00/06CC: 04 B4 TSB B4
00/06CE: 05 F5 ORA F5
00/06D0: 04 00 TSB 00
00/06D2: 3E 05 4A ROL 4A05,X
00/06D5: 05 F5 ORA F5
00/06D7: 04 00 TSB 00
00/06D9: 42 05 WDM 05
00/06DB: 62 05 F5 PER FBE3 {-AFB}
00/06DE: 04 00 TSB 00
00/06E0: 56 05 LSR 05,X
00/06E2: 7A PLY
00/06E3: 05 F5 ORA F5
00/06E5: 04 00 TSB 00
00/06E7: 6E 05 7D ROR 7D05
00/06EA: 05 F5 ORA F5
00/06EC: 04 00 TSB 00
00/06EE: C2 05 REP #05
00/06F0: CE 05 F5 DEC F505
00/06F3: 04 00 TSB 00
00/06F5: C6 05 DEC 05
00/06F7: E6 05 INC 05
00/06F9: F5 04 SBC 04,X
00/06FB: 00 DA BRK DA
00/06FD: 05 7A ORA 7A
00/06FF: 05 F5 ORA F5
00/0701: 04 00 TSB 00
00/0703: F2 05 SBC (05)
00/0705: FE 05 F7 INC F705,X
00/0708: 5A PHY
00/0709: 00 00 BRK 00
00/070B: 00 00 BRK 00
00/070D: 16 05 ASL 05,X
00/070F: 41 44 EOR (44,X)
00/0711: 4A LSR
00/0712: 4E 51 54 LSR 5451
00/0715: 57 5A EOR [5A],Y
00/0717: 5D 62 6B EOR 6B62,X
00/071A: 70 81 BVS 069D {-7F}
00/071C: 85 89 STA 89
00/071E: 99 9D AE STA AE9D,Y
00/0721: B2 B6 LDA (B6)
00/0723: C6 CA DEC CA
00/0725: 12 1E ORA (1E)
00/0727: 24 35 BIT 35
00/0729: 45 48 EOR 48
00/072B: 4B PHK
00/072C: 51 57 EOR (57),Y
00/072E: 8B PHB
00/072F: 90 99 BCC 06CA {-67}
00/0731: 9E A3 A9 STZ A9A3,X
00/0734: D7 DD CMP [DD],Y
00/0736: E3 E7 SBC E7,S
00/0738: EB XBA
00/0739: 0F 04 10 1E ORA 1E1004
00/073D: 23 2C AND 2C,S
00/073F: 31 51 AND (51),Y
00/0741: 54 59 69 MVN 6959
00/0744: 92 95 STA (95)
00/0746: 98 TYA
00/0747: 9E A8 D9 STZ D9A8,X
00/074A: 17 09 ORA [09],Y
00/074C: 32 36 AND (36)
00/074E: 3E 48 4C ROL 4C48,X
00/0751: 50 5B BVC 07AE {+5B}
00/0753: 5F 74 78 7C EOR 7C7874,X
00/0757: 87 8B STA [8B]
00/0759: A2 CB CE LDX #CECB
00/075C: D1 D6 CMP (D6),Y
00/075E: DE E1 E4 DEC E4E1,X
00/0761: E7 F4 SBC [F4]
00/0763: 01 56 ORA (56,X)
00/0765: 5E F7 06 LSR 06F7,X
00/0768: 00 00 BRK 00
00/076A: 00 01 BRK 01
00/076C: 81 00 STA (00,X)
00/076E: 3F 00 4A 00 AND 004A00,X

View File

@ -0,0 +1,104 @@
0000- 0B ???
0001- 4C 61 73 JMP $7361
0004- 65 72 ADC $72
0006- 57 ???
0007- 72 69 ADC ($69)
0009- 74 65 STZ $65,X
000B- 72 2E ADC ($2E)
000D- 4E 45 57 LSR $5745
0010- 00 BRK
0011- 00 BRK
0012- 00 BRK
0013- 00 BRK
0014- 00 BRK
0015- 00 BRK
0016- 00 BRK
0017- 00 BRK
0018- 00 BRK
0019- 00 BRK
001A- 00 BRK
001B- 00 BRK
001C- 00 BRK
001D- 00 BRK
001E- 00 BRK
001F- 00 BRK
0020- 00 BRK
0021- 0B ???
0022- 49 6D EOR #$6D
0024- 61 67 ADC ($67,X)
0026- 65 57 ADC $57
0028- 72 69 ADC ($69)
002A- 74 65 STZ $65,X
002C- 72 07 ADC ($07)
002E- 50 72 BVC $00A2
0030- 69 6E ADC #$6E
0032- 74 65 STZ $65,X
0034- 72 05 ADC ($05)
0036- 4D 6F 64 EOR $646F
0039- 65 6D ADC $6D
003B- 0E 49 6D ASL $6D49
003E- 61 67 ADC ($67,X)
0040- 65 57 ADC $57
0042- 07 ???
0043- 50 72 BVC $00B7
0045- 69 6E ADC #$6E
0047- 74 65 STZ $65,X
0049- 72 05 ADC ($05)
004B- 4D 6F 64 EOR $646F
004E- 65 6D ADC $6D
0050- 0E 49 6D ASL $6D49
0053- 61 67 ADC ($67,X)
0055- 65 57 ADC $57
0057- 72 69 ADC ($69)
0059- 74 65 STZ $65,X
005B- 72 2E ADC ($2E)
005D- 4C 51 64 JMP $6451
0060- 8D 77 68 STA $6877
0063- 0E 4A 6F ASL $6F4A
0066- 68 PLA
0067- 6E 20 51 ROR $5120
006A- 2E 20 50 ROL $5020
006D- 75 62 ADC $62,X
006F- 6C 69 63 JMP ($6369)
0072- 00 BRK
0073- 0B ???
0074- 33 ???
0075- 2D 48 6F AND $6F48
0078- 6C 65 20 JMP ($2065)
007B- 44 ???
007C- 69 6C ADC #$6C
007E- 6C 20 53 JMP ($5320)
0081- 70 6F BVS $00F2
0083- 6F ???
0084- 6C 65 72 JMP ($7265)
0087- 69 74 ADC #$74
0089- 65 72 ADC $72
008B- 01 2A ORA ($2A,X)
008D- 00 BRK
008E- 00 BRK
008F- 00 BRK
0090- 00 BRK
0091- 00 BRK
0092- 00 BRK
0093- 00 BRK
0094- 0A ASL
0095- 47 ???
0096- 75 6D ADC $6D,X
0098- 62 ???
0099- 79 20 5A ADC $5A20,Y
009C- 6F ???
009D- 6E 65 01 ROR $0165
00A0- C0 08 CPY #$08
00A2- C0 09 CPY #$09
00A4- C0 00 CPY #$00
00A6- 80 01 BRA $00A9
00A8- 80 08 BRA $00B2
00AA- 80 09 BRA $00B5
00AC- 80 A0 BRA $004E
00AE- 18 CLC
00AF- 00 BRK
00B0- B7 ???
00B1- 10 8D BPL $0040
00B3- B1 6A LDA ($6A),Y
00B5- 00 BRK
00B6- 00 BRK

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,729 @@
;
; OMF segment summary:
;
; #01: DATA len=0x000098 loadName='' segName='~ExpressLoad'
; #02: CODE len=0x0005cd loadName='' segName='main'
;
;
; Segment #1 (1): loadName='' segName='~ExpressLoad':
; type=DATA length=152 OMF v2.1
; flags: dynamic
;
OMF: LCONST record (0x004f bytes follow)
00/0000: 00 00 BRK 00
00/0002: 00 00 BRK 00
00/0004: 00 00 BRK 00
00/0006: 0A ASL
00/0007: 00 00 BRK 00
00/0009: 00 00 BRK 00
00/000B: 00 00 BRK 00
00/000D: 00 02 BRK 02
00/000F: 00 D8 BRK D8
00/0011: 00 00 BRK 00
00/0013: 00 1F BRK 1F
00/0015: 05 00 ORA 00
00/0017: 00 F7 BRK F7
00/0019: 05 00 ORA 00
00/001B: 00 6D BRK 6D
00/001D: 00 00 BRK 00
00/001F: 00 00 BRK 00
00/0021: 00 04 BRK 04
00/0023: 02 00 COP 00
00/0025: 00 01 BRK 01
00/0027: 00 00 BRK 00
00/0029: 00 00 BRK 00
00/002B: 00 00 BRK 00
00/002D: 00 00 BRK 00
00/002F: 00 00 BRK 00
00/0031: 00 00 BRK 00
00/0033: 00 00 BRK 00
00/0035: 00 02 BRK 02
00/0037: 00 00 BRK 00
00/0039: 00 00 BRK 00
00/003B: 00 2C BRK 2C
00/003D: 00 00 BRK 00
00/003F: 00 00 BRK 00
00/0041: 00 00 BRK 00
00/0043: 00 00 BRK 00
00/0045: 00 00 BRK 00
00/0047: 00 00 BRK 00
00/0049: 00 04 BRK 04
00/004B: 6D 61 69 ADC 6961
00/004E: 6E 00 00 ROR 0000
;
; Segment #2 (2): loadName='' segName='main':
; type=CODE length=1485 OMF v2.1
; flags:
;
OMF: LCONST record (0x051f bytes follow)
00/0000: 46 53 LSR 53
00/0002: 54 20 82 MVN 8220
00/0005: 00 00 BRK 00
00/0007: 00 90 BRK 90
00/0009: 00 00 BRK 00
00/000B: 00 09 BRK 09
00/000D: 00 00 BRK 00
00/000F: C0 00 03 CPY #0300
00/0012: 00 00 BRK 00
00/0014: 00 00 BRK 00
00/0016: 00 00 BRK 00
00/0018: 00 00 BRK 00
00/001A: 00 00 BRK 00
00/001C: 00 00 BRK 00
00/001E: 00 00 BRK 00
00/0020: 00 00 BRK 00
00/0022: 00 00 BRK 00
00/0024: 0D 43 68 ORA 6843
00/0027: 61 72 ADC (72,X)
00/0029: 61 63 ADC (63,X)
00/002B: 74 65 STZ 65,X
00/002D: 72 20 ADC (20)
00/002F: 46 53 LSR 53
00/0031: 54 20 43 MVN 4320
00/0034: 68 PLA
00/0035: 61 72 ADC (72,X)
00/0037: 61 63 ADC (63,X)
00/0039: 74 65 STZ 65,X
00/003B: 72 20 ADC (20)
00/003D: 46 53 LSR 53
00/003F: 54 20 20 MVN 2020
00/0042: 20 20 20 JSR 2020
00/0045: 20 20 20 JSR 2020
00/0048: 20 76 30 JSR 3076
00/004B: 33 2E AND (2E,S),Y
00/004D: 30 30 BMI 007F {+30}
00/004F: 20 20 20 JSR 2020
00/0052: 20 00 00 JSR 0000
00/0055: 2C 43 68 BIT 6843
00/0058: 61 72 ADC (72,X)
00/005A: 61 63 ADC (63,X)
00/005C: 74 65 STZ 65,X
00/005E: 72 20 ADC (20)
00/0060: 46 53 LSR 53
00/0062: 54 20 62 MVN 6220
00/0065: 79 20 41 ADC 4120,Y
00/0068: 6E 64 79 ROR 7964
00/006B: 20 53 74 JSR 7453
00/006E: 61 64 ADC (64,X)
00/0070: 6C 65 72 JMP (7265)
00/0073: 20 61 6E JSR 6E61
00/0076: 64 20 STZ 20
00/0078: 52 6F EOR (6F)
00/007A: 62 20 54 PER 549D {+5420}
00/007D: 75 72 ADC 72,X
00/007F: 6E 65 72 ROR 7265
00/0082: 4B PHK
00/0083: AB PLB
00/0084: C2 30 REP #30
00/0086: E0 4B 00 CPX #004B
00/0089: B0 16 BCS 00A1 {+16}
00/008B: 64 14 STZ 14
00/008D: 7C BB 00 JMP (00BB,X)
00/0090: 4B PHK
00/0091: AB PLB
00/0092: E0 05 00 CPX #0005
00/0095: 90 05 BCC 009C {+05}
00/0097: A9 01 00 LDA #0001
00/009A: 38 SEC
00/009B: 6B RTL
00/009C: 64 14 STZ 14
00/009E: 7C 05 01 JMP (0105,X)
00/00A1: A9 01 00 LDA #0001
00/00A4: 80 0A BRA 00B0 {+0A}
00/00A6: A9 58 00 LDA #0058
00/00A9: 80 05 BRA 00B0 {+05}
00/00AB: A9 04 00 LDA #0004
00/00AE: 80 00 BRA 00B0 {+00}
00/00B0: 38 SEC
00/00B1: 5C 40 FC 01 JMP 01FC40
00/00B5: 18 CLC
00/00B6: A9 00 00 LDA #0000
00/00B9: 5C 40 FC 01 JMP 01FC40
00/00BD: A6 00 LDX 00
00/00BF: A6 00 LDX 00
00/00C1: A1 00 LDA (00,X)
00/00C3: A6 00 LDX 00
00/00C5: A6 00 LDX 00
00/00C7: A6 00 LDX 00
00/00C9: A1 00 LDA (00,X)
00/00CB: A6 00 LDX 00
00/00CD: A1 00 LDA (00,X)
00/00CF: A1 00 LDA (00,X)
00/00D1: A6 00 LDX 00
00/00D3: A1 00 LDA (00,X)
00/00D5: A1 00 LDA (00,X)
00/00D7: A1 00 LDA (00,X)
00/00D9: A1 00 LDA (00,X)
00/00DB: 60 RTS
00/00DC: 02 A1 COP A1
00/00DE: 00 95 BRK 95
00/00E0: 03 59 ORA 59,S
00/00E2: 04 99 TSB 99
00/00E4: 04 F5 TSB F5
00/00E6: 04 A6 TSB A6
00/00E8: 00 A6 BRK A6
00/00EA: 00 A6 BRK A6
00/00EC: 00 A6 BRK A6
00/00EE: 00 A1 BRK A1
00/00F0: 00 A1 BRK A1
00/00F2: 00 A6 BRK A6
00/00F4: 00 A1 BRK A1
00/00F6: 00 A1 BRK A1
00/00F8: 00 A1 BRK A1
00/00FA: 00 A1 BRK A1
00/00FC: 00 A1 BRK A1
00/00FE: 00 A6 BRK A6
00/0100: 00 A6 BRK A6
00/0102: 00 A6 BRK A6
00/0104: 00 A6 BRK A6
00/0106: 00 56 BRK 56
00/0108: 02 5E COP 5E
00/010A: 02 00 COP 00
00/010C: 00 00 BRK 00
00/010E: 00 00 BRK 00
00/0110: 00 00 BRK 00
00/0112: 00 00 BRK 00
00/0114: 00 00 BRK 00
00/0116: 00 00 BRK 00
00/0118: 00 00 BRK 00
00/011A: 00 00 BRK 00
00/011C: 00 00 BRK 00
00/011E: 00 00 BRK 00
00/0120: 00 00 BRK 00
00/0122: 00 00 BRK 00
00/0124: 00 00 BRK 00
00/0126: 00 00 BRK 00
00/0128: 00 00 BRK 00
00/012A: 00 00 BRK 00
00/012C: 00 00 BRK 00
00/012E: 00 00 BRK 00
00/0130: 48 PHA
00/0131: AD 0D 01 LDA 010D
00/0134: 48 PHA
00/0135: AD 0B 01 LDA 010B
00/0138: 48 PHA
00/0139: A9 08 00 LDA #0008
00/013C: 22 1C FC 01 JSL 01FC1C SysSrv: ALLOC_SEG
00/0140: 90 07 BCC 0149 {+07}
00/0142: 68 PLA
00/0143: 68 PLA
00/0144: 68 PLA
00/0145: A9 54 00 LDA #0054
00/0148: 60 RTS
00/0149: 86 84 STX 84
00/014B: 84 86 STY 86
00/014D: 8E 0B 01 STX 010B
00/0150: 8C 0D 01 STY 010D
00/0153: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/0157: 86 88 STX 88
00/0159: 84 8A STY 8A
00/015B: A0 02 00 LDY #0002
00/015E: 68 PLA
00/015F: 97 88 STA [88],Y
00/0161: C8 INY
00/0162: C8 INY
00/0163: 68 PLA
00/0164: 97 88 STA [88],Y
00/0166: A0 00 00 LDY #0000
00/0169: 68 PLA
00/016A: 97 88 STA [88],Y
00/016C: A0 06 00 LDY #0006
00/016F: A9 00 00 LDA #0000
00/0172: 97 88 STA [88],Y
00/0174: 18 CLC
00/0175: 60 RTS
00/0176: 64 8C STZ 8C
00/0178: 64 8E STZ 8E
00/017A: AD 0B 01 LDA 010B
00/017D: 0D 0D 01 ORA 010D
00/0180: F0 3E BEQ 01C0 {+3E}
00/0182: AE 0B 01 LDX 010B
00/0185: 86 84 STX 84
00/0187: AC 0D 01 LDY 010D
00/018A: 84 86 STY 86
00/018C: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/0190: 86 88 STX 88
00/0192: 84 8A STY 8A
00/0194: A0 00 00 LDY #0000
00/0197: B7 88 LDA [88],Y
00/0199: C5 82 CMP 82
00/019B: F0 29 BEQ 01C6 {+29}
00/019D: A5 84 LDA 84
00/019F: 85 8C STA 8C
00/01A1: A5 86 LDA 86
00/01A3: 85 8E STA 8E
00/01A5: A0 02 00 LDY #0002
00/01A8: B7 88 LDA [88],Y
00/01AA: 85 84 STA 84
00/01AC: C8 INY
00/01AD: C8 INY
00/01AE: B7 88 LDA [88],Y
00/01B0: 85 86 STA 86
00/01B2: 05 84 ORA 84
00/01B4: F0 0A BEQ 01C0 {+0A}
00/01B6: A6 84 LDX 84
00/01B8: A4 86 LDY 86
00/01BA: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/01BE: 80 D0 BRA 0190 {-30}
00/01C0: 64 84 STZ 84
00/01C2: 64 86 STZ 86
00/01C4: 38 SEC
00/01C5: 60 RTS
00/01C6: 18 CLC
00/01C7: 60 RTS
00/01C8: A5 8C LDA 8C
00/01CA: 05 8E ORA 8E
00/01CC: D0 11 BNE 01DF {+11}
00/01CE: A0 02 00 LDY #0002
00/01D1: B7 88 LDA [88],Y
00/01D3: 8D 0B 01 STA 010B
00/01D6: C8 INY
00/01D7: C8 INY
00/01D8: B7 88 LDA [88],Y
00/01DA: 8D 0D 01 STA 010D
00/01DD: 80 22 BRA 0201 {+22}
00/01DF: A0 02 00 LDY #0002
00/01E2: B7 88 LDA [88],Y
00/01E4: 48 PHA
00/01E5: C8 INY
00/01E6: C8 INY
00/01E7: B7 88 LDA [88],Y
00/01E9: 48 PHA
00/01EA: A6 8C LDX 8C
00/01EC: A4 8E LDY 8E
00/01EE: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/01F2: 86 88 STX 88
00/01F4: 84 8A STY 8A
00/01F6: A0 04 00 LDY #0004
00/01F9: 68 PLA
00/01FA: 97 88 STA [88],Y
00/01FC: 88 DEY
00/01FD: 88 DEY
00/01FE: 68 PLA
00/01FF: 97 88 STA [88],Y
00/0201: A6 84 LDX 84
00/0203: A4 86 LDY 86
00/0205: 22 20 FC 01 JSL 01FC20 SysSrv: RELEASE_SEG
00/0209: 60 RTS
00/020A: 84 A0 STY A0
00/020C: 98 TYA
00/020D: F0 0A BEQ 0219 {+0A}
00/020F: A7 32 LDA [32]
00/0211: C9 06 00 CMP #0006
00/0214: 90 03 BCC 0219 {+03}
00/0216: 82 92 FE BRL 00AB {-16E}
00/0219: B7 32 LDA [32],Y
00/021B: 85 80 STA 80
00/021D: C8 INY
00/021E: C8 INY
00/021F: B7 32 LDA [32],Y
00/0221: 85 04 STA 04
00/0223: C8 INY
00/0224: C8 INY
00/0225: B7 32 LDA [32],Y
00/0227: 85 06 STA 06
00/0229: C8 INY
00/022A: C8 INY
00/022B: B7 32 LDA [32],Y
00/022D: 85 AA STA AA
00/022F: C8 INY
00/0230: C8 INY
00/0231: B7 32 LDA [32],Y
00/0233: 85 AC STA AC
00/0235: 82 11 00 BRL 0249 {+11}
00/0238: 48 PHA
00/0239: 18 CLC
00/023A: A5 A0 LDA A0
00/023C: 69 0A 00 ADC #000A
00/023F: A8 TAY
00/0240: 68 PLA
00/0241: 97 32 STA [32],Y
00/0243: C8 INY
00/0244: C8 INY
00/0245: 8A TXA
00/0246: 97 32 STA [32],Y
00/0248: 60 RTS
00/0249: A6 3A LDX 3A
00/024B: A4 3C LDY 3C
00/024D: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/0251: 86 94 STX 94
00/0253: 84 96 STY 96
00/0255: 60 RTS
00/0256: 9C 0B 01 STZ 010B
00/0259: 9C 0D 01 STZ 010D
00/025C: 18 CLC
00/025D: 6B RTL
00/025E: 18 CLC
00/025F: 6B RTL
00/0260: 64 A4 STZ A4
00/0262: 64 AE STZ AE
00/0264: 84 A0 STY A0
00/0266: 98 TYA
00/0267: F0 18 BEQ 0281 {+18}
00/0269: A7 32 LDA [32]
00/026B: 85 AE STA AE
00/026D: C9 10 00 CMP #0010
00/0270: 90 03 BCC 0275 {+03}
00/0272: 82 36 FE BRL 00AB {-1CA}
00/0275: C9 03 00 CMP #0003
00/0278: 90 07 BCC 0281 {+07}
00/027A: A0 08 00 LDY #0008
00/027D: B7 32 LDA [32],Y
00/027F: 85 A4 STA A4
00/0281: 64 00 STZ 00
00/0283: A9 01 00 LDA #0001
00/0286: 85 02 STA 02
00/0288: A5 36 LDA 36
00/028A: 85 04 STA 04
00/028C: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/0290: 90 06 BCC 0298 {+06}
00/0292: A9 46 00 LDA #0046
00/0295: 82 18 FE BRL 00B0 {-1E8}
00/0298: A0 08 00 LDY #0008
00/029B: B7 20 LDA [20],Y
00/029D: 29 80 00 AND #0080
00/02A0: F0 06 BEQ 02A8 {+06}
00/02A2: A9 52 00 LDA #0052
00/02A5: 82 08 FE BRL 00B0 {-1F8}
00/02A8: B7 20 LDA [20],Y
00/02AA: 0A ASL
00/02AB: 0A ASL
00/02AC: 0A ASL
00/02AD: EB XBA
00/02AE: 29 03 00 AND #0003
00/02B1: 85 A6 STA A6
00/02B3: A5 A4 LDA A4
00/02B5: F0 11 BEQ 02C8 {+11}
00/02B7: 29 FC FF AND #FFFC
00/02BA: F0 06 BEQ 02C2 {+06}
00/02BC: A9 4E 00 LDA #004E
00/02BF: 82 EE FD BRL 00B0 {-212}
00/02C2: A5 A4 LDA A4
00/02C4: 25 A6 AND A6
00/02C6: 80 02 BRA 02CA {+02}
00/02C8: A5 A6 LDA A6
00/02CA: 85 A8 STA A8
00/02CC: A6 AE LDX AE
00/02CE: E0 05 00 CPX #0005
00/02D1: 90 05 BCC 02D8 {+05}
00/02D3: A0 0C 00 LDY #000C
00/02D6: 97 32 STA [32],Y
00/02D8: 64 A2 STZ A2
00/02DA: A5 36 LDA 36
00/02DC: 85 82 STA 82
00/02DE: A5 36 LDA 36
00/02E0: 85 00 STA 00
00/02E2: 20 76 01 JSR 0176
00/02E5: 90 1B BCC 0302 {+1B}
00/02E7: A9 01 00 LDA #0001
00/02EA: 85 02 STA 02
00/02EC: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/02F0: 90 03 BCC 02F5 {+03}
00/02F2: 82 BB FD BRL 00B0 {-245}
00/02F5: E6 A2 INC A2
00/02F7: A5 36 LDA 36
00/02F9: 20 30 01 JSR 0130
00/02FC: 90 04 BCC 0302 {+04}
00/02FE: 48 PHA
00/02FF: 82 82 00 BRL 0384 {+82}
00/0302: A0 06 00 LDY #0006
00/0305: B7 88 LDA [88],Y
00/0307: 1A INC
00/0308: 97 88 STA [88],Y
00/030A: A4 A0 LDY A0
00/030C: C8 INY
00/030D: C8 INY
00/030E: B7 32 LDA [32],Y
00/0310: AA TAX
00/0311: C8 INY
00/0312: C8 INY
00/0313: B7 32 LDA [32],Y
00/0315: A8 TAY
00/0316: A5 A0 LDA A0
00/0318: D0 12 BNE 032C {+12}
00/031A: 5A PHY
00/031B: DA PHX
00/031C: F4 0F 01 PEA 010F
00/031F: F4 0F 01 PEA 010F
00/0322: 22 74 FC 01 JSL 01FC74
00/0326: A2 0F 01 LDX #010F
00/0329: A0 0F 01 LDY #010F
00/032C: A9 18 00 LDA #0018
00/032F: 22 2C FC 01 JSL 01FC2C
00/0333: 90 06 BCC 033B {+06}
00/0335: A9 54 00 LDA #0054
00/0338: 82 3E 00 BRL 0379 {+3E}
00/033B: 86 90 STX 90
00/033D: 84 92 STY 92
00/033F: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/0343: 86 94 STX 94
00/0345: 84 96 STY 96
00/0347: A5 36 LDA 36
00/0349: A0 16 00 LDY #0016
00/034C: 97 94 STA [94],Y
00/034E: A9 09 00 LDA #0009
00/0351: A0 06 00 LDY #0006
00/0354: 97 94 STA [94],Y
00/0356: A9 FF FF LDA #FFFF
00/0359: A0 08 00 LDY #0008
00/035C: 97 94 STA [94],Y
00/035E: A5 A8 LDA A8
00/0360: A0 14 00 LDY #0014
00/0363: 97 94 STA [94],Y
00/0365: A9 00 00 LDA #0000
00/0368: A0 12 00 LDY #0012
00/036B: 97 94 STA [94],Y
00/036D: A0 00 00 LDY #0000
00/0370: B7 94 LDA [94],Y
00/0372: A4 A0 LDY A0
00/0374: 97 32 STA [32],Y
00/0376: 82 3C FD BRL 00B5 {-2C4}
00/0379: A6 A2 LDX A2
00/037B: F0 15 BEQ 0392 {+15}
00/037D: 48 PHA
00/037E: 20 76 01 JSR 0176
00/0381: 20 C8 01 JSR 01C8
00/0384: A5 36 LDA 36
00/0386: 85 00 STA 00
00/0388: A9 04 00 LDA #0004
00/038B: 85 02 STA 02
00/038D: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/0391: 68 PLA
00/0392: 82 1B FD BRL 00B0 {-2E5}
00/0395: 20 0A 02 JSR 020A
00/0398: A0 14 00 LDY #0014
00/039B: B7 94 LDA [94],Y
00/039D: 29 01 00 AND #0001
00/03A0: D0 06 BNE 03A8 {+06}
00/03A2: A9 4E 00 LDA #004E
00/03A5: 38 SEC
00/03A6: 80 21 BRA 03C9 {+21}
00/03A8: A0 16 00 LDY #0016
00/03AB: B7 94 LDA [94],Y
00/03AD: 85 00 STA 00
00/03AF: A9 02 00 LDA #0002
00/03B2: 85 02 STA 02
00/03B4: 64 14 STZ 14
00/03B6: A0 12 00 LDY #0012
00/03B9: B7 94 LDA [94],Y
00/03BB: D0 1F BNE 03DC {+1F}
00/03BD: A5 AA LDA AA
00/03BF: 85 08 STA 08
00/03C1: A5 AC LDA AC
00/03C3: 85 0A STA 0A
00/03C5: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/03C9: 48 PHA
00/03CA: 08 PHP
00/03CB: A5 0C LDA 0C
00/03CD: A6 0E LDX 0E
00/03CF: 20 38 02 JSR 0238
00/03D2: 28 PLP
00/03D3: 68 PLA
00/03D4: 90 03 BCC 03D9 {+03}
00/03D6: 82 D7 FC BRL 00B0 {-329}
00/03D9: 82 D9 FC BRL 00B5 {-327}
00/03DC: A0 0C 00 LDY #000C
00/03DF: B7 94 LDA [94],Y
00/03E1: AA TAX
00/03E2: C8 INY
00/03E3: C8 INY
00/03E4: B7 94 LDA [94],Y
00/03E6: A8 TAY
00/03E7: 22 38 FC 01 JSL 01FC38 SysSrv: DEREF
00/03EB: 86 9C STX 9C
00/03ED: 84 9E STY 9E
00/03EF: A0 12 00 LDY #0012
00/03F2: B7 94 LDA [94],Y
00/03F4: 29 FF 00 AND #00FF
00/03F7: 85 B2 STA B2
00/03F9: A0 10 00 LDY #0010
00/03FC: B7 94 LDA [94],Y
00/03FE: 85 B0 STA B0
00/0400: 64 B8 STZ B8
00/0402: 64 BA STZ BA
00/0404: A9 01 00 LDA #0001
00/0407: 85 08 STA 08
00/0409: 64 0A STZ 0A
00/040B: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/040F: 90 0E BCC 041F {+0E}
00/0411: 48 PHA
00/0412: 08 PHP
00/0413: A5 B8 LDA B8
00/0415: A6 BA LDX BA
00/0417: 20 38 02 JSR 0238
00/041A: 28 PLP
00/041B: 68 PLA
00/041C: 82 91 FC BRL 00B0 {-36F}
00/041F: E6 B8 INC B8
00/0421: D0 02 BNE 0425 {+02}
00/0423: E6 B8 INC B8
00/0425: A5 B8 LDA B8
00/0427: C5 AA CMP AA
00/0429: D0 06 BNE 0431 {+06}
00/042B: A5 B9 LDA B9
00/042D: C5 AB CMP AB
00/042F: F0 1E BEQ 044F {+1E}
00/0431: A7 04 LDA [04]
00/0433: 25 B2 AND B2
00/0435: 48 PHA
00/0436: A4 B0 LDY B0
00/0438: 88 DEY
00/0439: B7 9C LDA [9C],Y
00/043B: 29 FF 00 AND #00FF
00/043E: C3 01 CMP 01,S
00/0440: F0 0C BEQ 044E {+0C}
00/0442: BB TYX
00/0443: D0 F3 BNE 0438 {-0D}
00/0445: 68 PLA
00/0446: E6 04 INC 04
00/0448: D0 C1 BNE 040B {-3F}
00/044A: E6 06 INC 06
00/044C: 80 BD BRA 040B {-43}
00/044E: 68 PLA
00/044F: A5 B8 LDA B8
00/0451: A6 BA LDX BA
00/0453: 20 38 02 JSR 0238
00/0456: 82 5C FC BRL 00B5 {-3A4}
00/0459: 20 0A 02 JSR 020A
00/045C: A0 14 00 LDY #0014
00/045F: B7 94 LDA [94],Y
00/0461: 29 02 00 AND #0002
00/0464: D0 06 BNE 046C {+06}
00/0466: A9 4E 00 LDA #004E
00/0469: 38 SEC
00/046A: 80 1A BRA 0486 {+1A}
00/046C: A0 16 00 LDY #0016
00/046F: B7 94 LDA [94],Y
00/0471: 85 00 STA 00
00/0473: A9 03 00 LDA #0003
00/0476: 85 02 STA 02
00/0478: 64 14 STZ 14
00/047A: A5 AA LDA AA
00/047C: 85 08 STA 08
00/047E: A5 AC LDA AC
00/0480: 85 0A STA 0A
00/0482: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/0486: 48 PHA
00/0487: 08 PHP
00/0488: A5 0C LDA 0C
00/048A: A6 0E LDX 0E
00/048C: 20 38 02 JSR 0238
00/048F: 28 PLP
00/0490: 68 PLA
00/0491: 90 03 BCC 0496 {+03}
00/0493: 82 1A FC BRL 00B0 {-3E6}
00/0496: 82 1C FC BRL 00B5 {-3E4}
00/0499: BB TYX
00/049A: F0 08 BEQ 04A4 {+08}
00/049C: A7 32 LDA [32]
00/049E: 3A DEC
00/049F: F0 03 BEQ 04A4 {+03}
00/04A1: 82 07 FC BRL 00AB {-3F9}
00/04A4: 20 49 02 JSR 0249
00/04A7: A7 94 LDA [94]
00/04A9: 85 80 STA 80
00/04AB: A0 16 00 LDY #0016
00/04AE: B7 94 LDA [94],Y
00/04B0: 85 82 STA 82
00/04B2: A0 12 00 LDY #0012
00/04B5: B7 94 LDA [94],Y
00/04B7: F0 0F BEQ 04C8 {+0F}
00/04B9: A0 0C 00 LDY #000C
00/04BC: B7 94 LDA [94],Y
00/04BE: AA TAX
00/04BF: C8 INY
00/04C0: C8 INY
00/04C1: B7 94 LDA [94],Y
00/04C3: A8 TAY
00/04C4: 22 20 FC 01 JSL 01FC20 SysSrv: RELEASE_SEG
00/04C8: A5 80 LDA 80
00/04CA: 22 30 FC 01 JSL 01FC30
00/04CE: 20 76 01 JSR 0176
00/04D1: A0 06 00 LDY #0006
00/04D4: B7 88 LDA [88],Y
00/04D6: 3A DEC
00/04D7: 97 88 STA [88],Y
00/04D9: D0 17 BNE 04F2 {+17}
00/04DB: A5 80 LDA 80
00/04DD: 20 C8 01 JSR 01C8
00/04E0: A5 82 LDA 82
00/04E2: 85 00 STA 00
00/04E4: A9 04 00 LDA #0004
00/04E7: 85 02 STA 02
00/04E9: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/04ED: 90 03 BCC 04F2 {+03}
00/04EF: 82 BE FB BRL 00B0 {-442}
00/04F2: 82 C0 FB BRL 00B5 {-440}
00/04F5: 98 TYA
00/04F6: F0 08 BEQ 0500 {+08}
00/04F8: A7 32 LDA [32]
00/04FA: 3A DEC
00/04FB: F0 03 BEQ 0500 {+03}
00/04FD: 82 AB FB BRL 00AB {-455}
00/0500: B7 32 LDA [32],Y
00/0502: 85 80 STA 80
00/0504: 20 49 02 JSR 0249
00/0507: A0 16 00 LDY #0016
00/050A: B7 94 LDA [94],Y
00/050C: 85 00 STA 00
00/050E: A9 07 00 LDA #0007
00/0511: 85 02 STA 02
00/0513: 22 00 FC 01 JSL 01FC00 SysSrv: DEV_DISPATCHER
00/0517: 90 03 BCC 051C {+03}
00/0519: 82 94 FB BRL 00B0 {-46C}
00/051C: 82 96 FB BRL 00B5 {-46A}
00/051F: F5 04 SBC 04,X
00/0521: 00 04 BRK 04
00/0523: 00 82 BRK 82
00/0525: 00 F5 BRK F5
00/0527: 04 00 TSB 00
00/0529: 08 PHP
00/052A: 00 90 BRK 90
00/052C: 00 F5 BRK F5
00/052E: 02 F0 COP F0
00/0530: 1D 03 0F ORA 0F03,X
00/0533: 01 F5 ORA (F5,X)
00/0535: 02 F0 COP F0
00/0537: 2A ROL
00/0538: 03 0F ORA 0F,S
00/053A: 01 F7 ORA (F7,X)
00/053C: 4C 00 00 JMP 0000
00/053F: 00 00 BRK 00
00/0541: 23 8E AND 8E,S
00/0543: 9F BD BF C1 STA C1BFBD,X
00/0547: C3 C5 CMP C5,S
00/0549: C7 C9 CMP [C9]
00/054B: CB WAI
00/054C: CD CF D1 CMP D1CF
00/054F: D3 D5 CMP (D5,S),Y
00/0551: D7 D9 CMP [D9],Y
00/0553: DB STP
00/0554: DD DF E1 CMP E1DF,X
00/0557: E3 E5 SBC E5,S
00/0559: E7 E9 SBC [E9]
00/055B: EB XBA
00/055C: ED EF F1 SBC F1EF
00/055F: F3 F5 SBC (F5,S),Y
00/0561: F7 F9 SBC [F9],Y
00/0563: FB XCE
00/0564: FD FF 0E SBC 0EFF,X
00/0567: 01 03 ORA (03,X)
00/0569: 05 07 ORA 07
00/056B: 09 32 36 ORA #3632
00/056E: 4E 51 7B LSR 7B51
00/0571: 7E 83 88 ROR 8883,X
00/0574: D4 DB PEI DB
00/0576: 03 57 ORA 57,S
00/0578: 5A PHY
00/0579: E3 FA SBC FA,S
00/057B: 05 20 ORA 20
00/057D: 27 7F AND [7F]
00/057F: 82 96 D0 BRL D618 {-2F6A}
00/0582: 06 18 ASL 18
00/0584: 54 5A 8D MVN 8D5A
00/0587: A5 CF LDA CF
00/0589: DE 00 05 DEC 0500,X
00/058C: 00 00 BRK 00

File diff suppressed because it is too large Load Diff

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,310 @@
0000- 01 00 ORA ($00,X)
0002- 00 BRK
0003- 00 BRK
0004- FE FF 00 INC $00FF,X
0007- 00 BRK
0008- 08 PHP
0009- 00 BRK
000A- 09 00 ORA #$00
000C- 05 00 ORA $00
000E- 7E 00 1E ROR $1E00,X
0011- 00 BRK
0012- 27 ???
0013- 00 BRK
0014- 58 CLI
0015- 00 BRK
0016- 90 00 BCC $0018
0018- 01 00 ORA ($00,X)
001A- 0A ASL
001B- 43 ???
001C- 6F ???
001D- 75 72 ADC $72,X
001F- 69 65 ADC #$65
0021- 72 2E ADC ($2E)
0023- 31 30 AND ($30),Y
0025- 0A ASL
0026- 43 ???
0027- 6F ???
0028- 75 72 ADC $72,X
002A- 69 65 ADC #$65
002C- 72 2E ADC ($2E)
002E- 31 32 AND ($32),Y
0030- 09 47 ORA #$47
0032- 65 6E ADC $6E
0034- 65 76 ADC $76
0036- 61 2E ADC ($2E,X)
0038- 31 30 AND ($30),Y
003A- 09 47 ORA #$47
003C- 65 6E ADC $6E
003E- 65 76 ADC $76
0040- 61 2E ADC ($2E,X)
0042- 31 32 AND ($32),Y
0044- 0C 48 65 TSB $6548
0047- 6C 76 65 JMP ($6576)
004A- 74 69 STZ $69,X
004C- 63 ???
004D- 61 2E ADC ($2E,X)
004F- 31 30 AND ($30),Y
0051- 0C 48 65 TSB $6548
0054- 6C 76 65 JMP ($6576)
0057- 74 69 STZ $69,X
0059- 63 ???
005A- 61 2E ADC ($2E,X)
005C- 31 32 AND ($32),Y
005E- 08 PHP
005F- 54 ???
0060- 69 6D ADC #$6D
0062- 65 73 ADC $73
0064- 2E 31 30 ROL $3031
0067- 08 PHP
0068- 54 ???
0069- 69 6D ADC #$6D
006B- 65 73 ADC $73
006D- 2E 31 32 ROL $3231
0070- 00 BRK
0071- 00 BRK
0072- 00 BRK
0073- 00 BRK
0074- 00 BRK
0075- 00 BRK
0076- 00 BRK
0077- 00 BRK
0078- 00 BRK
0079- 00 BRK
007A- 00 BRK
007B- 00 BRK
007C- 00 BRK
007D- 00 BRK
007E- 00 BRK
007F- 00 BRK
0080- 00 BRK
0081- 26 0F ROL $0F
0083- 57 ???
0084- 04 04 TSB $04
0086- 00 BRK
0087- 03 ???
0088- 00 BRK
0089- 19 0D 56 ORA $560D,Y
008C- 1A INC
008D- 0A ASL
008E- 00 BRK
008F- 05 00 ORA $00
0091- 27 ???
0092- 0F ???
0093- 57 ???
0094- 04 04 TSB $04
0096- 00 BRK
0097- 03 ???
0098- 00 BRK
0099- 1A INC
009A- 0D 56 1A ORA $1A56
009D- 0A ASL
009E- 00 BRK
009F- 05 00 ORA $00
00A1- 30 0F BMI $00B2
00A3- 57 ???
00A4- 04 04 TSB $04
00A6- 00 BRK
00A7- 03 ???
00A8- 00 BRK
00A9- 1A INC
00AA- 0D 56 1A ORA $1A56
00AD- 0A ASL
00AE- 00 BRK
00AF- 05 00 ORA $00
00B1- 30 0F BMI $00C2
00B3- 57 ???
00B4- 04 04 TSB $04
00B6- 00 BRK
00B7- 03 ???
00B8- 00 BRK
00B9- 1A INC
00BA- 0D 56 1A ORA $1A56
00BD- 0A ASL
00BE- 00 BRK
00BF- 05 00 ORA $00
00C1- 07 ???
00C2- 11 57 ORA ($57),Y
00C4- 06 04 ASL $04
00C6- 00 BRK
00C7- 05 00 ORA $00
00C9- 1A INC
00CA- 0D 56 1A ORA $1A56
00CD- 0A ASL
00CE- 00 BRK
00CF- 05 00 ORA $00
00D1- 07 ???
00D2- 11 57 ORA ($57),Y
00D4- 06 04 ASL $04
00D6- 00 BRK
00D7- 05 00 ORA $00
00D9- 1A INC
00DA- 0D 56 1A ORA $1A56
00DD- 0A ASL
00DE- 00 BRK
00DF- 05 00 ORA $00
00E1- 2D 10 57 AND $5710
00E4- 0A ASL
00E5- 04 00 TSB $00
00E7- 02 ???
00E8- 00 BRK
00E9- 1A INC
00EA- 0D 56 1A ORA $1A56
00ED- 0A ASL
00EE- 00 BRK
00EF- 05 00 ORA $00
00F1- 2D 10 57 AND $5710
00F4- 0A ASL
00F5- 04 00 TSB $00
00F7- 02 ???
00F8- 00 BRK
00F9- 1A INC
00FA- 0D 56 1A ORA $1A56
00FD- 0A ASL
00FE- 00 BRK
00FF- 05 FE ORA $FE
0101- FF ???
0102- 00 BRK
0103- 08 PHP
0104- 00 BRK
0105- 00 BRK
0106- 00 BRK
0107- 00 BRK
0108- 01 00 ORA ($00,X)
010A- 1B ???
010B- DD FC 00 CMP $00FC,X
010E- 16 00 ASL $00,X
0110- 00 BRK
0111- 0A ASL
0112- 08 PHP
0113- 00 BRK
0114- 02 ???
0115- 00 BRK
0116- 00 BRK
0117- 00 BRK
0118- 00 BRK
0119- 00 BRK
011A- 00 BRK
011B- 00 BRK
011C- 16 00 ASL $00,X
011E- 00 BRK
011F- 0C 08 00 TSB $0008
0122- 0D 00 00 ORA $0000
0125- 00 BRK
0126- 00 BRK
0127- 00 BRK
0128- 00 BRK
0129- 00 BRK
012A- 03 ???
012B- 00 BRK
012C- 00 BRK
012D- 0A ASL
012E- 10 00 BPL $0130
0130- 18 CLC
0131- 00 BRK
0132- 00 BRK
0133- 00 BRK
0134- 00 BRK
0135- 00 BRK
0136- 00 BRK
0137- 00 BRK
0138- 03 ???
0139- 00 BRK
013A- 00 BRK
013B- 0C 10 00 TSB $0010
013E- 22 ???
013F- 00 BRK
0140- 00 BRK
0141- 00 BRK
0142- 00 BRK
0143- 00 BRK
0144- 00 BRK
0145- 00 BRK
0146- 15 00 ORA $00,X
0148- 00 BRK
0149- 0A ASL
014A- 17 ???
014B- 00 BRK
014C- 2C 00 00 BIT $0000
014F- 00 BRK
0150- 00 BRK
0151- 00 BRK
0152- 00 BRK
0153- 00 BRK
0154- 15 00 ORA $00,X
0156- 00 BRK
0157- 0C 17 00 TSB $0017
015A- 39 00 00 AND $0000,Y
015D- 00 BRK
015E- 00 BRK
015F- 00 BRK
0160- 00 BRK
0161- 00 BRK
0162- 14 00 TRB $00
0164- 00 BRK
0165- 0A ASL
0166- 21 00 AND ($00,X)
0168- 46 00 LSR $00
016A- 00 BRK
016B- 00 BRK
016C- 00 BRK
016D- 00 BRK
016E- 00 BRK
016F- 00 BRK
0170- 14 00 TRB $00
0172- 00 BRK
0173- 0C 21 00 TSB $0021
0176- 4F ???
0177- 00 BRK
0178- 00 BRK
0179- 00 BRK
017A- 00 BRK
017B- 00 BRK
017C- 00 BRK
017D- 00 BRK
017E- FE FF 00 INC $00FF,X
0181- 00 BRK
0182- 00 BRK
0183- 00 BRK
0184- 16 00 ASL $00,X
0186- 08 PHP
0187- 00 BRK
0188- 00 BRK
0189- 00 BRK
018A- 03 ???
018B- 00 BRK
018C- 10 00 BPL $018E
018E- 00 BRK
018F- 00 BRK
0190- 15 00 ORA $00,X
0192- 17 ???
0193- 00 BRK
0194- 00 BRK
0195- 00 BRK
0196- 14 00 TRB $00
0198- 21 00 AND ($00,X)
019A- 00 BRK
019B- 00 BRK
019C- 07 ???
019D- 53 ???
019E- 68 PLA
019F- 61 73 ADC ($73,X)
01A1- 74 6F STZ $6F,X
01A3- 6E 07 43 ROR $4307
01A6- 6F ???
01A7- 75 72 ADC $72,X
01A9- 69 65 ADC #$65
01AB- 72 06 ADC ($06)
01AD- 47 ???
01AE- 65 6E ADC $6E
01B0- 65 76 ADC $76
01B2- 61 09 ADC ($09,X)
01B4- 48 PHA
01B5- 65 6C ADC $6C
01B7- 76 65 ROR $65,X
01B9- 74 69 STZ $69,X
01BB- 63 ???
01BC- 61 05 ADC ($05,X)
01BE- 54 ???
01BF- 69 6D ADC #$6D
01C1- 65 73 ADC $73

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

21522
source/d7_convert/System/GS.OS Normal file

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

47805
source/d7_convert/System/Start Normal file

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

Binary file not shown.

View File

@ -0,0 +1,681 @@
;
; OMF segment summary:
;
; #01: CODE len=0x000600 loadName=' ' segName=' '
;
;
; Segment #1 (1): loadName=' ' segName=' ':
; type=CODE length=1536 OMF v2.0
; flags:
;
OMF: LCONST record (0x016b bytes follow)
00/0000: F4 00 00 PEA 0000
00/0003: F4 0E 00 PEA 000E
00/0006: A2 03 12 LDX #1203
00/0009: 22 00 00 E1 JSL E10000 SetHeartBeat(@Task)
00/000D: 6B RTL
00/000E: 00 00 BRK 00
00/0010: 00 00 BRK 00
00/0012: 3C 00 5A BIT 5A00,X
00/0015: A5 C2 LDA C2
00/0017: 30 8B BMI FFA4 {-75}
00/0019: 4B PHK
00/001A: AB PLB
00/001B: A9 3C 00 LDA #003C
00/001E: 8D 12 00 STA 0012
00/0021: 48 PHA
00/0022: A2 0F 06 LDX #060F
00/0025: 22 00 00 E1 JSL E10000 MenuStatus():ActFlg
00/0029: 68 PLA
00/002A: B0 02 BCS 002E {+02}
00/002C: D0 0C BNE 003A {+0C}
00/002E: 9C 15 02 STZ 0215
00/0031: A9 37 00 LDA #0037
00/0034: 8D 66 02 STA 0266
00/0037: 82 FB 00 BRL 0135 {+FB}
00/003A: AF FF 00 E1 LDA E100FF
00/003E: F0 03 BEQ 0043 {+03}
00/0040: 82 F2 00 BRL 0135 {+F2}
00/0043: 22 64 00 E1 JSL E10064 IncBusy
00/0047: 48 PHA
00/0048: 48 PHA
00/0049: A2 04 1C LDX #1C04
00/004C: 22 00 00 E1 JSL E10000 GetPort():@Port
00/0050: AD 15 02 LDA 0215
00/0053: D0 07 BNE 005C {+07}
00/0055: 22 39 01 00 JSL 000139
00/0059: EE 15 02 INC 0215
00/005C: 48 PHA
00/005D: A2 04 17 LDX #1704
00/0060: 22 00 00 E1 JSL E10000 GetMasterSCB():SCB
00/0064: 68 PLA
00/0065: CD 66 02 CMP 0266
00/0068: F0 05 BEQ 006F {+05}
00/006A: 48 PHA
00/006B: 22 6C 02 00 JSL 00026C
00/006F: F4 00 00 PEA 0000
00/0072: F4 6B 01 PEA 016B
00/0075: A2 04 1B LDX #1B04
00/0078: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/007C: 48 PHA
00/007D: F4 00 00 PEA 0000
00/0080: A2 06 0D LDX #0D06
00/0083: 22 00 00 E1 JSL E10000 Button(Btn#):DownFlg
00/0087: 68 PLA
00/0088: D0 05 BNE 008F {+05}
00/008A: 9C 17 02 STZ 0217
00/008D: 80 49 BRA 00D8 {+49}
00/008F: F4 00 00 PEA 0000
00/0092: F4 19 02 PEA 0219
00/0095: A2 06 0C LDX #0C06
00/0098: 22 00 00 E1 JSL E10000 GetMouse(@Pt)
00/009C: 48 PHA
00/009D: F4 00 00 PEA 0000
00/00A0: F4 19 02 PEA 0219
00/00A3: F4 00 00 PEA 0000
00/00A6: F4 7B 01 PEA 017B
00/00A9: A2 04 4F LDX #4F04
00/00AC: 22 00 00 E1 JSL E10000 PtInRect(@Pt,@Rect):Flag
00/00B0: 68 PLA
00/00B1: F0 D7 BEQ 008A {-29}
00/00B3: A9 01 00 LDA #0001
00/00B6: 0C 17 02 TSB 0217
00/00B9: F0 1D BEQ 00D8 {+1D}
00/00BB: 9C 17 02 STZ 0217
00/00BE: A9 FF FF LDA #FFFF
00/00C1: 4D 1D 02 EOR 021D
00/00C4: 8D 1D 02 STA 021D
00/00C7: D0 14 BNE 00DD {+14}
00/00C9: F4 00 00 PEA 0000
00/00CC: F4 7B 01 PEA 017B
00/00CF: A2 04 55 LDX #5504
00/00D2: 22 00 00 E1 JSL E10000 EraseRect(@Rect)
00/00D6: 80 52 BRA 012A {+52}
00/00D8: AD 1D 02 LDA 021D
00/00DB: F0 4D BEQ 012A {+4D}
00/00DD: F4 00 00 PEA 0000
00/00E0: F4 1F 02 PEA 021F
00/00E3: A2 03 0F LDX #0F03
00/00E6: 22 00 00 E1 JSL E10000 ReadAsciiTime(@Buff)
00/00EA: E2 20 SEP #20
00/00EC: A2 13 00 LDX #0013
00/00EF: BD 1F 02 LDA 021F,X
00/00F2: 29 7F 9D AND #9D7F
00/00F5: 1F 02 CA 10 ORA 10CA02,X
00/00F9: F5 C2 SBC C2,X
00/00FB: 20 A9 20 JSR 20A9
00/00FE: 20 8D 2D JSR 2D8D
00/0101: 02 AD COP AD
00/0103: 31 02 AND (02),Y
00/0105: 8D 2E 02 STA 022E
00/0108: A9 20 20 LDA #2020
00/010B: 8D 31 02 STA 0231
00/010E: AD 6A 02 LDA 026A
00/0111: 48 PHA
00/0112: AD 68 02 LDA 0268
00/0115: 48 PHA
00/0116: A2 04 3A LDX #3A04
00/0119: 22 00 00 E1 JSL E10000 MoveTo(h,v)
00/011D: F4 00 00 PEA 0000
00/0120: F4 28 02 PEA 0228
00/0123: A2 04 A6 LDX #A604
00/0126: 22 00 00 E1 JSL E10000 DrawCString(@cStr)
00/012A: A2 04 1B LDX #1B04
00/012D: 22 00 00 E1 JSL E10000 SetPort(@Port)
00/0131: 22 68 00 E1 JSL E10068 DecBusy
00/0135: AB PLB
00/0136: E2 30 SEP #30
00/0138: 6B RTL
00/0139: F4 00 00 PEA 0000
00/013C: F4 6B 01 PEA 016B
00/013F: A2 04 19 LDX #1904
00/0142: 22 00 00 E1 JSL E10000 InitPort(@Port)
00/0146: A9 01 00 LDA #0001
00/0149: 8D 7B 01 STA 017B
00/014C: A9 0A 00 LDA #000A
00/014F: 8D 7F 01 STA 017F
00/0152: A9 3C 02 LDA #023C
00/0155: 8D 83 01 STA 0183
00/0158: A9 00 00 LDA #0000
00/015B: 8D 85 01 STA 0185
00/015E: A9 3C 02 LDA #023C
00/0161: 8D 87 01 STA 0187
00/0164: A9 00 00 LDA #0000
00/0167: 8D 89 01 STA 0189
00/016A: 6B RTL
00/016B: F1 B2 SBC (B2),Y
00/016D: 00 00 BRK 00
00/016F: 00 F2 BRK F2
00/0171: B8 CLV
00/0172: 00 00 BRK 00
00/0174: 00 FF BRK FF
00/0176: FF 00 00 00 SBC 000000,X
00/017A: 00 00 BRK 00
00/017C: 00 00 BRK 00
00/017E: 00 00 BRK 00
00/0180: 00 00 BRK 00
00/0182: 00 00 BRK 00
00/0184: 00 00 BRK 00
00/0186: 00 00 BRK 00
00/0188: 00 00 BRK 00
00/018A: 00 20 BRK 20
00/018C: 20 20 20 JSR 2020
00/018F: 20 20 20 JSR 2020
00/0192: 20 00 5C JSR 5C00
00/0195: 02 00 COP 00
00/0197: 00 00 BRK 00
00/0199: 00 00 BRK 00
00/019B: 00 00 BRK 00
00/019D: 00 00 BRK 00
00/019F: 00 00 BRK 00
00/01A1: 00 00 BRK 00
00/01A3: 00 00 BRK 00
00/01A5: 00 00 BRK 00
00/01A7: 00 00 BRK 00
00/01A9: 00 00 BRK 00
00/01AB: 00 00 BRK 00
00/01AD: 00 00 BRK 00
00/01AF: 00 00 BRK 00
00/01B1: 00 00 BRK 00
00/01B3: 00 0A BRK 0A
00/01B5: 00 01 BRK 01
00/01B7: 00 00 BRK 00
00/01B9: 00 0A BRK 0A
00/01BB: 00 00 BRK 00
00/01BD: 00 37 BRK 37
00/01BF: 00 0A BRK 0A
00/01C1: 00 00 BRK 00
00/01C3: 00 0B BRK 0B
00/01C5: 3B TSC
00/01C6: 5B TCD
00/01C7: A5 06 LDA 06
00/01C9: 8D 66 02 STA 0266
00/01CC: 8D 6B 01 STA 016B
00/01CF: F0 0E BEQ 01DF {+0E}
00/01D1: A9 7A 02 LDA #027A
00/01D4: 8D 7D 01 STA 017D
00/01D7: A9 7E 02 LDA #027E
00/01DA: 8D 81 01 STA 0181
00/01DD: 80 0C BRA 01EB {+0C}
00/01DF: A9 3D 01 LDA #013D
00/01E2: 8D 7D 01 STA 017D
00/01E5: A9 3F 01 LDA #013F
00/01E8: 8D 81 01 STA 0181
00/01EB: 48 PHA
00/01EC: F4 00 00 PEA 0000
00/01EF: F4 CC 02 PEA 02CC
00/01F2: A2 04 A9 LDX #A904
00/01F5: 22 00 00 E1 JSL E10000 StringWidth(@Str):Width
00/01F9: AD 7D 01 LDA 017D
00/01FC: 38 SEC
00/01FD: E3 01 SBC 01,S
00/01FF: 8D 7D 01 STA 017D
00/0202: 7A PLY
00/0203: 8D 6A 02 STA 026A
00/0206: AD 7D 01 LDA 017D
00/0209: 8D 60 02 STA 0260
00/020C: AD 81 01 LDA 0181
00/020F: 8D 64 02 STA 0264
00/0212: A5 04 LDA 04
00/0214: 85 06 STA 06
00/0216: A5 03 LDA 03
00/0218: 85 05 STA 05
00/021A: A5 01 LDA 01
00/021C: 5B TCD
00/021D: 3B TSC
00/021E: 18 CLC
00/021F: 69 04 00 ADC #0004
00/0222: 1B TCS
00/0223: 6B RTL
00/0224: 08 PHP
00/0225: 31 32 AND (32),Y
00/0227: 3A DEC
00/0228: 30 30 BMI 025A {+30}
00/022A: 20 41 4D JSR 4D41
00/022D: F5 02 SBC 02,X
00/022F: F0 01 BEQ 0232 {+01}
00/0231: 00 0E BRK 0E
00/0233: 00 F5 BRK F5
00/0235: 02 00 COP 00
00/0237: 04 00 TSB 00
00/0239: 0E 00 F5 ASL F500
00/023C: 02 00 COP 00
00/023E: 1F 00 12 00 ORA 001200,X
00/0242: F5 02 SBC 02,X
00/0244: 00 2F BRK 2F
00/0246: 00 15 BRK 15
00/0248: 02 F5 COP F5
00/024A: 02 00 COP 00
00/024C: 35 00 AND 00,X
00/024E: 66 02 ROR 02
00/0250: F5 02 SBC 02,X
00/0252: 00 51 BRK 51
00/0254: 00 15 BRK 15
00/0256: 02 F5 COP F5
00/0258: 03 00 ORA 00,S
00/025A: 56 00 LSR 00,X
00/025C: 39 01 F5 AND F501,Y
00/025F: 02 00 COP 00
00/0261: 5A PHY
00/0262: 00 15 BRK 15
00/0264: 02 F5 COP F5
00/0266: 02 00 COP 00
00/0268: 66 00 ROR 00
00/026A: 66 02 ROR 02
00/026C: F5 03 SBC 03,X
00/026E: 00 6C BRK 6C
00/0270: 00 6C BRK 6C
00/0272: 02 F5 COP F5
00/0274: 02 F0 COP F0
00/0276: 70 00 BVS 0278 {+00}
00/0278: 6B RTL
00/0279: 01 F5 ORA (F5,X)
00/027B: 02 00 COP 00
00/027D: 73 00 ADC (00,S),Y
00/027F: 6B RTL
00/0280: 01 F5 ORA (F5,X)
00/0282: 02 00 COP 00
00/0284: 8B PHB
00/0285: 00 17 BRK 17
00/0287: 02 F5 COP F5
00/0289: 02 F0 COP F0
00/028B: 90 00 BCC 028D {+00}
00/028D: 19 02 F5 ORA F502,Y
00/0290: 02 00 COP 00
00/0292: 93 00 STA (00,S),Y
00/0294: 19 02 F5 ORA F502,Y
00/0297: 02 F0 COP F0
00/0299: 9E 00 19 STZ 1900,X
00/029C: 02 F5 COP F5
00/029E: 02 00 COP 00
00/02A0: A1 00 LDA (00,X)
00/02A2: 19 02 F5 ORA F502,Y
00/02A5: 02 F0 COP F0
00/02A7: A4 00 LDY 00
00/02A9: 7B TDC
00/02AA: 01 F5 ORA (F5,X)
00/02AC: 02 00 COP 00
00/02AE: A7 00 LDA [00]
00/02B0: 7B TDC
00/02B1: 01 F5 ORA (F5,X)
00/02B3: 02 00 COP 00
00/02B5: B7 00 LDA [00],Y
00/02B7: 17 02 ORA [02],Y
00/02B9: F5 02 SBC 02,X
00/02BB: 00 BC BRK BC
00/02BD: 00 17 BRK 17
00/02BF: 02 F5 COP F5
00/02C1: 02 00 COP 00
00/02C3: C2 00 REP #00
00/02C5: 1D 02 F5 ORA F502,X
00/02C8: 02 00 COP 00
00/02CA: C5 00 CMP 00
00/02CC: 1D 02 F5 ORA F502,X
00/02CF: 02 F0 COP F0
00/02D1: CA DEX
00/02D2: 00 7B BRK 7B
00/02D4: 01 F5 ORA (F5,X)
00/02D6: 02 00 COP 00
00/02D8: CD 00 7B CMP 7B00
00/02DB: 01 F5 ORA (F5,X)
00/02DD: 02 00 COP 00
00/02DF: D9 00 1D CMP 1D00,Y
00/02E2: 02 F5 COP F5
00/02E4: 02 F0 COP F0
00/02E6: DE 00 1F DEC 1F00,X
00/02E9: 02 F5 COP F5
00/02EB: 02 00 COP 00
00/02ED: E1 00 SBC (00,X)
00/02EF: 1F 02 F5 02 ORA 02F502,X
00/02F3: 00 F0 BRK F0
00/02F5: 00 1F BRK 1F
00/02F7: 02 F5 COP F5
00/02F9: 02 00 COP 00
00/02FB: F5 00 SBC 00,X
00/02FD: 1F 02 F5 02 ORA 02F502,X
00/0301: 00 00 BRK 00
00/0303: 01 2D ORA (2D,X)
00/0305: 02 F5 COP F5
00/0307: 02 00 COP 00
00/0309: 03 01 ORA 01,S
00/030B: 31 02 AND (02),Y
00/030D: F5 02 SBC 02,X
00/030F: 00 06 BRK 06
00/0311: 01 2E ORA (2E,X)
00/0313: 02 F5 COP F5
00/0315: 02 00 COP 00
00/0317: 0C 01 31 TSB 3101
00/031A: 02 F5 COP F5
00/031C: 02 00 COP 00
00/031E: 0F 01 6A 02 ORA 026A01
00/0322: F5 02 SBC 02,X
00/0324: 00 13 BRK 13
00/0326: 01 68 ORA (68,X)
00/0328: 02 F5 COP F5
00/032A: 02 F0 COP F0
00/032C: 1E 01 28 ASL 2801,X
00/032F: 02 F5 COP F5
00/0331: 02 00 COP 00
00/0333: 21 01 AND (01,X)
00/0335: 28 PLP
00/0336: 02 F5 COP F5
00/0338: 02 F0 COP F0
00/033A: 3A DEC
00/033B: 01 6B ORA (6B,X)
00/033D: 01 F5 ORA (F5,X)
00/033F: 02 00 COP 00
00/0341: 3D 01 6B AND 6B01,X
00/0344: 01 F5 ORA (F5,X)
00/0346: 02 00 COP 00
00/0348: 4A LSR
00/0349: 01 7B ORA (7B,X)
00/034B: 01 F5 ORA (F5,X)
00/034D: 02 00 COP 00
00/034F: 50 01 BVC 0352 {+01}
00/0351: 7F 01 F5 02 ADC 02F501,X
00/0355: 00 53 BRK 53
00/0357: 01 3C ORA (3C,X)
00/0359: 02 F5 COP F5
00/035B: 02 00 COP 00
00/035D: 56 01 LSR 01,X
00/035F: 83 01 STA 01,S
00/0361: F5 02 SBC 02,X
00/0363: F0 59 BEQ 03BE {+59}
00/0365: 01 3C ORA (3C,X)
00/0367: 02 F5 COP F5
00/0369: 02 00 COP 00
00/036B: 5C 01 85 01 JMP 018501
00/036F: F5 02 SBC 02,X
00/0371: 00 5F BRK 5F
00/0373: 01 3C ORA (3C,X)
00/0375: 02 F5 COP F5
00/0377: 02 00 COP 00
00/0379: 62 01 87 PER 8A7D {-78FF}
00/037C: 01 F5 ORA (F5,X)
00/037E: 02 F0 COP F0
00/0380: 65 01 ADC 01
00/0382: 3C 02 F5 BIT F502,X
00/0385: 02 00 COP 00
00/0387: 68 PLA
00/0388: 01 89 ORA (89,X)
00/038A: 01 F5 ORA (F5,X)
00/038C: 04 00 TSB 00
00/038E: 3C 02 5C BIT 5C02,X
00/0391: 02 F5 COP F5
00/0393: 02 00 COP 00
00/0395: 72 02 ADC (02)
00/0397: 66 02 ROR 02
00/0399: F5 02 SBC 02,X
00/039B: 00 75 BRK 75
00/039D: 02 6B COP 6B
00/039F: 01 F5 ORA (F5,X)
00/03A1: 02 00 COP 00
00/03A3: 7D 02 7D ADC 7D02,X
00/03A6: 01 F5 ORA (F5,X)
00/03A8: 02 00 COP 00
00/03AA: 83 02 STA 02,S
00/03AC: 81 01 STA (01,X)
00/03AE: F5 02 SBC 02,X
00/03B0: 00 8B BRK 8B
00/03B2: 02 7D COP 7D
00/03B4: 01 F5 ORA (F5,X)
00/03B6: 02 00 COP 00
00/03B8: 91 02 STA (02),Y
00/03BA: 81 01 STA (01,X)
00/03BC: F5 02 SBC 02,X
00/03BE: F0 95 BEQ 0355 {-6B}
00/03C0: 02 CC COP CC
00/03C2: 02 F5 COP F5
00/03C4: 02 00 COP 00
00/03C6: 98 TYA
00/03C7: 02 CC COP CC
00/03C9: 02 F5 COP F5
00/03CB: 02 00 COP 00
00/03CD: A2 02 7D LDX #7D02
00/03D0: 01 F5 ORA (F5,X)
00/03D2: 02 00 COP 00
00/03D4: A8 TAY
00/03D5: 02 7D COP 7D
00/03D7: 01 F5 ORA (F5,X)
00/03D9: 02 00 COP 00
00/03DB: AC 02 6A LDY 6A02
00/03DE: 02 F5 COP F5
00/03E0: 02 00 COP 00
00/03E2: AF 02 7D 01 LDA 017D02
00/03E6: F5 02 SBC 02,X
00/03E8: 00 B2 BRK B2
00/03EA: 02 60 COP 60
00/03EC: 02 F5 COP F5
00/03EE: 02 00 COP 00
00/03F0: B5 02 LDA 02,X
00/03F2: 81 01 STA (01,X)
00/03F4: F5 02 SBC 02,X
00/03F6: 00 B8 BRK B8
00/03F8: 02 64 COP 64
00/03FA: 02 00 COP 00
00/03FC: 00 00 BRK 00
00/03FE: 00 00 BRK 00
00/0400: 00 00 BRK 00
00/0402: 00 00 BRK 00
00/0404: 00 00 BRK 00
00/0406: 00 00 BRK 00
00/0408: 00 00 BRK 00
00/040A: 00 00 BRK 00
00/040C: 00 00 BRK 00
00/040E: 00 00 BRK 00
00/0410: 00 00 BRK 00
00/0412: 00 00 BRK 00
00/0414: 00 00 BRK 00
00/0416: 00 00 BRK 00
00/0418: 00 00 BRK 00
00/041A: 00 00 BRK 00
00/041C: 00 00 BRK 00
00/041E: 00 00 BRK 00
00/0420: 00 00 BRK 00
00/0422: 00 00 BRK 00
00/0424: 00 00 BRK 00
00/0426: 00 00 BRK 00
00/0428: 00 00 BRK 00
00/042A: 00 00 BRK 00
00/042C: 00 00 BRK 00
00/042E: 00 00 BRK 00
00/0430: 00 00 BRK 00
00/0432: 00 00 BRK 00
00/0434: 00 00 BRK 00
00/0436: 00 00 BRK 00
00/0438: 00 00 BRK 00
00/043A: 00 00 BRK 00
00/043C: 00 00 BRK 00
00/043E: 00 00 BRK 00
00/0440: 00 00 BRK 00
00/0442: 00 00 BRK 00
00/0444: 00 00 BRK 00
00/0446: 00 00 BRK 00
00/0448: 00 00 BRK 00
00/044A: 00 00 BRK 00
00/044C: 00 00 BRK 00
00/044E: 00 00 BRK 00
00/0450: 00 00 BRK 00
00/0452: 00 00 BRK 00
00/0454: 00 00 BRK 00
00/0456: 00 00 BRK 00
00/0458: 00 00 BRK 00
00/045A: 00 00 BRK 00
00/045C: 00 00 BRK 00
00/045E: 00 00 BRK 00
00/0460: 00 00 BRK 00
00/0462: 00 00 BRK 00
00/0464: 00 00 BRK 00
00/0466: 00 00 BRK 00
00/0468: 00 00 BRK 00
00/046A: 00 00 BRK 00
00/046C: 00 00 BRK 00
00/046E: 00 00 BRK 00
00/0470: 00 00 BRK 00
00/0472: 00 00 BRK 00
00/0474: 00 00 BRK 00
00/0476: 00 00 BRK 00
00/0478: 00 00 BRK 00
00/047A: 00 00 BRK 00
00/047C: 00 00 BRK 00
00/047E: 00 00 BRK 00
00/0480: 00 00 BRK 00
00/0482: 00 00 BRK 00
00/0484: 00 00 BRK 00
00/0486: 00 00 BRK 00
00/0488: 00 00 BRK 00
00/048A: 00 00 BRK 00
00/048C: 00 00 BRK 00
00/048E: 00 00 BRK 00
00/0490: 00 00 BRK 00
00/0492: 00 00 BRK 00
00/0494: 00 00 BRK 00
00/0496: 00 00 BRK 00
00/0498: 00 00 BRK 00
00/049A: 00 00 BRK 00
00/049C: 00 00 BRK 00
00/049E: 00 00 BRK 00
00/04A0: 00 00 BRK 00
00/04A2: 00 00 BRK 00
00/04A4: 00 00 BRK 00
00/04A6: 00 00 BRK 00
00/04A8: 00 00 BRK 00
00/04AA: 00 00 BRK 00
00/04AC: 00 00 BRK 00
00/04AE: 00 00 BRK 00
00/04B0: 00 00 BRK 00
00/04B2: 00 00 BRK 00
00/04B4: 00 00 BRK 00
00/04B6: 00 00 BRK 00
00/04B8: 00 00 BRK 00
00/04BA: 00 00 BRK 00
00/04BC: 00 00 BRK 00
00/04BE: 00 00 BRK 00
00/04C0: 00 00 BRK 00
00/04C2: 00 00 BRK 00
00/04C4: 00 00 BRK 00
00/04C6: 00 00 BRK 00
00/04C8: 00 00 BRK 00
00/04CA: 00 00 BRK 00
00/04CC: 00 00 BRK 00
00/04CE: 00 00 BRK 00
00/04D0: 00 00 BRK 00
00/04D2: 00 00 BRK 00
00/04D4: 00 00 BRK 00
00/04D6: 00 00 BRK 00
00/04D8: 00 00 BRK 00
00/04DA: 00 00 BRK 00
00/04DC: 00 00 BRK 00
00/04DE: 00 00 BRK 00
00/04E0: 00 00 BRK 00
00/04E2: 00 00 BRK 00
00/04E4: 00 00 BRK 00
00/04E6: 00 00 BRK 00
00/04E8: 00 00 BRK 00
00/04EA: 00 00 BRK 00
00/04EC: 00 00 BRK 00
00/04EE: 00 00 BRK 00
00/04F0: 00 00 BRK 00
00/04F2: 00 00 BRK 00
00/04F4: 00 00 BRK 00
00/04F6: 00 00 BRK 00
00/04F8: 00 00 BRK 00
00/04FA: 00 00 BRK 00
00/04FC: 00 00 BRK 00
00/04FE: 00 00 BRK 00
00/0500: 00 00 BRK 00
00/0502: 00 00 BRK 00
00/0504: 00 00 BRK 00
00/0506: 00 00 BRK 00
00/0508: 00 00 BRK 00
00/050A: 00 00 BRK 00
00/050C: 00 00 BRK 00
00/050E: 00 00 BRK 00
00/0510: 00 00 BRK 00
00/0512: 00 00 BRK 00
00/0514: 00 00 BRK 00
00/0516: 00 00 BRK 00
00/0518: 00 00 BRK 00
00/051A: 00 00 BRK 00
00/051C: 00 00 BRK 00
00/051E: 00 00 BRK 00
00/0520: 00 00 BRK 00
00/0522: 00 00 BRK 00
00/0524: 00 00 BRK 00
00/0526: 00 00 BRK 00
00/0528: 00 00 BRK 00
00/052A: 00 00 BRK 00
00/052C: 00 00 BRK 00
00/052E: 00 00 BRK 00
00/0530: 00 00 BRK 00
00/0532: 00 00 BRK 00
00/0534: 00 00 BRK 00
00/0536: 00 00 BRK 00
00/0538: 00 00 BRK 00
00/053A: 00 00 BRK 00
00/053C: 00 00 BRK 00
00/053E: 00 00 BRK 00
00/0540: 00 00 BRK 00
00/0542: 00 00 BRK 00
00/0544: 00 00 BRK 00
00/0546: 00 00 BRK 00
00/0548: 00 00 BRK 00
00/054A: 00 00 BRK 00
00/054C: 00 00 BRK 00
00/054E: 00 00 BRK 00
00/0550: 00 00 BRK 00
00/0552: 00 00 BRK 00
00/0554: 00 00 BRK 00
00/0556: 00 00 BRK 00
00/0558: 00 00 BRK 00
00/055A: 00 00 BRK 00
00/055C: 00 00 BRK 00
00/055E: 00 00 BRK 00
00/0560: 00 00 BRK 00
00/0562: 00 00 BRK 00
00/0564: 00 00 BRK 00
00/0566: 00 00 BRK 00
00/0568: 00 00 BRK 00
00/056A: 00 00 BRK 00
00/056C: 00 00 BRK 00
00/056E: 00 00 BRK 00
00/0570: 00 00 BRK 00
00/0572: 00 00 BRK 00
00/0574: 00 00 BRK 00
00/0576: 00 00 BRK 00
00/0578: 00 00 BRK 00
00/057A: 00 00 BRK 00
00/057C: 00 00 BRK 00
00/057E: 00 00 BRK 00
00/0580: 00 00 BRK 00
00/0582: 00 00 BRK 00
00/0584: 00 00 BRK 00
00/0586: 00 00 BRK 00
00/0588: 00 00 BRK 00
00/058A: 00 00 BRK 00
00/058C: 00 00 BRK 00
00/058E: 00 00 BRK 00
00/0590: 00 00 BRK 00
00/0592: 00 00 BRK 00
00/0594: 00 00 BRK 00
00/0596: 00 00 BRK 00
00/0598: 00 00 BRK 00
00/059A: 00 00 BRK 00
00/059C: 00 00 BRK 00
00/059E: 00 00 BRK 00
00/05A0: 00 00 BRK 00
00/05A2: 00 00 BRK 00
00/05A4: 00 00 BRK 00
00/05A6: 00 00 BRK 00
00/05A8: 00 00 BRK 00
00/05AA: 00 00 BRK 00
00/05AC: 00 00 BRK 00
00/05AE: 00 00 BRK 00
00/05B0: 00 00 BRK 00
00/05B2: 00 00 BRK 00
00/05B4: 00 00 BRK 00
00/05B6: 00 00 BRK 00
00/05B8: 00 00 BRK 00
00/05BA: 00 00 BRK 00

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,176 @@
;
; OMF segment summary:
;
; #01: DATA len=0x000098 loadName='' segName='~ExpressLoad'
; #02: CODE len=0x00013c loadName='' segName='main'
;
;
; Segment #1 (1): loadName='' segName='~ExpressLoad':
; type=DATA length=152 OMF v2.1
; flags: dynamic
;
OMF: LCONST record (0x004f bytes follow)
00/0000: 00 00 BRK 00
00/0002: 00 00 BRK 00
00/0004: 00 00 BRK 00
00/0006: 0A ASL
00/0007: 00 00 BRK 00
00/0009: 00 00 BRK 00
00/000B: 00 00 BRK 00
00/000D: 00 02 BRK 02
00/000F: 00 D8 BRK D8
00/0011: 00 00 BRK 00
00/0013: 00 E3 BRK E3
00/0015: 00 00 BRK 00
00/0017: 00 BB BRK BB
00/0019: 01 00 ORA (00,X)
00/001B: 00 18 BRK 18
00/001D: 00 00 BRK 00
00/001F: 00 00 BRK 00
00/0021: 00 04 BRK 04
00/0023: 02 00 COP 00
00/0025: 00 01 BRK 01
00/0027: 00 00 BRK 00
00/0029: 30 00 BMI 002B {+00}
00/002B: 00 00 BRK 00
00/002D: 00 00 BRK 00
00/002F: 00 00 BRK 00
00/0031: 00 00 BRK 00
00/0033: 00 00 BRK 00
00/0035: 00 02 BRK 02
00/0037: 00 00 BRK 00
00/0039: 00 00 BRK 00
00/003B: 00 2C BRK 2C
00/003D: 00 00 BRK 00
00/003F: 00 00 BRK 00
00/0041: 00 00 BRK 00
00/0043: 00 00 BRK 00
00/0045: 00 00 BRK 00
00/0047: 00 00 BRK 00
00/0049: 00 04 BRK 04
00/004B: 6D 61 69 ADC 6961
00/004E: 6E 00 00 ROR 0000
;
; Segment #2 (2): loadName='' segName='main':
; type=CODE length=316 OMF v2.1
; flags: noSpecial posnIndep
;
OMF: LCONST record (0x00e3 bytes follow)
00/0000: E2 30 SEP #30
00/0002: AF 68 C0 00 LDA 00C068 rw:STATEREG
00/0006: 48 PHA
00/0007: A9 0C 8F LDA #8F0C
00/000A: 68 PLA
00/000B: C0 00 38 CPY #3800
00/000E: 22 94 00 E1 JSL E10094 ToBramSetup
00/0012: 68 PLA
00/0013: 8F 68 C0 00 STA 00C068 rw:STATEREG
00/0017: C2 30 REP #30
00/0019: 8B PHB
00/001A: 48 PHA
00/001B: A2 04 04 LDX #0404
00/001E: 22 00 00 E1 JSL E10000 QDVersion():Vers
00/0022: 68 PLA
00/0023: 29 00 7F AND #7F00
00/0026: C9 00 01 CMP #0100
00/0029: F0 14 BEQ 003F {+14}
00/002B: 48 PHA
00/002C: A2 01 04 LDX #0401
00/002F: 22 00 00 E1 JSL E10000 TLVersion():Vers
00/0033: 68 PLA
00/0034: 29 00 7F AND #7F00
00/0037: C9 00 04 CMP #0400
00/003A: 90 03 BCC 003F {+03}
00/003C: 82 79 00 BRL 00B8 {+79}
00/003F: EB XBA
00/0040: 18 CLC
00/0041: 69 30 00 ADC #0030
00/0044: E2 30 SEP #30
00/0046: 8F E2 00 00 STA 0000E2
00/004A: C2 30 REP #30
00/004C: A0 C8 00 LDY #00C8
00/004F: 5A PHY
00/0050: 48 PHA
00/0051: 48 PHA
00/0052: F4 00 00 PEA 0000
00/0055: F4 00 00 PEA 0000
00/0058: F4 01 4F PEA 4F01
00/005B: F4 00 00 PEA 0000
00/005E: 48 PHA
00/005F: 48 PHA
00/0060: A2 02 09 LDX #0902
00/0063: 22 00 00 E1 JSL E10000 NewHandle(Size/4,MemID,Attr,@loc):H
00/0067: FA PLX
00/0068: FA PLX
00/0069: B0 5C BCS 00C7 {+5C}
00/006B: 7A PLY
00/006C: 88 DEY
00/006D: 10 E0 BPL 004F {-20}
00/006F: F4 01 4F PEA 4F01
00/0072: A2 02 11 LDX #1102
00/0075: 22 00 00 E1 JSL E10000 DisposeAll(MemID)
00/0079: 48 PHA
00/007A: F4 00 A0 PEA A000
00/007D: A2 03 20 LDX #2003
00/0080: 22 00 00 E1 JSL E10000 GetNewID(Kind):MemID
00/0084: 68 PLA
00/0085: DA PHX
00/0086: DA PHX
00/0087: DA PHX
00/0088: DA PHX
00/0089: DA PHX
00/008A: 48 PHA
00/008B: F4 C9 00 PEA 00C9
00/008E: F4 C9 00 PEA 00C9
00/0091: F4 FF FF PEA FFFF
00/0094: A2 11 09 LDX #0911
00/0097: 22 00 00 E1 JSL E10000 InitialLoad(MemID,@path,F):dpsSz,dps,@l,MemID
00/009B: B0 2A BCS 00C7 {+2A}
00/009D: 7A PLY
00/009E: FA PLX
00/009F: 68 PLA
00/00A0: 7A PLY
00/00A1: 7A PLY
00/00A2: 22 BF 00 00 JSL 0000BF
00/00A6: A9 00 00 LDA #0000
00/00A9: 8F 88 01 E1 STA E10188
00/00AD: 8F 8A 01 E1 STA E1018A
00/00B1: A2 01 16 LDX #1601
00/00B4: 22 00 00 E1 JSL E10000 SetDefaultTPT()
00/00B8: AB PLB
00/00B9: A9 FF FF LDA #FFFF
00/00BC: 83 04 STA 04,S
00/00BE: 6B RTL
00/00BF: EB XBA
00/00C0: 48 PHA
00/00C1: 8B PHB
00/00C2: 8A TXA
00/00C3: 3A DEC
00/00C4: 83 01 STA 01,S
00/00C6: 6B RTL
00/00C7: 00 FF BRK FF
00/00C9: 19 2A 2F ORA 2F2A,Y
00/00CC: 73 79 ADC (79,S),Y
00/00CE: 73 74 ADC (74,S),Y
00/00D0: 65 6D ADC 6D
00/00D2: 2F 73 79 73 AND 737973
00/00D6: 74 65 STZ 65,X
00/00D8: 6D 2E 73 ADC 732E
00/00DB: 65 74 ADC 74
00/00DD: 75 70 ADC 70,X
00/00DF: 2F 74 73 2A AND 2A7374
00/00E3: F5 02 SBC 02,X
00/00E5: F0 8C BEQ 0073 {-74}
00/00E7: 00 C9 BRK C9
00/00E9: 00 F7 BRK F7
00/00EB: 03 00 ORA 00,S
00/00ED: 00 00 BRK 00
00/00EF: 00 00 BRK 00
00/00F1: 8F F7 04 00 STA 0004F7
00/00F5: 00 00 BRK 00
00/00F7: 01 01 ORA (01,X)
00/00F9: 47 A3 EOR [A3]
00/00FB: 00 00 BRK 00

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

5602
source/d8_lores/DEMO.LORES Normal file

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,3 @@
BLOAD MAKEEXEC
CALL -151
6000G

View File

@ -0,0 +1,3 @@
BLOAD MINIFY
CALL -151
7000G

1907
source/d8_lores/MAKEEXEC Normal file

File diff suppressed because it is too large Load Diff

2424
source/d8_lores/MINIFY Normal file

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,441 @@
*
*``````````````````````````````*
* DEMO.LORES *
* *
* A DEMO OF THE MACROS AND *
* SUBROUTINES FOR USING LORES *
* GRAPHICS. *
* *
* AUTHOR: NATHAN RIGGS *
* CONTACT: NATHAN.RIGGS@ *
* OUTLOOK.COM *
* *
* DATE: 03-OCT-2019 *
* ASSEMBLER: MERLIN 8 PRO *
* OS: DOS 3.3 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
** ASSEMBLER DIRECTIVES
*
CYC AVE
EXP OFF
TR ON
DSK DEMO.LORES
OBJ $BFE0
ORG $6000
*
*``````````````````````````````*
* TOP INCLUDES (PUTS, MACROS) *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
PUT MIN.HEAD.REQUIRED
USE MIN.MAC.REQUIRED
USE MIN.MAC.LORES
PUT MIN.HOOKS.LORES
*
*``````````````````````````````*
_PRN "PLOTTING MACROS",8D
_PRN "===============",8D8D
* PROGRAM MAIN BODY *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
]COLOR EQU VARTAB+16
]HOME EQU $FC58
*
JSR ]HOME
_PRN "LOW RESOLUTION GRAPHICS LIBRARY",8D
_PRN "===============================",8D8D
_PRN "THIS DEMO ILLUSTRATES HOW TO USE",8D
_PRN "THE MACROS DEDICATED TO CREATING",8D
_PRN "LORES GRAPHICS. THESE LACROS LARGELY",8D
_PRN "CONSIST OF THE MOST MASIC FUCNTIONS",8D
_PRN "NECESSARY TO BUILD MORE COMPLE ROUTINES,",8D
_PRN "SUCH AS ANIMATION, SPRITES, AND SO ON.",8D8D
_PRN "CURRENTLY, THE MACROS AVAILABLE ARE:",8D8D
_WAIT
_PRN " - LVIEWPG: SET VIEWING PAGE",8D
_PRN " - LWORKPG: SET WORKING (PLOTTING) PAGE",8D
_PRN " - LRGF: INIT LORES FULL SCREEN MODE",8D
_PRN " - LRGP: INIT LORES MIXED MODE",8D
_PRN " - LFCLR: CLEAR FULL SCREEN MODE TO COLOR",8D
_PRN " - LPCLR: CLEAR MIXED MODE TO COLOR",8D
_PRN " - LPLOT: PLOT A COLORED PIXEL AT X,Y",8D
_PRN " - LLINE: PRINT A LINE FROM X1,Y1 TO X2,Y2",8D
_PRN " - LCIRC: CREATE A CIRCLE WITH A GIVEN RADIUS",8D
_PRN " - LVLIN: PLOT VERTICAL LINE",8D
_PRN " - LHLIN: PLOT HORIZONTAL LINE",8D
_PRN " - LRGET: GET COLOR OF PIXEL AT X,Y",8D
_PRN " - LCHAR: PRINT A LORES CHARACTER AT X,Y",8D
_WAIT
*
JSR ]HOME
_PRN "SETTING THE WORKING AND VIEWING PAGE",8D
_PRN "====================================",8D8D
_PRN "THE 'WORKING PAGE' IS THE VIDEO MEMORY",8D
_PRN "PAGE THAT GETS PLOTTED TO FROM EACH",8D
_PRN "MACRO, WHEREAS THE 'VIEWING PAGE' IS THE",8D
_PRN "PAGE THAT IS CURRENTLY DISPLAYED ON SCREEN.",8D
_PRN "THIS SETUP IS USEFUL FOR WHAT IS KNOWN AS",8D
_PRN "PAGE-FLIPPING: ALTERING THE OFFSCREEN PAGE ",8D
_PRN "WHILE THE OTHER PAGE IS BEING VIEWED, THEN",8D
_PRN "FLIPPING THE VIEWING PAGE FOR QUICK SWITCHING",8D
_PRN "AND ANIMATION.",8D8D
_WAIT
_PRN "TO SET THE WORKING PAGE, USE THE LWORKPG MACRO.",8D
_PRN "TO SET THE VIEW PAGE, USE THE LVIEWP MACRO.",8D
_PRN "THESE WORK AS SUCH:",8D8D
_PRN " LWORKPG #2 ",8D
_PRN " LVIEWPG #1",8D8D
_WAIT
_PRN "*** HOWEVER ***, THERE IS A MINOR CAVEAT HERE:",8D
_PRN "IF YOU'RE RUNNING A MERLIN DISK, PAGE 2 IS NOT",8D
_PRN "AVAILABLE TO USE, AS MERLIN USES IT FOR DATA STORAGE.",8D
_PRN "ANY DEMO THAT TRIES TO USE PAGE 2 ON A MERLIN",8D
_PRN "DISK WILL GET ERRORS OR STRANGE BEHAVIORS.",8D
_PRN "THUS, THIS DEMO WILL ONLY UTILIZE PAGE 1.",8D8D
_WAIT
JSR ]HOME
_PRN "INITIALIZING LORES GRAPHICS MODE",8D
_PRN "================================",8D8D
_PRN "TO BEGIN USING LOW RESOLUTION GRAPHINCS,"8D
_PRN "YOU MUST FIRST DECIDE WHETHER TO USE FULL",8D
_PRN "SCREEN MODE, WITH A RESOLUTION OF 40X48 PIXELS,",8D
_PRN "OR MIXED MODE, WITH HAS A 40X40 RESOLUTION",8D
_PRN "WITH AN ADDITIONAL FOUR BOTTOM LINES FOR",8D
_PRN "DISPLAYING TEXT.",8D8D
_WAIT
_PRN "TO INITIALIZE FULL SCREEN MODE, USE THE ",8D
_PRN "LRFGR MACRO (NO PARAMTERS). TO USE MIXED MODE,",8D
_PRN "UTILIZE THE LRPGR MACRO.",8D8D
_WAIT
_PRN "LASTLY, THERE'S A MATTER OF CLEARING THE SCREEN IN",8D
_PRN "EACH MODE. THIS IS ACCOMPLISHED WITH THE LRFCLR ",8D
_PRN "MACRO FOR FULL-SCREEN MODE AND WITH THE LRPCLR",8D
_PRN "FOR MIXED GRAPHICS MODE. THESE BOTH USE A ",8D
_PRN "PARAMETER THAT DETERMINES THE BACKGROUND COLOR ",8D
_PRN "USED TO FILL THE SCREEN, AS SUCH:",8D8D
_PRN " LRFCLR #]BLACK",8D8D
_WAIT
_PRN "FOR THIS DEMO, WE'LL EXCLUSIVELY USE FULL",8D
_PRN "SCREEN MODE. LET'S TEST CLEARING THE SCREEN WITH",8D
_PRN "ALL 16 COLORS BEFORE MOVING ONL PRESS A KEY",8D
_PRN "TO CONTINUE TO THE NEXT SCREEN."
_WAIT
LWORKPG #1 ; SET WORKING PAGE AND
LVIEWPG #1 ; TO PAGE 1. PAGE 2 WILL NOT WORK
LRGF ; WITH MERLIN LOADED; THEN, INIT
LDY #$FF ; LORES GRAPHICS FULL SCREEN MODE
STY ]COLOR ; MAC COLOR - 1
:LP1
INC ]COLOR ; INCREASE THE COLOR
LFCLR ]COLOR ; CLEAR FULL SCREEN WITH COLOR SELECTED
_WAIT ; WAIT UNTIL KEYPRESS
LDA ]COLOR ; LOAD COLOR AGAIN
CMP #$F ; IF IT'S $F (15), THEN
BNE :LP1 ; WE ARE DONE DEMOING SCREEN FILLS
*
BIT TEXTON
JSR ]HOME
_PRN "THE NEXT COMMAND FOR LOW RESOLUTION",8D
_PRN "GRAPHICS IS THE MACRO LPLOT, WHICH ",8D
_PRN "SIMPLY PLOTS A PIXEL AT THE GIVEN X,Y",8D
_PRN "COORDINATE IN THE SPECIFIED COLOR.",8D8D
_WAIT
_PRN "FURTHER, JUST LIKE APPLESOFT BASIC, WE",8D
_PRN "HAVE MACROS FOR CREATING HORIZONTAL",8D
_PRN "AND VERTICAL LINES QUICKLY. THESE",8D
_PRN "ARE CALLED LHLIN AND LVLIN, RESPECTIVELY,",8D
_PRN "AND ACCEPT AN X OR Y STARTING POINT,",8D
_PRN "AN X OR Y ENDPOINT, AN X OR Y LINE",8D
_PRN "POSITION (WHICH DOES NOT CHANGE), AND THE",8D
_PRN "SPECIFIED COLOR.",8D8D
_WAIT
JSR ]HOME
_PRN "BEYOND THESE ROUTINES THAT CAN BE FOUND",8D
_PRN "IN APPLESOFT BASIC, THERE ARE TWO MORE",8D
_PRN "PLOTTING MACROS WORTH NOTING: LLINE AND",8D
_PRN "LCIRC.",8D8D
_WAIT
_PRN "LLINE CREATES A DIAGONAL LINE FROM ONE",8D
_PRN "ORIGIN X,Y COORDINATE TO A DESTINATION",8D
_PRN "X,Y COORDINATE IN A GIVEN COLOR. THIS",8D
_PRN "USES BRESSENHAM'S LINE ALGORITHM, WHICH",8D
_PRN "IS ONE OF THE FASTEST ALGORITHMS THAT",8D
_PRN "CAN BE USED FOR LINES ON 8-BIT SYSTEMS.",8D8D
_WAIT
_PRN "THE OTHER MACRO, LCIRC, ALSO USES AN",8D
_PRN "ALGORITHM DEVELOPED BY BRESSENHAM, EXCEPT",8D
_PRN "THIS TIME TO CREATE CIRCLES. PLEASE TAKE",8D
_PRN "A MOMENT OF SILENCE TO THANK THIS",8D
_PRN "BRILLIANT MAN, AND THEN PRESS RETURN...",8D
_WAIT
JSR ]HOME
_PRN "ALL RIGHT!",8D8D
_PRN "WE SHOULD PROBABLY TEST THESE NOW. FIRST,",8D
_PRN "LET'S HAVE A LOOK AT THE LISTING THAT",8D
_PRN "WILL BE IMPLEMENTED. AFTER READING THROUGH",8D
_PRN "IT, PRESS A KEY TO SEE IT IN ACTION. NOTE",8D
_PRN "THAT YOU WILL HAVE TO PRESS A KEY AFTER",8D
_PRN "EACH MACRO IS SHOWCASED.",8D8D
_WAIT
_PRN " LPLOT #10;#10;#]MAGENTA",8D
_PRN " LPOT #11;#11;#]PINK",8D
_PRN " _WAIT",8D
_PRN " LHLIN #15;#30;#2;#]PURPLE",8D
_PRN " _WAIT",8D
_PRN " LVLIN #2;#17;#30;#]YELLOW",8D
_PRN " _WAIT",8D
_PRN " LLINE #1;#1;#20;#30;#]ORANGE",8D
_PRN " _WAIT",8D
_PRN " LCIRC #10;#10;#10;#]LBLUE",8D
_PRN " _WAIT",8D
_WAIT
*
LRGF
LFCLR #]WHITE
LPLOT #10;#10;#]MAGENTA ; PLOT MAGENTA PIXEL AT 10,10
LPLOT #11;#11;#]PINK ; PLOT PINK PIXEL AT 11,11
_WAIT ; WAIT UP
*
LHLIN #15;#30;#2;#]PURPLE ; NOW DRAW A HORIZONTAL
_WAIT ; LINE FROM X1 TO X2 AT Y
*
LVLIN #2;#17;#30;#]YELLOW ; NOW CREATE A YELLOW VERTICAL LINE
_WAIT
LLINE #1;#1;#20;#30;#]ORANGE ; NOW PLOT ORGANGE DIAGONAL
_WAIT ; line from X1,Y2 to X2,Y2
*
LCIRC #10;#10;#10;#]LBLUE ; NOW DRAW A LIGHT BLUE CIRCLE
_WAIT
*
** THE ABOVE HAS FINISHED THE MOST BASIC PLOTTING MECHANISMS
** IN THE LORES LIBRARY.
*
LRGET #38;#38 ; NOW GET THE COLOR OF A GIVE PIXEL
BIT TEXTON
JSR ]HOME
_PRN "AN ADDITIONAL MACR THAT COMES IN",8D
_PRN "HANDY IS THE LRGET MACRO, WHICH",8D
_PRN "RETURNS THE COLOR OF A PIXEL AT",8D
_PRN "THE GIVEN X,Y COORDINATE.",8D8D
_PRN "CURRENTLY, THIS MACRO HAS A QUIRK THAT",8D
_PRN "NEEDS TO BE CONSIDERED: WHEN OR NOT",8D
_PRN "THE Y COORDINATE IS EVEN OR ODD WILL",8D
_PRN "DETERMINE WHETHER THE COLOR IS RETURNED",8D
_PRN "IN THE LOW BYTE OR HIGH BYTE OF ",8D
_PRN "THE BYTE RETURNED BY THE MACRO. ",8D8D
_PRN "IF THE Y COORDINATE IS EVEN, THEN THE ",8D
_PRN "COLOR WILL BE RETURNED IN THE HIGH",8D
_PRN "BYTE; IF ODD, THEN THE COLOR IS ",8D
_PRN "RETURNED IN THE LOW BYTE. FUTURE ",8D
_PRN "REVISIONS OF THIS MACRO WILL FIX THE",8D
_PRN "QUIRK FOR GOOD.",8D8D
_WAIT
_PRN "THUS, THE INSTRUCTION 'LRGET #38;#38; FROM",8D
_PRN "THE PREVIOUS SCREEN WOULD RETURN '0F'.",8D
_WAIT
DUMP #RETURN;#1 ; THE ROW IS EVEN, AND IN THE LOW BYTE
_WAIT ; IF ROW IS ODD
*
** THE FOLLOWING LINES PLOT ALL OF THE LORES CHARACTERS IN
** THE SET INCLUDED IN THE LIBRARY, TOTALLING 64. NOTE THAT
** THESE ARE 4X5 IN SIZE SO AS TO ALLOW FOR 8 CHARACTER WITH
** SPACES IN BETWEEN THEM TO FIT BOTH HORIZONTALLY AND
** VERTICALLY ON THE 40*48 LORES FULL SCREEN. ALSO NOTE THAT
** EACH CHARACTER IS THREE BYTES LONG, RELYING ON BIT VALUES
** TO DETERMINE IF PRAT OF A CHARACTER SHOULD BE PLOTTED.
*
JSR ]HOME
_PRN "LOW RESOLUTION TEXT CHARACTERS",8D
_PRN "==============================",8D
_PRN "ONE LAST FEATURE OF THE LORES",8D
_PRN "GRAPHICS LIBRARY IS THE LCHAR MACRO,",8D
_PRN "WHICH PRINTS A CUSTOM LORES FONT",8D
_PRN "CHARACTER THAT IS 4 PIXELS WIDE AND",8D
_PRN "6 PIXELS HIGH (THE LAST LINE IS",8D
_PRN "USUALLY BLANK) TO ALLOW FOR 8 LETTERS",8D
_PRN "TO FIT ON THE SCREEN BOTH ",8D
_PRN "HORIZONTALLY AND VERTICALLY.",8D8D
_WAIT
_PRN "THESE CHARACTERS ARE THREE BYTES EACH,",8D
_PRN "AND THEIR SHAPES ARE STORED IN BINARY",8D
_PRN "TO SAVE SPACE. THE MACRO WORKS AS SUCH:",8D8D
_PRN " LCHAR #15;#6;LR_A;#]DBLUE",8D8D
_PRN "WHICH WOULD PRINT AN 'A' CHARACTER AT",8D
_PRN "THE COORDINATES 15,16 IN DARK BLUE.",8D8D
_WAIT
_PRN "LET'S NOW SEE THIS IN ACTION, FOR EACH",8D
_PRN "DEFAULT CHARACTER. IT SHOULD BE NOTED THAT",8D
_PRN "YOU CAN ALSO ADD YOUR OWN EXTENDED",8D
_PRN "CHARACTERS, AS LONG AS YOU FOLLOW THE ",8D
_PRN "SAME 3-BYTE FORMAT.",8D8D
_WAIT
*
LRGF ; GO BACK TO FULL SCREEN LORES GRAPHICS
LFCLR #]WHITE ; CLEAR THE BACKGROUND TO WHITE
LCHAR #0;#0;LR_A;#0
LCHAR #5;#0;LR_B;#1
LCHAR #10;#0;LR_C;#2
LCHAR #15;#0;LR_D;#3
LCHAR #20;#0;LR_E;#4
LCHAR #25;#0;LR_F;#5
LCHAR #30;#0;LR_G;#6
LCHAR #35;#0;LR_H;#7
LCHAR #0;#6;LR_I;#8
LCHAR #5;#6;LR_J;#9
LCHAR #10;#6;LR_K;#10
LCHAR #15;#6;LR_L;#11
LCHAR #20;#6;LR_M;#12
LCHAR #25;#6;LR_N;#13
LCHAR #30;#6;LR_O;#14
LCHAR #35;#6;LR_P;#0
LCHAR #0;#12;LR_Q;#1
LCHAR #5;#12;LR_R;#2
LCHAR #10;#12;LR_S;#3
LCHAR #15;#12;LR_T;#4
LCHAR #20;#12;LR_U;#5
LCHAR #25;#12;LR_V;#6
LCHAR #30;#12;LR_W;#7
LCHAR #35;#12;LR_X;#8
LCHAR #0;#18;LR_Y;#9
LCHAR #5;#18;LR_Z;#10
LCHAR #10;#18;LR_0;#11
LCHAR #15;#18;LR_1;#12
LCHAR #20;#18;LR_2;#13
LCHAR #25;#18;LR_3;#14
LCHAR #30;#18;LR_4;#0
LCHAR #35;#18;LR_5;#1
LCHAR #0;#24;LR_6;#2
LCHAR #5;#24;LR_7;#3
LCHAR #10;#24;LR_8;#4
LCHAR #15;#24;LR_9;#5
LCHAR #20;#24;LR_EXC;#6
LCHAR #25;#24;LR_QUEST;#7
LCHAR #30;#24;LR_PRD;#8
LCHAR #35;#24;LR_CMA;#9
LCHAR #0;#30;LR_APOST;#10
LCHAR #5;#30;LR_QUOT;#11
LCHAR #10;#30;LR_COLON;#12
LCHAR #15;#30;LR_SEMI;#13
LCHAR #20;#30;LR_MINUS;#14
LCHAR #25;#30;LR_PLUS;#0
LCHAR #30;#30;LR_EQUAL;#1
LCHAR #35;#30;LR_CHECKER1;#2
LCHAR #0;#36;LR_CHECKER2;#3
LCHAR #5;#36;LR_UP;#4
LCHAR #10;#36;LR_DOWN;#5
LCHAR #15;#36;LR_LEFT;#6
LCHAR #20;#36;LR_RIGHT;#7
LCHAR #25;#36;LR_FSLASH;#8
LCHAR #30;#36;LR_BSLASH;#9
LCHAR #35;#36;LR_LPAR;#10
LCHAR #0;#42;LR_RPAR;#11
LCHAR #5;#42;LR_BLOCK;#12
LCHAR #10;#42;LR_GOOMBA;#13
LCHAR #15;#42;LR_PERCENT;#14
LCHAR #20;#42;LR_BULLET;#0
LCHAR #25;#42;LR_OFACE;#1
LCHAR #30;#42;LR_HFACE;#2
LCHAR #35;#42;LR_SFACE;#3
_WAIT
*
** LASTLY,WE HVE A MORE COMPLICATED DEMO SHOING MOST OF
** THE REST OF THE ROUTINES WORKING IN UNISON. THIS IS NOT
** MEANT TO BE IMPRESSIVE OR EVEN SPEEDY; IT SIMPLY SHOWS WHAT
** CAN BE ACCOMPLISHED WITH VERY LITTLE OVERHEAD.
*
** TO EXIT THE DEMO, YOU WILL HAVE TO ISSUE A CONTROL-BREAK, AS
** THE END OF THE DEMO IS N INFINITE LOOP.
*
*
BIT TEXTON
JSR ]HOME
_PRN "FINALLY, JUST FOR FUN, LET'S USE",8D
_PRN "SOME OF THESE MACROS TO CREATE",8D
_PRN "A SIMPLE ANIMATED SCREEN. NOTE THAT",8D
_PRN "WHILE THESE LORES MACROS ARE PERFECTLY",8D
_PRN "APPROPRIATE FOR MOST USES, THEY WOULD NEED",8D
_PRN "A LOT OF REWORKING TO COMPARE TO A",8D
_PRN "DEMOSCENE PROGRAM. FOR MOST GAMES AND DRAWING",8D
_PRN "UTILITIES, HOWEVER, THESE SHOULD WORK FINE.",8D8D
_WAIT
_PRN "WHEN YOU ARE DONE WATCHING THE SHORT DEMO,",8D
_PRN "USE CTRL-BREAK TO END THE PROGRAM.",8D
_WAIT
LRGF
LFCLR #]BLACK
LDA #1
STA ]CC1
:RELOOP
LVLIN #0;#47;]HH;]CC1
INC ]HH
INC ]CC1
LDY ]HH
CPY #39
BNE :CONTLP0
LDA #0
STA ]HH
*
:CONTLP0
LCHAR #10;#37;LR_K;#0
LCHAR #15;#38;LR_I;#0
LCHAR #20;#39;LR_L;#0
LCHAR #25;#40;LR_L;#0
INC ]CC1
LDY ]CC1
CPY #15
BNE :CONTLP
LDY #1
STY ]CC1
:CONTLP
LDA #1
STA ]CC
STA ]RR
:LPC
LCIRC #19;#19;]RR;]CC
INC ]RR
INC ]CC
LDY ]RR
CPY #15
BEQ :QLPC
JMP :LPC
:QLPC
LDA #1
STA ]CC
:LPC2
LCIRC #19;#19;]RR;]CC
DEC ]RR
INC ]CC
LDY ]RR
CPY #1
BNE :LPC2
JMP :RELOOP
*
_WAIT
LDA TEXTON
JMP $3D0
*
*``````````````````````````````*
* BOTTOM INCLUDES *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
** BOTTOM INCLUDES
*
PUT MIN.LIB.REQUIRED
*
** INDIVIDUAL SUBROUTINE INCLUDES
*
PUT MIN.SUB.LRGFCLR
PUT MIN.SUB.LRGPCLR
PUT MIN.SUB.LRPLOT
PUT MIN.SUB.LRHLINE
PUT MIN.SUB.LRVLINE
PUT MIN.SUB.LRBLINE
PUT MIN.SUB.LRCIRCLE
PUT MIN.SUB.LRGETPIX
PUT MIN.SUB.LRCHAR
*
]RR DS 1
]CC DS 1
]HH DS 1
]CC1 DS 1

View File

@ -0,0 +1,131 @@
*``````````````````````````````*
* HOOKS.LORES *
* *
* THIS FILE INCLUDES HOODS AND *
* A FEW SUBROUTINES AND TABLES *
* USED BY THE REST OF THE LOW *
* RESOLUTION SUBROUTINES. *
* *
* AUTHOR: NATHAN RIGGS *
* CONTACT: NATHAN.RIGGS@ *
* OUTLOOK.COM *
* *
* DATE: 01-OCT-2019 *
* ASSEMBLER: MERLIN 8 PRO *
* LICENSE: APACHE 2.0 *
* OS: DOS 3.3 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
TEXTOFF EQU $C050 ; TURN ON GRAPHICS MODE
TEXTON EQU $C051 ; TURN ON TEXT MODE
MIXEDOFF EQU $C052 ; SET FULLSCREEN MODE FOR GRAPHICS
MIXEDON EQU $C053 ; SET MIXED MODE FOR GRAPHICS
LORES EQU $C056 ; SOFT SWITCH FOR USING LORES GRAPHICS
HIRES EQU $C057 ; SOFT SWITCH TO SPECIFY HIRES GRAPHICS
VPG1 EQU $C054 ; SET THE VIEWING PAGE TO PAGE 1
VPG2 EQU $C055 ; SET THE VIEWING PAGE TO PAGE 2
LRGBCALC EQU $F847 ; FOR CALCULATING LORES COORDINATES
GBASLO EQU $26 ; LOW BYTE OF A PIXEL ADDRESS
GBASHI EQU $27 ; HIGHT BYTE OF PIXEL ADDRESS
*
]BLACK EQU $00 ; LORES COLOR BLACK
]MAGENTA EQU $01 ; LORES COLOR MAGENTA
]DBLUE EQU $02 ; LORES DARK BLUE
]PURPLE EQU $03 ; LORES COLOR PURPLE
]DGREEN EQU $04 ; LORES COLOR DARK GREEN
]GREY1 EQU $05 ; LORES COLOR FIRST GREY SHADE
]MBLUE EQU $06 ; LORES COLOR MEDIUM BLUE
]LBLUE EQU $07 ; LORES COLOR LIGHT BLUE
]BROWN EQU $08 ; LORES COLOR BROWN
]ORANGE EQU $09 ; LORES COLOR ORANGE
]GREY2 EQU $0A ; LORES COLORE GREY SHADE 2
]PINK EQU $0B ; LORES COLOR PINK
MGREEN EQU $0C ; LORES COLOR MEDIUM GREEN
]YELLOW EQU $0D ; LORES COLOR YELLOW
]AQUA EQU $0E ; LORES COLOR AQUAMARINE
]WHITE EQU $0F ; LORES COLOR WHITE
*
*
** THE LOCPLOT SUBROUTINE IS IN THE HOOKS FILE
** BECAUSE IT IS USED, IN SOME CAPACITY, BY THE
** REST OF THE LORES LIBRARY.
*
JMP ]EOF
*
]LOCCOL DS 1 ; LOCAL PLOT COLOR
]MASK DS 2 ; MASK FOR ISOLATING NIBBLE
]COLMASK DS 2 ; COLOR MASK
]X DS 1 ; X COORDINATE FOR PLOT
]Y DS 1 ; Y COORDINATE FOR PLOT
]PAGEOFF DS 1 ; PAGE OFFSET
*
LOCPLOT
*
STY ]Y ; Y POSITION PASSED IN .Y
STX ]X ; X POSITION PASSED IN .X
STA ]LOCCOL ; COLOR PASSED IN .A
LDA ]LOCCOL ; TAKE THE COLOR SENT
ASL ; AND MOVE IT LEFT 4 BITS
ASL ; TO THE HIGH BYTE
ASL
ASL
CLC ; CLEAR CARRY
ADC ]LOCCOL ; NOW ADD THE LOW BYTE BACK, MEANING
STA ]LOCCOL ; THAT THE COLOR WILL BE REPEATING NIBBLES
LDA LWP ; LOAD THE WORKING PAGE FLAG
CMP #2 ; IF THE WORKING PAGE IS NOT PAGE 2,
BNE :PG1 ; THEN ASSUME IT'S PAGE 1.
LDA #4 ; ELSE, SET OFFSET FOR PAGE 2
STA ]PAGEOFF ; STORE IN THE PAGE OFFEST
JMP :CNT ; SKIP TO CONTINUE ROUTINE
:PG1
LDA #0 ; OTHERWISE, IT'S PAGE ONE
STA ]PAGEOFF ; SO THERE IS NO PAGE OFFSET
:CNT
LDA #0
LDY #0
LDX #0
LDA ]Y ; GET Y COORDINATE
LSR ; SHIFT BOTTOM BIT TO CARRY
; BUT WHY?
BCC :EVEN ; IF CARRY = 0, THEN ROW IS EVEN
LDX #$F0 ; OTHERWISE, IT IS ODD; SO MASK
; THE LEFT NIBBLE
BCS :LPLOT ; IF CARRY IS SET, BRANCH TO PLOTTING
:EVEN
LDX #$0F ; EVEN, SO MASK LOW BYTE
:LPLOT
STX ]MASK ; STORE THE EVEN OR ODD MASK
ASL ; SHIFT CARRY BACK INTO BYTE
TAY ; HOLD VALUE INTO .Y
LDA LROFF,Y ; GET LORES MEMORY ADDRESS
CLC ; CLEAR THE CARRY
ADC ]X ; ADD THE X COORDINATE
STA GBASLO ; STORE LOW BYTE FOR GBASCALC
INY ; INCREASE Y OFFSET
LDA LROFF,Y ; GET LORESS MEMORY ADDRESS
ADC ]PAGEOFF ; ADJUST FOR PAGE AND CARRY HIGH
STA GBASHI ; STORE HIGH BYTE FOR GBASCALC
LDY #0
LDA ]MASK ; RELOAD THE MASK
EOR #$FF ; EXCLUSIVE OR THE MASK
AND (GBASLO),Y ; AND THE LOW FOR GBAS
STA ]COLMASK ; STORE THE COLOR MASK
LDA ]LOCCOL ; LOAD THE COLOR
AND ]MASK ; AND THE MASK
ORA ]COLMASK ; OR WITH THE COLOR MASK
STA (GBASLO),Y ; STORE INTO GBAS LOW BYTE
RTS
*
*
LWP DS 1,1 ; BYTE FOR DETERMINING WORKING PAGE
*
** THE FOLLOWING TABLE HELPS WITH FASTER PLOTTING TO THE
** LOW RESOLUTION SCREEN.
*
LROFF DW $400,$480,$500,$580,$600,$680,$700,$780
DW $428,$4A8,$528,$5A8,$628,$6A8,$728,$7A8
DW $450,$4D0,$550,$5D0,$650,$6D0,$750,$7D0
*
*
]EOF

416
source/d8_lores/T.MAC.LORES Normal file
View File

@ -0,0 +1,416 @@
*``````````````````````````````*
* MAC.LORES *
* *
* THIS IS A MACRO LIBRARY FOR *
* LOW RESOLUTION GRAPHICS. *
* *
* AUTHOR: NATHAN RIGGS *
* CONTACT: NATHAN.RIGGS@ *
* OUTLOOK.COM *
* *
* DATE: 01-OCT-2019 *
* ASSEMBLER: MERLIN 8 PRO *
* OS: DOS 3.3 *
* *
* SUBROUTINE FILES NEEDED *
* *
* SUB.LRBLINE *
* SUB.LRCHAR *
* SUB.LRCIRCLE *
* SUB.LRGETPIX *
* SUB.LRGFCLR *
* SUB.LRGPCLR *
* SUB.LRHLINE *
* SUB.LRPLOT *
* SUB.LRVLINE *
* *
* LIST OF MACROS *
* *
* LWORKPG : SET DRAWING PAGE *
* LVIEWPG : SET VIEWING PAGE *
* LRGF : INIT FULL SCREEN *
* LRGP : INIT PART SCREEN *
* LFCLR : CLEAR FULL SCREEN *
* LPCLR : CLEAR MIXED SCREEN *
* LPLOT : PLT TO SCREEN *
* LLINE : DIAGONAL LINE *
* LCIRC : LORES CIRCLE *
* LVLIN : LORES VERT LINE *
* LHLIN : LORES HORIZ LINE *
* LRGET : GET COLOR OF PIXEL *
* LCHAR : OUTPUT LORES TEXT *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
*``````````````````````````````*
* LWORKPG *
* *
* SET THE WORKING PAGE TO *
* EITHER PAGE 1 OR PAGE 2. *
* THIS MEANS THAT ALL COMMANDS *
* IN THE LORES LIBRARY WILL *
* PLOT TO THIS PAGE, NO MATTER *
* WHICH PAGE IS BEING VIEWD. *
* *
* PARAMETERS: *
* *
* ]1 = PAGE NUMBER *
* *
* SAMPLE USAGE: *
* *
* LWORKPG #1 *
* *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LWORKPG MAC
LDA ]1 ; LOAD PAGE NUMBER
CMP #2 ; IF IT IS NOT PAGE 2,
BNE ]__P1 ; THEN ASSUME PAGE 1
LDA #2 ; ELSE SET WORKING PAGE
STA LWP ; TO PAGE 2
JMP ]EXIT
]__P1
LDA #1 ; SET WORKING PAGE TO PAGE 1
STA LWP
]EXIT
<<<
*
*``````````````````````````````*
* LVIEWPG *
* *
* SET THE VIEWING PAGE FOR LOW *
* RSEOLUTION GRAPHICS. *
* *
* PARAMETERS: *
* *
* ]1 = PAGE NUMBER *
* *
* SAMPLE USAGE: *
* *
* LVIEWPG #1 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LVIEWPG MAC
LDA ]1 ; GET PAGE NUMBER PASSED
CMP #2 ; IF IT ISN'T 2, THEN
BNE ]P1 ; ASSUME VIEWING PAGE 2
BIT VPG2 ; SET VIEWING PAGE TO PAGE 2
JMP ]EXIT
]P1
BIT VPG1 ; SET VIEW PAGE TO PAGE 1
]EXIT
<<<
*
*``````````````````````````````*
* LRGF *
* *
* SET LOW-RESOLUTION MODE WITH *
* FULL-SCREEN 40X48 RESOLUTION *
* *
* PARAMETERS: *
* *
* NONE *
* *
* SAMPLE USAGE: *
* *
* LRGF *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LRGF MAC
BIT LORES
BIT MIXEDOFF
BIT TEXTOFF ; GRAPHICS SOFT SWITCH
<<<
*
*``````````````````````````````*
* LRGP *
* *
* SETS THE GRAPHICS MODE TO *
* LORES WITH FOR BOTTOM LINES *
* OF TEXT. *
* *
* PARAMETERS: *
* *
* NONE *
* *
* SAMPLE USAGE: *
* *
* LRGP *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LRGP MAC
BIT LORES
BIT MIXEDON
BIT TEXTOFF ; GRAPHICS SOFT SWITCH
<<<
*
*``````````````````````````````*
* LFCLR *
* *
* CLEAR THE LOW RESOLUTION *
* SCREEN IN FULL SCREEN MODE *
* WITH A GIVEN COLOR. *
* *
* PARAMETERS: *
* *
* ]1 = FILL COLOR *
* *
* SAMPLE USAGE: *
* *
* LFCLR #15 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LFCLR MAC
STY SCRATCH
LDA ]1
JSR LRGFCLR
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LPCLR *
* *
* CLEAR A PARTIAL LORES SCREEN *
* WITH A GIVEN COLOR. *
* *
* PARAMETERS: *
* *
* ]1 = FILL COLOR *
* *
* SAMPLE USAGE: *
* *
* LPCLR #15 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LPCLR MAC
STY SCRATCH
LDA ]1
JSR LRGPCLR
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LPLOT *
* *
* PLOT A PIXEL TO THE LORES *
* SCREEN IN THE GIVEN COLOR AT *
* THE GIVEN COORDINATES. *
* *
* PARAMETERS: *
* *
* ]1 = X COORDINATE *
* ]2 = Y COORDINATE *
* ]3 = COLOR *
* *
* SAMPLE USAGE: *
* *
* LPLOT #10;#10;#]WHITE *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LPLOT MAC
STY SCRATCH
LDX ]1
LDY ]2
LDA ]3
JSR LRPLOT
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LLINE *
* *
* CREATES A DIAGONAL LINE IN *
* LORES GRAPHICS MODE VIA THE *
* BRESSANHAM LINE ALGORITHM. *
* *
* PARAMETERS: *
* *
* ]1 = X ORIGIN *
* ]2 = X DESTINATION *
* ]3 = Y ORIGIN *
* ]4 = Y DESTINATION *
* ]5 = COLOR *
* *
* SAMPLE USAGE: *
* *
* LLINE #1;#1;#10;#12;#5 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LLINE MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR1+1
LDA ]3
STA WPAR2
LDA ]4
STA WPAR2+1
LDA ]5
STA BPAR1
JSR LRBLINE
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LCIRC *
* *
* CREATE A CIRCLE IN LORES *
* GRAPHICS MODE AT THE CENTER *
* COORDINATES AND RADIUS GIVEN *
* AS WELL AS THE COLOR. BASED *
* ON BRESSENHAM'S CIRCLE ALGO. *
* *
* PARAMETERS: *
* *
* ]1 = CENTER X POSITION *
* ]2 = CENTER Y POSITION *
* ]3 = CIRCLE RADIUS *
* ]4 = COLOR *
* *
* SAMPLE USAGE: *
* *
* LCIRC #19;#19;#10;#5 *
* *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LCIRC MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR2
LDA ]3
STA WPAR3
LDA ]4
STA BPAR2
JSR LRCIRCLE
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LVLIN *
* *
* CREATE A LORES VERTICAL LINE *
* FROM A Y ORIGIN TO DEST IN *
* THE GIVEN COLOR. *
* *
* PARAMETERS: *
* *
* ]1 = Y ORIGIN *
* ]2 = Y DESTINATION *
* ]3 = X COORDINATE *
* ]4 = COLOR *
* *
* SAMPLE USAGE: *
* *
* LVLIN #0;#10;#19;#6 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LVLIN MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR1+1
LDA ]3
STA BPAR1
LDA ]4
STA BPAR2
JSR LRVLINE
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LHLIN *
* *
* CREATE A HORIZONTAL LINE IN *
* LORES MODE FROMA GIVEN X *
* ORIGIN TO DESTINATION AT A *
* Y COORDINATE, IN GIVEN COLOR *
* *
* PARAMETERS: *
* *
* ]1 = X ORIGIN *
* ]2 = X DESTINATION *
* ]3 = Y COORDINATE *
* ]4 = COLOR *
* *
* SAMPLE USAGE: *
* *
* LHLIN #3;#20;#5;#10 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LHLIN MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR1+1
LDA ]3
STA BPAR1
LDA ]4
STA BPAR2
JSR LRHLINE
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LRGET *
* *
* GET THE COLOR OF THE LORES *
* PIXEL AT THE GIVEN COORDS. *
* *
* PARAMETERS: *
* *
* ]1 = X COORDINATE *
* ]2 = Y COORDINATE *
* *
* SAMPLE USAGE: *
* *
* LRGET #10;#20 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LRGET MAC
STY SCRATCH
LDA ]1
STA BPAR1
LDA ]2
STA BPAR2
JSR LRGETPIX
LDY SCRATCH
<<<
*
*``````````````````````````````*
* LCHAR *
* *
* PRINT A LORES CHARACTER TO *
* LORES SCREEN AT A GIVE COLOR *
* AT THE GIVEN COORDINATES. *
* *
* PARAMETERS: *
* *
* ]1 = X COORDINATE *
* ]2 = Y COORDINATE *
* ]3 = ADDRESS OF 3-BYTE CHAR *
* ]4 = CHARACTER COLOR *
* *
* SAMPLE USAGE: *
* *
* LCHAR #5;#5;LR_A;#15 *
*,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,*
*
LCHAR MAC
STY SCRATCH
LDA ]1
STA BPAR1
LDA ]2
STA BPAR2
LDA #>]3
STA WPAR1+1
LDA #<]3
STA WPAR1
LDA ]4
STA BPAR3
JSR LRCHAR
LDY SCRATCH
<<<

View File

@ -0,0 +1,24 @@
JUMPTBL JMP MAIN_START
DS 32
VARTAB DS 20
RETLEN DS 1
RETURN DS 256
ADDR1 EQU $06
ADDR2 EQU $08
ADDR3 EQU $EB
ADDR4 EQU $ED
SCRATCH EQU $19
SCRATCH2 EQU $1E
RETADR EQU $FE
RESULT EQU $FA
RESULT2 EQU $FC
WPAR1 EQU $FA
WPAR2 EQU $FC
WPAR3 EQU $FE
BPAR1 EQU $EF
BPAR2 EQU $E3
BPAR3 EQU $1E
BPAR4 EQU $19
REENTRY EQU $3D0
MAIN_START

View File

@ -0,0 +1,95 @@
TEXTOFF EQU $C050
TEXTON EQU $C051
MIXEDOFF EQU $C052
MIXEDON EQU $C053
LORES EQU $C056
HIRES EQU $C057
VPG1 EQU $C054
VPG2 EQU $C055
LRGBCALC EQU $F847
GBASLO EQU $26
GBASHI EQU $27
]BLACK EQU $00
]MAGENTA EQU $01
]DBLUE EQU $02
]PURPLE EQU $03
]DGREEN EQU $04
]GREY1 EQU $05
]MBLUE EQU $06
]LBLUE EQU $07
]BROWN EQU $08
]ORANGE EQU $09
]GREY2 EQU $0A
]PINK EQU $0B
MGREEN EQU $0C
]YELLOW EQU $0D
]AQUA EQU $0E
]WHITE EQU $0F
JMP ]EOF
]LOCCOL DS 1
]MASK DS 2
]COLMASK DS 2
]X DS 1
]Y DS 1
]PAGEOFF DS 1
LOCPLOT
STY ]Y
STX ]X
STA ]LOCCOL
LDA ]LOCCOL
ASL
ASL
ASL
ASL
CLC
ADC ]LOCCOL
STA ]LOCCOL
LDA LWP
CMP #2
BNE :PG1
LDA #4
STA ]PAGEOFF
JMP :CNT
:PG1
LDA #0
STA ]PAGEOFF
:CNT
LDA #0
LDY #0
LDX #0
LDA ]Y
LSR
BCC :EVEN
LDX #$F0 ; OTHERWISE, IT IS ODD
BCS :LPLOT
:EVEN
LDX #$0F
:LPLOT
STX ]MASK
ASL
TAY
LDA LROFF,Y
CLC
ADC ]X
STA GBASLO
INY
LDA LROFF,Y
ADC ]PAGEOFF
STA GBASHI
LDY #0
LDA ]MASK
EOR #$FF
AND (GBASLO),Y
STA ]COLMASK
LDA ]LOCCOL
AND ]MASK
ORA ]COLMASK
STA (GBASLO),Y
RTS
LWP DS 1,1
LROFF DW $400,$480,$500,$580,$600,$680,$700,$780
DW $428,$4A8,$528,$5A8,$628,$6A8,$728,$7A8
DW $450,$4D0,$550,$5D0,$650,$6D0,$750,$7D0
]EOF

View File

@ -0,0 +1,125 @@
]RIGHT DS 1
]LEFT DS 1
]LENGTH DS 1
]A DS 1
]X DS 1
]Y DS 1
]C DS 1
]Z DS 1
]N DS 1
]O DS 1
]HEXTAB ASC "0123456789ABCDEF"
]COUT EQU $FDF0
]KYBD EQU $C000
]STROBE EQU $C010
__GETRET
STA ADDR1
STX ADDR1+1
LDY #255
:LP
INY
LDA RETURN,Y
STA (ADDR1),Y ; COUNTER OFFSET
CPY RETLEN
BNE :LP
RTS
__CLRHI
AND #$F0
LSR
LSR
LSR
LSR
RTS
__DUMP
STY ]LENGTH
STA ADDR1
STX ADDR1+1
LDA #$8D
JSR ]COUT
LDA ADDR1+1
JSR __CLRHI
TAX
LDA ]HEXTAB,X
JSR ]COUT
LDA ADDR1+1
AND #$0F
TAX
LDA ]HEXTAB,X
JSR ]COUT
LDA ADDR1
JSR __CLRHI
TAX
LDA ]HEXTAB,X
JSR ]COUT
LDA ADDR1
AND #$0F
TAX
LDA ]HEXTAB,X
JSR ]COUT
LDA #":" ;
JSR ]COUT
LDA #" "
JSR ]COUT
LDY #0
:LP
LDA (ADDR1),Y
JSR __CLRHI ; AT COUNTER OFFSET
STA ]LEFT
LDA (ADDR1),Y
AND #$0F
STA ]RIGHT
LDX ]LEFT
LDA ]HEXTAB,X
JSR ]COUT
LDX ]RIGHT
LDA ]HEXTAB,X
JSR ]COUT
LDA #160
JSR ]COUT
INY
CPY ]LENGTH
BNE :LP
RTS
__P
PLA
STA ADDR1
PLA
STA ADDR1+1
LDY #1
:LP LDA (ADDR1),Y
BEQ :DONE
JSR ]COUT
INY
BNE :LP
:DONE CLC
TYA
ADC ADDR1
STA ADDR1
LDA ADDR1+1
ADC #0
PHA ; IF NEEDED
LDA ADDR1
PHA
RTS
__W
:LP LDA ]KYBD
BPL :LP
AND #$7F
STA ]STROBE
RTS
__ERRH
LDA #1
STA $AAB6
STA $75+1
STA $33
STA ADDR1
STX ADDR1+1
LDA #$FF
STA $D8
LDY #0
LDA (ADDR1),Y
STA $9D5A
INY
LDA (ADDR1),Y
STA $9D5B
RTS

View File

@ -0,0 +1,130 @@
LWORKPG MAC
LDA ]1
CMP #2
BNE ]__P1
LDA #2
STA LWP
JMP ]EXIT
]__P1
LDA #1
STA LWP
]EXIT
<<<
LVIEWPG MAC
LDA ]1
CMP #2
BNE ]P1
BIT VPG2
JMP ]EXIT
]P1
BIT VPG1
]EXIT
<<<
LRGF MAC
BIT LORES
BIT MIXEDOFF
BIT TEXTOFF
<<<
LRGP MAC
BIT LORES
BIT MIXEDON
BIT TEXTOFF
<<<
LFCLR MAC
STY SCRATCH
LDA ]1
JSR LRGFCLR
LDY SCRATCH
<<<
LPCLR MAC
STY SCRATCH
LDA ]1
JSR LRGPCLR
LDY SCRATCH
<<<
LPLOT MAC
STY SCRATCH
LDX ]1
LDY ]2
LDA ]3
JSR LRPLOT
LDY SCRATCH
<<<
LLINE MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR1+1
LDA ]3
STA WPAR2
LDA ]4
STA WPAR2+1
LDA ]5
STA BPAR1
JSR LRBLINE
LDY SCRATCH
<<<
LCIRC MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR2
LDA ]3
STA WPAR3
LDA ]4
STA BPAR2
JSR LRCIRCLE
LDY SCRATCH
<<<
LVLIN MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR1+1
LDA ]3
STA BPAR1
LDA ]4
STA BPAR2
JSR LRVLINE
LDY SCRATCH
<<<
LHLIN MAC
STY SCRATCH
LDA ]1
STA WPAR1
LDA ]2
STA WPAR1+1
LDA ]3
STA BPAR1
LDA ]4
STA BPAR2
JSR LRHLINE
LDY SCRATCH
<<<
LRGET MAC
STY SCRATCH
LDA ]1
STA BPAR1
LDA ]2
STA BPAR2
JSR LRGETPIX
LDY SCRATCH
<<<
LCHAR MAC
STY SCRATCH
LDA ]1
STA BPAR1
LDA ]2
STA BPAR2
LDA #>]3
STA WPAR1+1
LDA #<]3
STA WPAR1
LDA ]4
STA BPAR3
JSR LRCHAR
LDY SCRATCH
<<<

View File

@ -0,0 +1,97 @@
_MLIT MAC
IF #=]1
LDA ]1/$100
STA ]2+1
LDA ]1
STA ]2
ELSE
LDA ]1+1
STA ]2+1
LDA ]1
STA ]2
FIN
<<<
_ISLIT MAC
IF #=]1
LDA ]1/$100
PHA
LDA ]1
PHA
ELSE
LDA ]1+1
PHA
LDA ]1
PHA
FIN
<<<
_AXLIT MAC
IF #=]1
LDX ]1/$100
LDA ]1
ELSE
LDX ]1+1
LDA ]1
FIN
<<<
_MSTR MAC
IF "=]1
JMP __STRCONT
]STRTMP STR ]1
__STRCONT
LDA #>]STRTMP
STA ]2+1
LDA #<]STRTMP
STA ]2
ELSE
_ISLIT ]1
FIN
<<<
_ISSTR MAC
IF "=]1
JMP __STRCONT
]STRTMP STR ]1
__STRCONT
LDA #>]STRTMP
PHA
LDA #<]STRTMP
PHA
ELSE
_ISLIT ]1
FIN
<<<
_AXSTR MAC
IF "=]1
JMP __STRCNT2
]STRTMP STR ]1
__STRCNT2
LDX #>]STRTMP
LDA #<]STRTMP
ELSE
_AXLIT ]1
FIN
<<<
GRET MAC
_AXLIT ]1
JSR __GETRET
<<<
DUMP MAC
_AXLIT ]1
LDY ]2
JSR __DUMP
<<<
_PRN MAC
JSR __P
ASC ]1
HEX 00
<<<
_WAIT MAC
JSR __W
<<<
ERRH MAC
_AXLIT
JSR __ERRH
<<<
CLRHI MAC
LDA ]1
JSR __CLRHI
<<<

View File

@ -0,0 +1,90 @@
]X1 EQU WPAR1
]Y1 EQU WPAR1+1
]X2 EQU WPAR2
]Y2 EQU WPAR2+1
]COLOR EQU BPAR1
]DX EQU VARTAB+9
]DY EQU VARTAB+10
]SX EQU VARTAB+11
]SY EQU VARTAB+12
]ERR EQU VARTAB+13
]ERR2 EQU VARTAB+14
LRBLINE
LDX #$FF
LDA ]Y1
SEC
SBC ]Y2
BPL :YSTORE
LDX #1
EOR #$FF
CLC
ADC #1
:YSTORE
STA ]DY
STX ]SY
LDX #$FF
LDA ]X1
SEC
SBC ]X2
BPL :XSTORE
LDX #1
EOR #$FF
CLC
ADC #1
:XSTORE
STA ]DX
STX ]SX
CMP ]DY
BEQ :SKIP
BPL :SKIP2
:SKIP
LDA ]DY
EOR #$FF
CLC
ADC #1
:SKIP2
STA ]ERR
ASL ]DX
ASL ]DY
:LP
LDA ]COLOR
LDY ]Y1
LDX ]X1
JSR LOCPLOT
LDA ]X1
CMP ]X2
BNE :KEEPGO
LDA ]Y1
CMP ]Y2
BEQ :EXIT ; IF EQUAL, EXIT
:KEEPGO
LDA ]ERR
STA ]ERR2
CLC
ADC ]DX
BMI :SKIPX
BEQ :SKIPX
LDA ]ERR
SEC
SBC ]DY
STA ]ERR
LDA ]X1
CLC
ADC ]SX
STA ]X1
:SKIPX
LDA ]ERR2
CMP ]DY
BPL :SKIPY
LDA ]ERR
CLC
ADC ]DX
STA ]ERR
LDA ]Y1
CLC
ADC ]SY
STA ]Y1
:SKIPY
JMP :LP
:EXIT
RTS

View File

@ -0,0 +1,524 @@
]ORGX EQU BPAR1
]ORGY EQU BPAR2
]CADDR EQU WPAR1
]CBYTE1 EQU VARTAB
]CBYTE2 EQU VARTAB+1
]CBYTE3 EQU VARTAB+2
]X EQU ADDR1
]Y EQU ADDR2
]CNT EQU VARTAB+5
]COLOR EQU BPAR3
]TMPBYTE EQU VARTAB+11
]OFFSET EQU VARTAB+12
]NIBBLE EQU VARTAB+13
LRCHAR
LDA #0
STA ]NIBBLE
STA ]OFFSET
LDA ]ORGX
STA ]X
LDA ]ORGY
STA ]Y
LDA ]X
LDY #0
LDA (]CADDR),Y
STA ]CBYTE1
INY
LDA (]CADDR),Y
STA ]CBYTE2
INY
LDA (]CADDR),Y
STA ]CBYTE3
LDA #0
STA ]CNT
:PRELOOP
LDY ]OFFSET
LDA ]CBYTE1,Y
STA ]TMPBYTE
:LP1
SEC
LDA ]TMPBYTE
ASL
STA ]TMPBYTE
BCC :NOPLOT
LDA ]COLOR
LDY ]Y
LDX ]X
JSR LOCPLOT
:NOPLOT
INC ]X
LDA ]CNT
CMP #3
BEQ :NEXTLP
INC ]CNT
JMP :LP1
:NEXTLP
INC ]NIBBLE
INC ]Y
LDA #0
STA ]CNT
LDA ]ORGX
STA ]X
LDA ]NIBBLE
CMP #2
BEQ :NEXTLP2
JMP :LP1
:NEXTLP2
INC ]OFFSET
LDA #0
STA ]NIBBLE
LDA ]ORGX
STA ]X
LDA #0
STA ]CNT
LDA ]OFFSET
CMP #3
BEQ :NEXT3
JMP :PRELOOP
:NEXT3
RTS
LR_A DFB %01101001
DFB %11111001
DFB %10010000
LR_B
DFB %11101001
DFB %11101001
DFB %11100000
LR_C
DFB %11111000
DFB %10001000
DFB %11110000
LR_D
DFB %11101001
DFB %10011001
DFB %11100000
LR_E
DFB %11111000
DFB %11101000
DFB %11110000
LR_F
DFB %11111000
DFB %11101000
DFB %10000000
LR_G
DFB %11111000
DFB %10111001
DFB %11110000
LR_H
DFB %10011001
DFB %11111001
DFB %10010000
LR_I
DFB %11110110
DFB %01100110
DFB %11110000
LR_J
DFB %00010001
DFB %00011001
DFB %01100000
LR_K
DFB %10011010
DFB %11001010
DFB %10010000
LR_L
DFB %10001000
DFB %10001000
DFB %11110000
LR_M
DFB %10111101
DFB %11011001
DFB %10010000
LR_N
DFB %10011101
DFB %11011011
DFB %10010000
LR_O
DFB %01101001
DFB %10011001
DFB %01100000
LR_P
DFB %11101001
DFB %11101000
DFB %10000000
LR_Q
DFB %01101001
DFB %10011011
DFB %01100001
LR_R
DFB %11101001
DFB %11101010
DFB %10010000
LR_S
DFB %01111000
DFB %01100001
DFB %11100000
LR_T
DFB %11110110
DFB %01100110
DFB %01100000
LR_U
DFB %10011001
DFB %10011001
DFB %11110000
LR_V
DFB %10011001
DFB %10101010
DFB %01000000
LR_W
DFB %10011001
DFB %10111011
DFB %11010000
LR_X
DFB %10011001
DFB %01101001
DFB %10010000
LR_Y
DFB %10011001
DFB %01100110
DFB %01100000
LR_Z
DFB %11110001
DFB %01101000
DFB %11110000
LR_0
DFB %11111001
DFB %10011001
DFB %11110000
LR_1
DFB %01100110
DFB %01100110
DFB %01100000
LR_2
DFB %01101001
DFB %00100100
DFB %11110000
LR_3
DFB %11100001
DFB %01100001
DFB %11100000
LR_4
DFB %10011001
DFB %11110001
DFB %00010000
LR_5
DFB %11111000
DFB %11110001
DFB %11110000
LR_6
DFB %01101000
DFB %11101001
DFB %11110000
LR_7
DFB %11110001
DFB %00100100
DFB %10000000
LR_8
DFB %01101001
DFB %01101001
DFB %01100000
LR_9
DFB %01111001
DFB %01110001
DFB %00010000
LR_EXC
DFB %01100110
DFB %01100000
DFB %01100000
LR_QUEST
DFB %01101001
DFB %00100000
DFB %00100000
LR_PRD
DFB %00000000
DFB %00001100
DFB %11000000
LR_CMA
DFB %00000000
DFB %00000100
DFB %01001000
LR_APOST
DFB %00010001
DFB %00100000
DFB %00000000
LR_QUOT
DFB %10101010
DFB %00000000
DFB %00000000
LR_COLON
DFB %00000100
DFB %00000100
DFB %00000000
LR_SEMI
DFB %00000100
DFB %00000100
DFB %10000000
LR_MINUS
DFB %00000000
DFB %11111111
DFB %00000000
LR_PLUS
DFB %00000110
DFB %11111111
DFB %01100000
LR_EQUAL
DFB %00001111
DFB %00001111
DFB %00000000
LR_CHECKER1
DFB %10100101
DFB %10100101
DFB %10100000
LR_CHECKER2
DFB %01011010
DFB %01011010
DFB %01010000
LR_UP
DFB %00100111
DFB %00000010
DFB %01110000
LR_DOWN
DFB %01110010
DFB %00000111
DFB %00100000
LR_LEFT
DFB %00010011
DFB %01110011
DFB %00010000
LR_RIGHT
DFB %10001100
DFB %11101100
DFB %10000000
LR_FSLASH
DFB %00010010
DFB %01001000
DFB %10000000
LR_BSLASH
DFB %10000100
DFB %00100001
DFB %00010000
LR_LPAR
DFB %00010010
DFB %01000100
DFB %00100001
LR_RPAR
DFB %10000100
DFB %00100010
DFB %01001000
LR_BLOCK
DFB %11111111
DFB %11111111
DFB %11110000
LR_GOOMBA
DFB %01101001
DFB %11110110
DFB %11110000
LR_PERCENT
DFB %10010001
DFB %00100100
DFB %10010000
LR_BULLET
DFB %00000110
DFB %01100000
DFB %00000000
LR_OFACE
DFB %10010000
DFB %11111001
DFB %11110000
LR_HFACE
DFB %10010000
DFB %10011001
DFB %11110000
LR_SFACE
DFB %10011001
DFB %00001111
DFB %10010000

View File

@ -0,0 +1,202 @@
]XC EQU WPAR1
]YC EQU WPAR2
]R EQU WPAR3
]COLOR EQU BPAR2
]YY EQU VARTAB+5
]XX EQU VARTAB+7
]DX EQU VARTAB+9
]DY EQU VARTAB+11
]ERR EQU VARTAB+13
]DIAM EQU VARTAB+15
]XT EQU VARTAB+17
]YT EQU VARTAB+19
LRCIRCLE
LDA #0
STA ]YY
LDA ]R
STA ]XX
STA ]ERR
ASL
STA ]DIAM
LDA ]XX
EOR #$FF
CLC
ADC #1
STA ]XT
LDA ]YY
EOR #$FF
CLC
ADC #1
STA ]YT
LDA ]XC
CLC
ADC ]XX
TAX
TAY
LDA ]YC
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]XT
TAX
TAY
LDA ]YC
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
TAY
TAX
LDA ]YC
CLC
ADC ]XX
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
TAY
TAX
LDA ]YC
CLC
ADC ]XT
TAY
LDA ]COLOR
JSR LOCPLOT
:LOOP
LDA ]YY
CMP ]XX
BCC :LPCONT
JMP :EXIT
:LPCONT
:STEPY
LDA ]YY
ASL
ADC #1
STA ]DY
INC ]YY
LDA ]DY
EOR #$FF
CLC
ADC #1
ADC ]ERR
STA ]ERR
BPL :PLOT
:STEPX
LDA ]XX
ASL
EOR #$FF
CLC
ADC #1
ADC #1
STA ]DX
DEC ]XX
LDA ]DX
EOR #$FF
CLC
ADC #1
ADC ]ERR
STA ]ERR
:PLOT
LDA ]XX
EOR #$FF
CLC
ADC #1
STA ]XT
LDA ]YY
EOR #$FF
CLC
ADC #1
STA ]YT
LDA ]XC
CLC
ADC ]XX
TAY
TAX
LDA ]YC
CLC
ADC ]YY
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]XT
TAY
TAX
LDA ]YC
CLC
ADC ]YY
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]XT
TAY
TAX
LDA ]YC
CLC
ADC ]YT
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]XX
TAY
TAX
LDA ]YC
CLC
ADC ]YT
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]YY
TAX
TAY
LDA ]YC
CLC
ADC ]XX
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]YT
TAX
TAY
LDA ]YC
CLC
ADC ]XX
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]YT
TAX
TAY
LDA ]YC
CLC
ADC ]XT
TAY
LDA ]COLOR
JSR LOCPLOT
LDA ]XC
CLC
ADC ]YY
TAY
TAX
LDA ]YC
CLC
ADC ]XT
TAY
LDA ]COLOR
JSR LOCPLOT
JMP :LOOP
:EXIT
RTS

View File

@ -0,0 +1,34 @@
]HALFX EQU VARTAB
]FULLX EQU VARTAB+1
]FULLY EQU VARTAB+2
]MASK EQU VARTAB+3
]FULLCHAR EQU VARTAB+4
LRGETPIX
LDY BPAR1
STY ]FULLX
TYA
ASL
STA ]HALFX
LDA BPAR2
STA ]FULLY
LDY ]HALFX
LDA ]FULLY
JSR LRGBCALC
LDA (GBASLO),Y
STA ]FULLCHAR
LDA ]FULLX
LSR
BCC :EVEN
LDX #$F0 ; OTHERWISE, IT'S ODD
BCS :EXIT
:EVEN
LDX #$0F
:EXIT
STX ]MASK
LDA ]FULLCHAR
AND ]MASK
STA RETURN
LDA #1
STA RETLEN
LDA RETURN
RTS

View File

@ -0,0 +1,98 @@
USE MIN.MAC.REQUIRED
PUT MIN.HEAD.REQUIRED
PUT HOOKS.LORES
CYC ON
]C EQU VARTAB
LRGFCLR
STA ]C
ASL
ASL
ASL
ASL
CLC
ADC ]C
STA ]C
LDY #$78
LDX LWP
CPX #2
BEQ :P2
:LP1
STA $400,Y
STA $480,Y
STA $500,Y
STA $580,Y
STA $600,Y
STA $680,Y
STA $700,Y
STA $780,Y
DEY
BPL :LP1
JMP :EXIT
:P2
LDA ]C
LDY #$78
:LP2
STA $800,Y
STA $880,Y
STA $900,Y
STA $980,Y
STA $0A00,Y
STA $0A80,Y
STA $0B00,Y
STA $0B80,Y
DEY
BPL :LP2
:EXIT
RTS
]C EQU VARTAB
LRGPCLR
STA ]C
ASL
ASL
ASL
ASL
CLC
ADC ]C
STA ]C
LDY #$78
LDX LWP
CPX #2
BEQ :P2
:LP1
STA $400,Y
STA $480,Y
STA $500,Y
STA $580,Y
CPY #80
BPL :NDB
STA $600,Y
STA $680,Y
STA $700,Y
STA $780,Y
:NDB
DEY
BPL :LP1
JMP :EXIT
:P2
LDA ]C
LDY #$78
:LP2
STA $800,Y
STA $880,Y
STA $900,Y
STA $980,Y
CPY #80
BPL :NDB2
STA $0A00,Y
STA $0A80,Y
STA $0B00,Y
STA $0B80,Y
:NDB2
DEY
BPL :LP2
:EXIT
RTS

View File

@ -0,0 +1,50 @@
]C EQU VARTAB
LRGPCLR
STA ]C
ASL
ASL
ASL
ASL
CLC
ADC ]C
STA ]C
LDY #$78
LDX LWP
CPX #2
BEQ :P2
:LP1
STA $400,Y
STA $480,Y
STA $500,Y
STA $580,Y
CPY #80
BPL :NDB
STA $600,Y
STA $680,Y
STA $700,Y
STA $780,Y
:NDB
DEY
BPL :LP1
JMP :EXIT
:P2
LDA ]C
LDY #$78
:LP2
STA $800,Y
STA $880,Y
STA $900,Y
STA $980,Y
CPY #80
BPL :NDB2
STA $0A00,Y
STA $0A80,Y
STA $0B00,Y
STA $0B80,Y
:NDB2
DEY
BPL :LP2
:EXIT
RTS

View File

@ -0,0 +1,44 @@
]X1 EQU WPAR1
]X2 EQU WPAR1+1
]Y1 EQU BPAR1
]COLOR EQU BPAR2
]X EQU VARTAB
]Y EQU VARTAB+1
LRHLINE
LDA ]Y1
STA ]Y
LDY ]X1
STY ]X
:LOOP
LDA ]COLOR
LDX ]X
LDY ]Y
JSR LOCPLOT
INC ]X
LDY ]X
CPY ]X2
BNE :LOOP
:EXIT
RTS
]Y1 EQU WPAR1
]Y2 EQU WPAR1+1
]X1 EQU BPAR1
]COLOR EQU BPAR2
]X EQU VARTAB+6
]Y EQU VARTAB+8
LRVLINE
LDA ]X1
STA ]X
LDY ]Y1
STY ]Y
:LOOP
LDA ]COLOR
LDX ]X
LDY ]Y
JSR LOCPLOT
INC ]Y
LDY ]Y
CPY ]Y2
BNE :LOOP ; LOOP
:EXIT
RTS

View File

@ -0,0 +1,59 @@
]COLOR EQU BPAR1
]X EQU BPAR2
]Y EQU BPAR3
]MASK EQU VARTAB
]COLMASK EQU VARTAB+2
]PAGEOFF EQU VARTAB+4
LRPLOT
STY ]Y
STX ]X
STA ]COLOR
LDA ]COLOR
ASL
ASL
ASL
ASL
CLC
ADC ]COLOR
STA ]COLOR
LDA LWP
CMP #2 ; PAGE
BNE :PG1
LDA #4
STA ]PAGEOFF
JMP :CNT
:PG1
LDA #0
STA ]PAGEOFF
:CNT
LDA ]Y
LSR
BCC :EVEN
LDX #$F0 ; OTHERWISE, IT IS ODD
BCS :PLOT
:EVEN
LDX #$0F
:PLOT
STX ]MASK
ASL
TAY
LDA LROFF,Y
CLC
ADC ]X
STA GBASLO
INY
LDA LROFF,Y
ADC ]PAGEOFF
STA GBASHI
LDY #0
LDA ]MASK
EOR #$FF
AND (GBASLO),Y
STA ]COLMASK
LDA ]COLOR
AND ]MASK
ORA ]COLMASK
STA (GBASLO),Y
RTS

Some files were not shown because too many files have changed in this diff Show More