Return to gpla.s CVS log

Up to [ERE Captain BLood IIGS reversed] / cblood

Annotation of cblood/gpla.s, revision 1.1

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   gpla.L
        !            12:          lst   off
        !            13: 
        !            14: *-----------
        !            15: 
        !            16:          use   gpla.X
        !            17: 
        !            18: *-----------
        !            19: 
        !            20:          use   4/Misc.Macs
        !            21:          use   4/Util.Macs
        !            22: 
        !            23: *-----------
        !            24: 
        !            25: L170000  ENT
        !            26:          PHD
        !            27:          TSC
        !            28:          SEC
        !            29:          SBC   #$00FB
        !            30:          TCD
        !            31:          ADC   #$00F2
        !            32:          TCS
        !            33:          LDX   L030179
        !            34:          LDA   L030177
        !            35:          PHX
        !            36:          PHA
        !            37:          PEA   ^L04970D
        !            38:          PEA   L04970D
        !            39:          PEA   ^L04984D
        !            40:          PEA   L04984D
        !            41:          JSL   L120502
        !            42:          TAY
        !            43:          TSC
        !            44:          CLC
        !            45:          ADC   #$000C
        !            46:          TCS
        !            47:          TYA
        !            48:          PEA   $0000
        !            49:          PEA   $0120
        !            50:          PEA   $0098
        !            51:          PEA   $00C7
        !            52:          _ClampMouse
        !            53:          BCS   L170043
        !            54:          LDA   #$0000
        !            55: L170043  STAL  L030169
        !            56:          LDA   L0300A1
        !            57:          BNE   L170064
        !            58:          PEA   $0006
        !            59:          JSL   L15032D
        !            60:          PLY
        !            61:          PEA   $0007
        !            62:          JSL   L15032D
        !            63:          PLY
        !            64:          PEA   $0008
        !            65:          JSL   L15032D
        !            66:          PLY
        !            67: L170064  TSC
        !            68:          CLC
        !            69:          ADC   #$0008
        !            70:          TCS
        !            71:          PLD
        !            72:          RTL
        !            73: 
        !            74: L17006C  ENT
        !            75:          PHD
        !            76:          TSC
        !            77:          SEC
        !            78:          SBC   #$00FB
        !            79:          TCD
        !            80:          ADC   #$00F4
        !            81:          TCS
        !            82:          JSL   L0B01EC
        !            83:          LDA   L03015D
        !            84:          CMP   #$0006
        !            85:          BNE   L170086
        !            86:          BRL   L17014A
        !            87: L170086  LDX   L030181
        !            88:          LDA   L03017F
        !            89:          PHX
        !            90:          PHA
        !            91:          PEA   $0001
        !            92:          JSL   L0B014E
        !            93:          PLY
        !            94:          PLY
        !            95:          PLY
        !            96:          PEA   $008C
        !            97:          LDX   L03018D
        !            98:          LDA   L03018B
        !            99:          CLC
        !           100:          ADC   #$0960
        !           101:          PHA
        !           102:          TXA
        !           103:          ADC   #$0000
        !           104:          TAX
        !           105:          PLA
        !           106:          PHX
        !           107:          PHA
        !           108:          LDX   L030181
        !           109:          LDA   L03017F
        !           110:          CLC
        !           111:          ADC   #$0980
        !           112:          PHA
        !           113:          TXA
        !           114:          ADC   #$0000
        !           115:          TAX
        !           116:          PLA
        !           117:          PHX
        !           118:          PHA
        !           119:          JSL   L0D00E3
        !           120:          PLY
        !           121:          PLY
        !           122:          PLY
        !           123:          PLY
        !           124:          PLY
        !           125:          PEA   $0020
        !           126:          PEA   $0014
        !           127:          LDA   #L043364
        !           128:          LDX   #^L043364
        !           129:          STA   $F6
        !           130:          STX   $F8
        !           131:          LDY   #$0002
        !           132:          LDA   [$F6],Y
        !           133:          LDX   #$0000
        !           134:          PHX
        !           135:          PHA
        !           136:          LDX   L03018D
        !           137:          LDA   L03018B
        !           138:          JSL   L2D0000
        !           139:          LDX   L030195
        !           140:          LDA   L030193
        !           141:          PHX
        !           142:          PHA
        !           143:          JSL   L0D0340
        !           144:          TAY
        !           145:          TSC
        !           146:          CLC
        !           147:          ADC   #$000C
        !           148:          TCS
        !           149:          TYA
        !           150:          PEA   $0020
        !           151:          PEA   $0014
        !           152:          LDA   #L0433D4
        !           153:          LDX   #^L0433D4
        !           154:          STA   $F6
        !           155:          STX   $F8
        !           156:          LDY   #$0002
        !           157:          LDA   [$F6],Y
        !           158:          LDX   #$0000
        !           159:          PHX
        !           160:          PHA
        !           161:          LDX   L03018D
        !           162:          LDA   L03018B
        !           163:          JSL   L2D0000
        !           164:          LDX   L030195
        !           165:          LDA   L030193
        !           166:          PHX
        !           167:          PHA
        !           168:          JSL   L0D0340
        !           169:          TAY
        !           170:          TSC
        !           171:          CLC
        !           172:          ADC   #$000C
        !           173:          TCS
        !           174:          TYA
        !           175:          PEA   $0168
        !           176:          PEA   $008C
        !           177:          PEA   $0960
        !           178:          JSL   L1E0000
        !           179:          PLY
        !           180:          PLY
        !           181:          PLY
        !           182: L17014A  TSC
        !           183:          CLC
        !           184:          ADC   #$0006
        !           185:          TCS
        !           186:          PLD
        !           187:          RTL
        !           188: 
        !           189: L170152  ENT
        !           190:          PHD
        !           191:          TSC
        !           192:          SEC
        !           193:          SBC   #$00FB
        !           194:          TCD
        !           195:          ADC   #$00F4
        !           196:          TCS
        !           197:          JSL   L0B01EC
        !           198:          JSL   L1901CE
        !           199:          PEA   ^L042E64
        !           200:          PEA   L042E64
        !           201:          PEA   $0001
        !           202:          JSL   L0B014E
        !           203:          PLY
        !           204:          PLY
        !           205:          PLY
        !           206:          LDA   #$FFFF
        !           207:          STA   L03015F
        !           208:          STZ   L03015D
        !           209:          TSC
        !           210:          CLC
        !           211:          ADC   #$0006
        !           212:          TCS
        !           213:          PLD
        !           214:          RTL
        !           215: 
        !           216: L170186  ENT
        !           217:          PHD
        !           218:          TSC
        !           219:          SEC
        !           220:          SBC   #$00FB
        !           221:          TCD
        !           222:          ADC   #$00F4
        !           223:          TCS
        !           224:          LDA   #$009F
        !           225:          STA   L0300A3
        !           226:          LDA   L03015B
        !           227:          CMP   #$0001
        !           228:          BEQ   L1701AF
        !           229:          LDA   L03015B
        !           230:          CMP   #$0002
        !           231:          BEQ   L1701AF
        !           232:          LDA   #$0001
        !           233:          STA   L03015D
        !           234:          BRA   L1701C5
        !           235: L1701AF  LDA   L03015B
        !           236:          CMP   #$0001
        !           237:          BNE   L1701BF
        !           238:          LDA   #$0002
        !           239:          STA   L03015B
        !           240:          BRA   L1701C5
        !           241: L1701BF  LDA   #$0001
        !           242:          STA   L03015B
        !           243: L1701C5  TAY
        !           244:          TSC
        !           245:          CLC
        !           246:          ADC   #$0006
        !           247:          TCS
        !           248:          TYA
        !           249:          PLD
        !           250:          RTL
        !           251: 
        !           252: L1701CF  ENT
        !           253:          PHD
        !           254:          TSC
        !           255:          SEC
        !           256:          SBC   #$00FB
        !           257:          TCD
        !           258:          ADC   #$00F4
        !           259:          TCS
        !           260:          LDX   L030179
        !           261:          LDA   L030177
        !           262:          PHX
        !           263:          PHA
        !           264:          PEA   ^L04970D
        !           265:          PEA   L04970D
        !           266:          PEA   ^L049845
        !           267:          PEA   L049845
        !           268:          JSL   L120502
        !           269:          TAY
        !           270:          TSC
        !           271:          CLC
        !           272:          ADC   #$000C
        !           273:          TCS
        !           274:          TYA
        !           275:          PEA   $0000
        !           276:          PEA   $0120
        !           277:          PEA   $0098
        !           278:          PEA   $00C7
        !           279:          _ClampMouse
        !           280:          BCS   L170212
        !           281:          LDA   #$0000
        !           282: L170212  STAL  L030169
        !           283:          PEA   $0003
        !           284:          JSL   L15032D
        !           285:          PLY
        !           286:          PEA   $0008
        !           287:          JSL   L15032D
        !           288:          PLY
        !           289:          JSL   L220000
        !           290:          TSC
        !           291:          CLC
        !           292:          ADC   #$0006
        !           293:          TCS
        !           294:          PLD
        !           295:          RTL
        !           296: 
        !           297: L170232  ENT
        !           298:          PHD
        !           299:          TSC
        !           300:          SEC
        !           301:          SBC   #$00FB
        !           302:          TCD
        !           303:          ADC   #$00F4
        !           304:          TCS
        !           305:          LDA   L03015D
        !           306:          CMP   #$0000
        !           307:          BEQ   L170249
        !           308:          JSL   L0B01EC
        !           309: L170249  JSL   L220274
        !           310:          TSC
        !           311:          CLC
        !           312:          ADC   #$0006
        !           313:          TCS
        !           314:          PLD
        !           315:          RTL

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.