![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to photo.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 photo.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 photo.L ! 12: lst off ! 13: ! 14: *----------- ! 15: ! 16: use photo.X ! 17: ! 18: *----------- ! 19: ! 20: L270000 ENT ! 21: PHD ! 22: TSC ! 23: SEC ! 24: SBC #$00FB ! 25: TCD ! 26: ADC #$00F2 ! 27: TCS ! 28: LDA L030227 ! 29: CMP #$0006 ! 30: BCS L270019 ! 31: LDA #$0006 ! 32: STA L030227 ! 33: L270019 LDA L030227 ! 34: PHA ! 35: JSL L1301BA ! 36: PLY ! 37: STZ $F4 ! 38: BRA L270059 ! 39: L270026 JSL L2301DE ! 40: LDA L030227 ! 41: CMP #$0004 ! 42: BEQ L27003E ! 43: BCC L27003E ! 44: LDA L030227 ! 45: SEC ! 46: SBC #$0002 ! 47: STA L030227 ! 48: L27003E LDA L030227 ! 49: PHA ! 50: JSL L1301BA ! 51: PLY ! 52: JSL L240229 ! 53: PEA $0000 ! 54: JSL L260826 ! 55: PLY ! 56: JSL L230000 ! 57: INC $F4 ! 58: L270059 LDA $F4 ! 59: CMP #$0014 ! 60: BNE L270026 ! 61: LDA #$0005 ! 62: STA L030227 ! 63: JSL L130194 ! 64: JSL L240229 ! 65: JSL L270115 ! 66: JSL L2302BF ! 67: TSC ! 68: CLC ! 69: ADC #$0008 ! 70: TCS ! 71: PLD ! 72: RTL ! 73: ! 74: PHD ! 75: TSC ! 76: SEC ! 77: SBC #$00F7 ! 78: TCD ! 79: ADC #$00E6 ! 80: TCS ! 81: STZ $E8 ! 82: LDA $FD ! 83: ASL ! 84: ASL ! 85: LDX #$0000 ! 86: PHX ! 87: PHA ! 88: LDA #L049648 ! 89: LDX #^L049648 ! 90: JSL L2D0000 ! 91: PLA ! 92: PLX ! 93: STA $F2 ! 94: STX $F4 ! 95: LDY #$0002 ! 96: LDA [$F2],Y ! 97: TAX ! 98: LDA [$F2] ! 99: STX $F0 ! 100: STA $EE ! 101: LDAL L04966A ! 102: TAX ! 103: LDAL L049668 ! 104: STX $EC ! 105: STA $EA ! 106: LDA $FF ! 107: AND #$000F ! 108: PHA ! 109: LDA #$0010 ! 110: PLX ! 111: STX $F6 ! 112: SEC ! 113: SBC $F6 ! 114: STA $FF ! 115: LDY #$01FF ! 116: L2700D1 SEP #$20 ! 117: LDA [$EE],Y ! 118: STA $E8 ! 119: REP #$20 ! 120: LDA $E8 ! 121: SEC ! 122: SBC L03022B ! 123: BCS L2700E6 ! 124: LDA L03022B ! 125: BRA L270104 ! 126: L2700E6 ASL ! 127: ASL ! 128: ASL ! 129: TAX ! 130: LDA $FF ! 131: PHY ! 132: JSL L0B0000 ! 133: STA $E8 ! 134: JSL L0C0017 ! 135: AND #$001F ! 136: ADC $E8 ! 137: LSR ! 138: LSR ! 139: LSR ! 140: CLC ! 141: ADC L03022B ! 142: PLY ! 143: L270104 SEP #$20 ! 144: STA [$EA],Y ! 145: REP #$20 ! 146: DEY ! 147: BPL L2700D1 ! 148: TSC ! 149: CLC ! 150: ADC #$0010 ! 151: TCS ! 152: PLD ! 153: RTL ! 154: ! 155: L270115 PHD ! 156: TSC ! 157: SEC ! 158: SBC #$00FB ! 159: TCD ! 160: ADC #$00DA ! 161: TCS ! 162: STZ $F2 ! 163: LDA L030225 ! 164: STA $DE ! 165: STZ $DC ! 166: STZ $F0 ! 167: BRL L27022C ! 168: L27012E LDA $F2 ! 169: AND #$000F ! 170: PHA ! 171: LDA #$000F ! 172: PLX ! 173: STX $FA ! 174: SEC ! 175: SBC $FA ! 176: ASL ! 177: ASL ! 178: PHA ! 179: LDA $DE ! 180: PLX ! 181: STX $FA ! 182: SEC ! 183: SBC $FA ! 184: STA L030225 ! 185: LDA L03020B ! 186: SEC ! 187: SBC $DC ! 188: STA L03020B ! 189: JSL L0C0017 ! 190: AND #$0007 ! 191: SEC ! 192: SBC #$0003 ! 193: STA $DC ! 194: LDA L03020B ! 195: CLC ! 196: ADC $DC ! 197: STA L03020B ! 198: LDA $F2 ! 199: ASL ! 200: LDX #$0000 ! 201: PHX ! 202: PHA ! 203: LDA #L047E42 ! 204: LDX #^L047E42 ! 205: JSL L2D0000 ! 206: PLA ! 207: PLX ! 208: STA $F6 ! 209: STX $F8 ! 210: LDA [$F6] ! 211: STA L0300D5 ! 212: LDA #$8000 ! 213: STA $EC ! 214: LDX L030223 ! 215: L27018F SEP #$20 ! 216: LDA $ED ! 217: STAL L0492A8,X ! 218: REP #$20 ! 219: LDA $EC ! 220: CLC ! 221: ADC L0300D5 ! 222: BPL L2701A3 ! 223: STA $EC ! 224: L2701A3 INX ! 225: CPX #$0080 ! 226: BMI L27018F ! 227: LDA #$8000 ! 228: STA $EC ! 229: LDX L030223 ! 230: L2701B1 SEP #$20 ! 231: LDA $ED ! 232: STAL L0492A8,X ! 233: REP #$20 ! 234: LDA $EC ! 235: SEC ! 236: SBC L0300D5 ! 237: BMI L2701C5 ! 238: STA $EC ! 239: L2701C5 DEX ! 240: BPL L2701B1 ! 241: LDX L03022B ! 242: SEP #$20 ! 243: LDAL L0492A8,X ! 244: L2701D1 STAL L0492A8,X ! 245: DEX ! 246: BPL L2701D1 ! 247: REP #$20 ! 248: LDA $F2 ! 249: ASL ! 250: LDX #$0000 ! 251: PHX ! 252: PHA ! 253: LDA #L047D42 ! 254: LDX #^L047D42 ! 255: JSL L2D0000 ! 256: PLA ! 257: PLX ! 258: STA $F6 ! 259: STX $F8 ! 260: LDA [$F6] ! 261: STA L0300D5 ! 262: LDA $F0 ! 263: LSR ! 264: LSR ! 265: LSR ! 266: LSR ! 267: STA L0300DB ! 268: LDA $F2 ! 269: AND #$0040 ! 270: CMP #$0000 ! 271: BNE L270215 ! 272: LDA L0300DB ! 273: PHA ! 274: JSL L250000 ! 275: PLY ! 276: BRA L27021E ! 277: L270215 LDA L0300DB ! 278: PHA ! 279: JSL L24047A ! 280: PLY ! 281: L27021E JSL L230000 ! 282: LDA $F2 ! 283: CLC ! 284: ADC #$0001 ! 285: STA $F2 ! 286: INC $F0 ! 287: L27022C LDA $F0 ! 288: CMP #$0080 ! 289: BEQ L270236 ! 290: BRL L27012E ! 291: L270236 TSC ! 292: CLC ! 293: ADC #$0020 ! 294: TCS ! 295: PLD ! 296: RTL
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.