![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to spots.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [ERE Captain BLood IIGS reversed] / cblood|
Return to spots.s CVS log | Up to [ERE Captain BLood IIGS reversed] / cblood |
1.1 root 1: *
2: * Captain Blood
3: *
4: * (c) Infogrames
5: * (s) 2017, Brutal Deluxe Software
6: *
7:
8: mx %00
9:
10: rel
11: dsk spots.L
12: lst off
13:
14: *-----------
15:
16: use spots.X
17:
18: *-----------
19:
20: L220000 ENT
21: PHD
22: TSC
23: SEC
24: SBC #$00FB
25: TCD
26: ADC #$00EC
27: TCS
28: STZ $F4
29: STZ $EE
30: BRL L220262
31: L220012 LDA $F4
32: ASL
33: LDX #$0000
34: PHX
35: PHA
36: LDA #L042E84
37: LDX #^L042E84
38: JSL L2D0000
39: PLA
40: PLX
41: STA $F6
42: STX $F8
43: LDA [$F6]
44: STA $F2
45: LDA $F2
46: LDX #$0000
47: PHX
48: PHA
49: LDA #L04398A
50: LDX #^L04398A
51: JSL L2D0000
52: PLA
53: PLX
54: STA $F6
55: STX $F8
56: LDA [$F6]
57: PHA
58: LDA $F4
59: INC $F4
60: LDX #$0000
61: PHX
62: PHA
63: LDA #L042FC4
64: LDX #^L042FC4
65: JSL L2D0000
66: PLA
67: PLX
68: STA $F6
69: STX $F8
70: PLA
71: SEP #$20
72: STA [$F6]
73: REP #$20
74: LDA $F2
75: LDX #$0000
76: PHX
77: PHA
78: LDA #L04398A
79: LDX #^L04398A
80: JSL L2D0000
81: PLA
82: PLX
83: STA $F6
84: STX $F8
85: LDA #$0001
86: SEP #$20
87: STA [$F6]
88: REP #$20
89: LDA $F4
90: ASL
91: LDX #$0000
92: PHX
93: PHA
94: LDA #L042E84
95: LDX #^L042E84
96: JSL L2D0000
97: PLA
98: PLX
99: STA $F6
100: STX $F8
101: LDA [$F6]
102: STA $F2
103: LDA $F2
104: LDX #$0000
105: PHX
106: PHA
107: LDA #L04398A
108: LDX #^L04398A
109: JSL L2D0000
110: PLA
111: PLX
112: STA $F6
113: STX $F8
114: LDA [$F6]
115: PHA
116: LDA $F4
117: INC $F4
118: LDX #$0000
119: PHX
120: PHA
121: LDA #L042FC4
122: LDX #^L042FC4
123: JSL L2D0000
124: PLA
125: PLX
126: STA $F6
127: STX $F8
128: PLA
129: SEP #$20
130: STA [$F6]
131: REP #$20
132: LDA $F2
133: LDX #$0000
134: PHX
135: PHA
136: LDA #L04398A
137: LDX #^L04398A
138: JSL L2D0000
139: PLA
140: PLX
141: STA $F6
142: STX $F8
143: LDA #$0001
144: SEP #$20
145: STA [$F6]
146: REP #$20
147: LDA $F4
148: ASL
149: LDX #$0000
150: PHX
151: PHA
152: LDA #L042E84
153: LDX #^L042E84
154: JSL L2D0000
155: PLA
156: PLX
157: STA $F6
158: STX $F8
159: LDA [$F6]
160: STA $F2
161: LDA $F2
162: LDX #$0000
163: PHX
164: PHA
165: LDA #L04398A
166: LDX #^L04398A
167: JSL L2D0000
168: PLA
169: PLX
170: STA $F6
171: STX $F8
172: LDA [$F6]
173: PHA
174: LDA $F4
175: INC $F4
176: LDX #$0000
177: PHX
178: PHA
179: LDA #L042FC4
180: LDX #^L042FC4
181: JSL L2D0000
182: PLA
183: PLX
184: STA $F6
185: STX $F8
186: PLA
187: SEP #$20
188: STA [$F6]
189: REP #$20
190: LDA $F2
191: LDX #$0000
192: PHX
193: PHA
194: LDA #L04398A
195: LDX #^L04398A
196: JSL L2D0000
197: PLA
198: PLX
199: STA $F6
200: STX $F8
201: LDA #$0001
202: SEP #$20
203: STA [$F6]
204: REP #$20
205: LDA $F4
206: ASL
207: LDX #$0000
208: PHX
209: PHA
210: LDA #L042E84
211: LDX #^L042E84
212: JSL L2D0000
213: PLA
214: PLX
215: STA $F6
216: STX $F8
217: LDA [$F6]
218: STA $F2
219: LDA $F2
220: LDX #$0000
221: PHX
222: PHA
223: LDA #L04398A
224: LDX #^L04398A
225: JSL L2D0000
226: PLA
227: PLX
228: STA $F6
229: STX $F8
230: LDA [$F6]
231: PHA
232: LDA $F4
233: INC $F4
234: LDX #$0000
235: PHX
236: PHA
237: LDA #L042FC4
238: LDX #^L042FC4
239: JSL L2D0000
240: PLA
241: PLX
242: STA $F6
243: STX $F8
244: PLA
245: SEP #$20
246: STA [$F6]
247: REP #$20
248: LDA $F2
249: LDX #$0000
250: PHX
251: PHA
252: LDA #L04398A
253: LDX #^L04398A
254: JSL L2D0000
255: PLA
256: PLX
257: STA $F6
258: STX $F8
259: LDA #$0002
260: SEP #$20
261: STA [$F6]
262: REP #$20
263: LDA $F4
264: ASL
265: LDX #$0000
266: PHX
267: PHA
268: LDA #L042E84
269: LDX #^L042E84
270: JSL L2D0000
271: PLA
272: PLX
273: STA $F6
274: STX $F8
275: LDA [$F6]
276: STA $F2
277: LDA $F2
278: LDX #$0000
279: PHX
280: PHA
281: LDA #L04398A
282: LDX #^L04398A
283: JSL L2D0000
284: PLA
285: PLX
286: STA $F6
287: STX $F8
288: LDA [$F6]
289: PHA
290: LDA $F4
291: INC $F4
292: LDX #$0000
293: PHX
294: PHA
295: LDA #L042FC4
296: LDX #^L042FC4
297: JSL L2D0000
298: PLA
299: PLX
300: STA $F6
301: STX $F8
302: PLA
303: SEP #$20
304: STA [$F6]
305: REP #$20
306: LDA $F2
307: LDX #$0000
308: PHX
309: PHA
310: LDA #L04398A
311: LDX #^L04398A
312: JSL L2D0000
313: PLA
314: PLX
315: STA $F6
316: STX $F8
317: LDA #$0002
318: SEP #$20
319: STA [$F6]
320: REP #$20
321: INC $EE
322: L220262 LDA $EE
323: CMP L0300B1
324: BEQ L22026C
325: BRL L220012
326: L22026C TSC
327: CLC
328: ADC #$000E
329: TCS
330: PLD
331: RTL
332:
333: L220274 ENT
334: PHD
335: TSC
336: SEC
337: SBC #$00FB
338: TCD
339: ADC #$00EA
340: TCS
341: LDA L0300B1
342: PHA
343: LDA #$0005
344: CLC
345: JSL L2D018C
346: PLA
347: STA $EC
348: STZ $EE
349: BRA L2202E8
350: L220292 LDA $EE
351: ASL
352: LDX #$0000
353: PHX
354: PHA
355: LDA #L042E84
356: LDX #^L042E84
357: JSL L2D0000
358: PLA
359: PLX
360: STA $F6
361: STX $F8
362: LDA [$F6]
363: STA $F2
364: LDA $EE
365: LDX #$0000
366: PHX
367: PHA
368: LDA #L042FC4
369: LDX #^L042FC4
370: JSL L2D0000
371: PLA
372: PLX
373: STA $F6
374: STX $F8
375: LDA [$F6]
376: PHA
377: LDA $F2
378: LDX #$0000
379: PHX
380: PHA
381: LDA #L04398A
382: LDX #^L04398A
383: JSL L2D0000
384: PLA
385: PLX
386: STA $F6
387: STX $F8
388: PLA
389: SEP #$20
390: STA [$F6]
391: REP #$20
392: INC $EE
393: L2202E8 LDA $EE
394: CMP $EC
395: BNE L220292
396: TSC
397: CLC
398: ADC #$0010
399: TCS
400: PLD
401: RTL
402:
403: L2202F6 ENT
404: JSL L21034B
405: LDA L0300A3
406: INC
407: CMP #$00A0
408: BMI L220314
409: LDA L0300AD
410: CLC
411: ADC L0300AF
412: CLC
413: ADC L0300AF
414: STA L0300AD
415: LDA #$0000
416: L220314 STA L0300A3
417: STA $00
418: LDA L0300AD
419: LSR
420: CLC
421: ADC $00
422: AND #$00FF
423: STA $02
424: L220325 LDA $02
425: TAX
426: CLC
427: ADC #$0100
428: TAY
429: STA $02
430: LDAL L04398A,X
431: STA $04
432: ASL
433: ASL
434: ASL
435: ASL
436: STA $0A
437: TYX
438: LDAL L04398A,X
439: STA $06
440: XBA
441: ORA $0A
442: STA $0A
443: LDA $04
444: LSR
445: LSR
446: LSR
447: LSR
448: ORA $04
449: STA $08
450: LDA $00
451: TAX
452: CLC
453: ADC #$00A0
454: PHA
455: ADC #$00A0
456: STA $00
457: SEP #$20
458: LDA $08
459: STAL $E12C80,X
460: PLX
461: LDA $0A
462: STAL $E12C80,X
463: REP #$20
464: LDA $00
465: CMP #$4D80
466: BMI L220325
467: RTL
468:
469: L220377 ENT
470: JSL L21034B
471: LDA L0300A3
472: INC
473: CMP #$0050
474: BMI L220395
475: LDA L0300AD
476: CLC
477: ADC L0300AF
478: CLC
479: ADC L0300AF
480: STA L0300AD
481: LDA #$0000
482: L220395 STA L0300A3
483: STA $00
484: LDA L0300AD
485: LSR
486: CLC
487: ADC $00
488: CLC
489: ADC #$003F
490: AND #$00FF
491: CLC
492: ADC #$1000
493: STA $02
494: LDA $00
495: ASL
496: STA $00
497: L2203B3 LDA $02
498: TAX
499: CLC
500: ADC #$0100
501: TAY
502: STA $02
503: LDAL L04398A,X
504: STA $04
505: TYX
506: LDAL L04398A,X
507: STA $06
508: LDA $04
509: SEP #$20
510: XBA
511: LDA $04
512: REP #$20
513: ASL
514: ASL
515: ASL
516: ASL
517: ORA $04
518: STA $08
519: LDA $06
520: SEP #$20
521: XBA
522: ASL
523: ASL
524: ASL
525: ASL
526: REP #$20
527: STA $10
528: LDA $04
529: SEP #$20
530: XBA
531: ASL
532: ASL
533: ASL
534: ASL
535: XBA
536: REP #$20
537: ORA $10
538: STA $0A
539: XBA
540: STA $0C
541: LDA $08
542: AND #$F00F
543: STA $10
544: LDA $06
545: SEP #$20
546: ASL
547: ASL
548: ASL
549: ASL
550: REP #$20
551: ORA $10
552: STA $0E
553: LDA $00
554: TAX
555: CLC
556: ADC #$00A0
557: TAY
558: ADC #$00A0
559: STA $12
560: ADC #$00A0
561: STA $14
562: ADC #$00A0
563: STA $00
564: LDA $08
565: STAL $E12C80,X
566: TYX
567: LDA $0A
568: STAL $E12C80,X
569: LDX $12
570: LDA $0C
571: STAL $E12C80,X
572: LDX $14
573: LDA $0E
574: STAL $E12C80,X
575: LDA $00
576: CMP #$4D80
577: BPL L22044E
578: BRL L2203B3
579: L22044E RTL
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.