Return to sonspe.s CVS log

Up to [ERE Captain BLood IIGS reversed] / cblood

Annotation of cblood/sonspe.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   sonspe.L
        !            12:          lst   off
        !            13: 
        !            14: *-----------
        !            15: 
        !            16:          use   sonspe.X
        !            17: 
        !            18: *-----------
        !            19: 
        !            20:          use   4/Sound.Macs
        !            21:          use   4/Util.Macs
        !            22: 
        !            23: *-----------
        !            24: 
        !            25: L130000  ENT
        !            26:          PHD
        !            27:          TSC
        !            28:          SEC
        !            29:          SBC   #$00FB
        !            30:          TCD
        !            31:          ADC   #$00F4
        !            32:          TCS
        !            33:          PEA   ^L0415C9
        !            34:          PEA   L0415C9
        !            35:          JSL   L080262
        !            36:          PLY
        !            37:          PLY
        !            38:          STX   L03004D
        !            39:          STA   L03004B
        !            40:          PEA   ^L0415DD
        !            41:          PEA   L0415DD
        !            42:          JSL   L080262
        !            43:          PLY
        !            44:          PLY
        !            45:          STX   L030051
        !            46:          STA   L03004F
        !            47:          LDX   #$0000
        !            48:          LDA   #$0100
        !            49:          PHX
        !            50:          PHA
        !            51:          LDX   L030051
        !            52:          LDA   L03004F
        !            53:          PHX
        !            54:          PHA
        !            55:          JSL   L0703AC
        !            56:          PLY
        !            57:          PLY
        !            58:          SEC
        !            59:          JSL   L2D0090
        !            60:          PLY
        !            61:          PLY
        !            62:          STA   L030055
        !            63:          LDX   L03004D
        !            64:          LDA   L03004B
        !            65:          PHX
        !            66:          PHA
        !            67:          JSL   L0703AC
        !            68:          PLY
        !            69:          PLY
        !            70:          STA   L030053
        !            71:          TSC
        !            72:          CLC
        !            73:          ADC   #$0006
        !            74:          TCS
        !            75:          PLD
        !            76:          RTL
        !            77: 
        !            78: L130068  ENT
        !            79:          PHD
        !            80:          TSC
        !            81:          SEC
        !            82:          SBC   #$00FB
        !            83:          TCD
        !            84:          ADC   #$00F4
        !            85:          TCS
        !            86:          PEA   $0080
        !            87:          LDA   L030053
        !            88:          PHA
        !            89:          LDX   L03004D
        !            90:          LDA   L03004B
        !            91:          PHX
        !            92:          PHA
        !            93:          PEA   $0010
        !            94:          PEA   $0000
        !            95:          JSL   L120035
        !            96:          TAY
        !            97:          TSC
        !            98:          CLC
        !            99:          ADC   #$000C
        !           100:          TCS
        !           101:          TYA
        !           102:          LDA   #L0415F0
        !           103:          LDX   #^L0415F0
        !           104:          PHX
        !           105:          PHA
        !           106:          LDA   #L0415F0
        !           107:          LDX   #^L0415F0
        !           108:          STA   $F6
        !           109:          STX   $F8
        !           110:          PLA
        !           111:          PLX
        !           112:          LDY   #$000E
        !           113:          PHA
        !           114:          TXA
        !           115:          STA   [$F6],Y
        !           116:          PLA
        !           117:          LDY   #$000C
        !           118:          STA   [$F6],Y
        !           119:          JSL   L1201D4
        !           120:          TSC
        !           121:          CLC
        !           122:          ADC   #$0006
        !           123:          TCS
        !           124:          PLD
        !           125:          RTL
        !           126: 
        !           127: L1300C1  ENT
        !           128:          PHD
        !           129:          TSC
        !           130:          SEC
        !           131:          SBC   #$00FB
        !           132:          TCD
        !           133:          ADC   #$00F0
        !           134:          TCS
        !           135:          LDX   L030051
        !           136:          LDA   L03004F
        !           137:          STX   $F4
        !           138:          STA   $F2
        !           139:          LDX   $F4
        !           140:          LDA   $F2
        !           141:          PHA
        !           142:          TXA
        !           143:          STAL  L0415F2
        !           144:          PLA
        !           145:          STAL  L0415F0
        !           146:          LDA   #L0415F0
        !           147:          LDX   #^L0415F0
        !           148:          STA   $F6
        !           149:          STX   $F8
        !           150:          LDA   L030055
        !           151:          LDY   #$0004
        !           152:          STA   [$F6],Y
        !           153:          LDA   #L0415F0
        !           154:          LDX   #^L0415F0
        !           155:          STA   $F6
        !           156:          STX   $F8
        !           157:          LDA   #$0010
        !           158:          LDY   #$0006
        !           159:          STA   [$F6],Y
        !           160:          LDA   #L0415F0
        !           161:          LDX   #^L0415F0
        !           162:          STA   $F6
        !           163:          STX   $F8
        !           164:          LDA   #$0000
        !           165:          LDY   #$0008
        !           166:          STA   [$F6],Y
        !           167:          LDA   #L0415F0
        !           168:          LDX   #^L0415F0
        !           169:          STA   $F6
        !           170:          STX   $F8
        !           171:          LDA   #$0000
        !           172:          LDY   #$000A
        !           173:          STA   [$F6],Y
        !           174:          LDA   #L0415F0
        !           175:          LDX   #^L0415F0
        !           176:          PHX
        !           177:          PHA
        !           178:          LDA   #L0415F0
        !           179:          LDX   #^L0415F0
        !           180:          STA   $F6
        !           181:          STX   $F8
        !           182:          PLA
        !           183:          PLX
        !           184:          LDY   #$000E
        !           185:          PHA
        !           186:          TXA
        !           187:          STA   [$F6],Y
        !           188:          PLA
        !           189:          LDY   #$000C
        !           190:          STA   [$F6],Y
        !           191:          LDA   #L0415F0
        !           192:          LDX   #^L0415F0
        !           193:          STA   $F6
        !           194:          STX   $F8
        !           195:          LDA   #$008C
        !           196:          LDY   #$0010
        !           197:          STA   [$F6],Y
        !           198:          PEA   $0001
        !           199:          _FFStopSound
        !           200:          BCS   L13016F
        !           201:          LDA   #$0000
        !           202: L13016F  STAL  L030169
        !           203:          PEA   $0001
        !           204:          PEA   ^L0415F0
        !           205:          PEA   L0415F0
        !           206:          _FFStartSound
        !           207:          BCS   L130188
        !           208:          LDA   #$0000
        !           209: L130188  STAL  L030169
        !           210:          TSC
        !           211:          CLC
        !           212:          ADC   #$000A
        !           213:          TCS
        !           214:          PLD
        !           215:          RTL
        !           216: 
        !           217: L130194  ENT
        !           218:          PHD
        !           219:          TSC
        !           220:          SEC
        !           221:          SBC   #$00FB
        !           222:          TCD
        !           223:          ADC   #$00F4
        !           224:          TCS
        !           225:          PEA   $0001
        !           226:          _FFStopSound
        !           227:          BCS   L1301AE
        !           228:          LDA   #$0000
        !           229: L1301AE  STAL  L030169
        !           230:          TSC
        !           231:          CLC
        !           232:          ADC   #$0006
        !           233:          TCS
        !           234:          PLD
        !           235:          RTL
        !           236: 
        !           237: L1301BA  ENT
        !           238:          PHD
        !           239:          TSC
        !           240:          SEC
        !           241:          SBC   #$00F9
        !           242:          TCD
        !           243:          ADC   #$00F2
        !           244:          TCS
        !           245:          LDA   $FF
        !           246:          BNE   L1301EF
        !           247:          LDA   #L0415F0
        !           248:          LDX   #^L0415F0
        !           249:          STA   $F4
        !           250:          STX   $F6
        !           251:          LDA   #$0000
        !           252:          LDY   #$0010
        !           253:          STA   [$F4],Y
        !           254:          LDA   #L0415F0
        !           255:          LDX   #^L0415F0
        !           256:          STA   $F4
        !           257:          STX   $F6
        !           258:          LDA   #$0010
        !           259:          LDY   #$0006
        !           260:          STA   [$F4],Y
        !           261:          BRA   L13021C
        !           262: L1301EF  LDA   $FF
        !           263:          ASL
        !           264:          ASL
        !           265:          ASL
        !           266:          ASL
        !           267:          CLC
        !           268:          ADC   #$0010
        !           269:          PHA
        !           270:          LDA   #L0415F0
        !           271:          LDX   #^L0415F0
        !           272:          STA   $F4
        !           273:          STX   $F6
        !           274:          PLA
        !           275:          LDY   #$0006
        !           276:          STA   [$F4],Y
        !           277:          LDA   #L0415F0
        !           278:          LDX   #^L0415F0
        !           279:          STA   $F4
        !           280:          STX   $F6
        !           281:          LDA   #$008C
        !           282:          LDY   #$0010
        !           283:          STA   [$F4],Y
        !           284: L13021C  TSC
        !           285:          CLC
        !           286:          ADC   #$0006
        !           287:          TCS
        !           288:          PLD
        !           289:          RTL

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