Annotation of cblood/Cursor.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   Cursor.L
        !            12:          lst   off
        !            13: 
        !            14: *-----------
        !            15: 
        !            16:          use   Cursor.X
        !            17: 
        !            18: *-----------
        !            19: 
        !            20: L290000  ENT
        !            21:          PHD
        !            22:          TSC
        !            23:          SEC
        !            24:          SBC   #$00FB
        !            25:          TCD
        !            26:          ADC   #$00F4
        !            27:          TCS
        !            28:          PEA   $0000
        !            29:          PEA   $0066
        !            30:          JSL   L0702E3
        !            31:          PLY
        !            32:          PLY
        !            33:          STX   L030105
        !            34:          STA   L030103
        !            35:          TSC
        !            36:          CLC
        !            37:          ADC   #$0006
        !            38:          TCS
        !            39:          PLD
        !            40:          RTL
        !            41: 
        !            42: L290025  ENT
        !            43:          PHD
        !            44:          TSC
        !            45:          SEC
        !            46:          SBC   #$00FB
        !            47:          TCD
        !            48:          ADC   #$00F4
        !            49:          TCS
        !            50:          LDA   #$00A8
        !            51:          STA   L0300E1
        !            52:          STZ   L030107
        !            53:          LDA   #$0001
        !            54:          PHA
        !            55:          LDA   L0300E1
        !            56:          SEC
        !            57:          JSL   L2D083F
        !            58:          LDAL  L0435F0
        !            59:          PLX
        !            60:          STX   $FA
        !            61:          CLC
        !            62:          ADC   $FA
        !            63:          STA   L030109
        !            64:          PEA   $0020
        !            65:          PEA   $0006
        !            66:          LDX   L030105
        !            67:          LDA   L030103
        !            68:          PHX
        !            69:          PHA
        !            70:          LDA   L030109
        !            71:          LDX   #$0000
        !            72:          PHX
        !            73:          PHA
        !            74:          LDX   L03018D
        !            75:          LDA   L03018B
        !            76:          JSL   L2D0000
        !            77:          JSL   L0D0213
        !            78:          TAY
        !            79:          TSC
        !            80:          CLC
        !            81:          ADC   #$000C
        !            82:          TCS
        !            83:          TYA
        !            84:          PEA   $0000
        !            85:          JSL   L0D0000
        !            86:          PLY
        !            87:          PEA   $0020
        !            88:          PEA   $0006
        !            89:          LDA   L030109
        !            90:          LDX   #$0000
        !            91:          PHX
        !            92:          PHA
        !            93:          LDX   L03018D
        !            94:          LDA   L03018B
        !            95:          JSL   L2D0000
        !            96:          LDX   L0300F9
        !            97:          LDA   L0300F7
        !            98:          PHX
        !            99:          PHA
        !           100:          JSL   L0D0340
        !           101:          TAY
        !           102:          TSC
        !           103:          CLC
        !           104:          ADC   #$000C
        !           105:          TCS
        !           106:          TYA
        !           107:          PEA   $000F
        !           108:          JSL   L0D0000
        !           109:          PLY
        !           110:          TSC
        !           111:          CLC
        !           112:          ADC   #$0006
        !           113:          TCS
        !           114:          PLD
        !           115:          RTL
        !           116: 
        !           117: L2900C2  ENT
        !           118:          PHD
        !           119:          TSC
        !           120:          SEC
        !           121:          SBC   #$00F9
        !           122:          TCD
        !           123:          ADC   #$00F2
        !           124:          TCS
        !           125:          PEA   $0020
        !           126:          PEA   $0006
        !           127:          LDA   L030109
        !           128:          LDX   #$0000
        !           129:          PHX
        !           130:          PHA
        !           131:          LDX   L03018D
        !           132:          LDA   L03018B
        !           133:          JSL   L2D0000
        !           134:          LDX   L030105
        !           135:          LDA   L030103
        !           136:          PHX
        !           137:          PHA
        !           138:          JSL   L0D01CA
        !           139:          TAY
        !           140:          TSC
        !           141:          CLC
        !           142:          ADC   #$000C
        !           143:          TCS
        !           144:          TYA
        !           145:          LDA   $FF
        !           146:          STA   L030107
        !           147:          LDA   $FF
        !           148:          ASL
        !           149:          ASL
        !           150:          ASL
        !           151:          ASL
        !           152:          PHA
        !           153:          LDA   #$00A8
        !           154:          PLX
        !           155:          STX   $F8
        !           156:          CLC
        !           157:          ADC   $F8
        !           158:          STA   L0300E1
        !           159:          LDA   #$0001
        !           160:          PHA
        !           161:          LDA   L0300E1
        !           162:          SEC
        !           163:          JSL   L2D083F
        !           164:          LDAL  L0435F0
        !           165:          PLX
        !           166:          STX   $F8
        !           167:          CLC
        !           168:          ADC   $F8
        !           169:          STA   L030109
        !           170:          PEA   $0020
        !           171:          PEA   $0006
        !           172:          LDX   L030105
        !           173:          LDA   L030103
        !           174:          PHX
        !           175:          PHA
        !           176:          LDA   L030109
        !           177:          LDX   #$0000
        !           178:          PHX
        !           179:          PHA
        !           180:          LDX   L03018D
        !           181:          LDA   L03018B
        !           182:          JSL   L2D0000
        !           183:          JSL   L0D0213
        !           184:          TAY
        !           185:          TSC
        !           186:          CLC
        !           187:          ADC   #$000C
        !           188:          TCS
        !           189:          TYA
        !           190:          PEA   $0000
        !           191:          JSL   L0D0000
        !           192:          PLY
        !           193:          PEA   $0020
        !           194:          PEA   $0006
        !           195:          LDA   L030109
        !           196:          LDX   #$0000
        !           197:          PHX
        !           198:          PHA
        !           199:          LDX   L03018D
        !           200:          LDA   L03018B
        !           201:          JSL   L2D0000
        !           202:          LDX   L0300F9
        !           203:          LDA   L0300F7
        !           204:          PHX
        !           205:          PHA
        !           206:          JSL   L0D0340
        !           207:          TAY
        !           208:          TSC
        !           209:          CLC
        !           210:          ADC   #$000C
        !           211:          TCS
        !           212:          TYA
        !           213:          PEA   $000F
        !           214:          JSL   L0D0000
        !           215:          PLY
        !           216:          PEA   $0090
        !           217:          PEA   $0006
        !           218:          PEA   $5194
        !           219:          JSL   L1E0000
        !           220:          PLY
        !           221:          PLY
        !           222:          PLY
        !           223:          TSC
        !           224:          CLC
        !           225:          ADC   #$0006
        !           226:          TCS
        !           227:          PLD
        !           228:          RTL
        !           229: 
        !           230: L2901AA  PHD
        !           231:          TSC
        !           232:          SEC
        !           233:          SBC   #$00F9
        !           234:          TCD
        !           235:          ADC   #$00F0
        !           236:          TCS
        !           237:          LDA   L030107
        !           238:          CMP   L0301E3
        !           239:          BNE   L2901C0
        !           240:          BRL   L29020A
        !           241: L2901C0  LDA   L0301E3
        !           242:          STA   $F2
        !           243:          BRA   L290203
        !           244: L2901C7  LDA   $F2
        !           245:          SEC
        !           246:          SBC   #$0001
        !           247:          ASL
        !           248:          LDX   #$0000
        !           249:          PHX
        !           250:          PHA
        !           251:          LDA   #L0437E6
        !           252:          LDX   #^L0437E6
        !           253:          JSL   L2D0000
        !           254:          PLA
        !           255:          PLX
        !           256:          STA   $F4
        !           257:          STX   $F6
        !           258:          LDA   [$F4]
        !           259:          PHA
        !           260:          LDA   $F2
        !           261:          ASL
        !           262:          LDX   #$0000
        !           263:          PHX
        !           264:          PHA
        !           265:          LDA   #L0437E6
        !           266:          LDX   #^L0437E6
        !           267:          JSL   L2D0000
        !           268:          PLA
        !           269:          PLX
        !           270:          STA   $F4
        !           271:          STX   $F6
        !           272:          PLA
        !           273:          STA   [$F4]
        !           274:          DEC   $F2
        !           275: L290203  LDA   $F2
        !           276:          CMP   L030107
        !           277:          BNE   L2901C7
        !           278: L29020A  LDA   L030107
        !           279:          ASL
        !           280:          LDX   #$0000
        !           281:          PHX
        !           282:          PHA
        !           283:          LDA   #L0437E6
        !           284:          LDX   #^L0437E6
        !           285:          JSL   L2D0000
        !           286:          PLA
        !           287:          PLX
        !           288:          STA   $F4
        !           289:          STX   $F6
        !           290:          LDA   $FF
        !           291:          STA   [$F4]
        !           292:          LDA   L0301E3
        !           293:          CMP   #$0008
        !           294:          BEQ   L290232
        !           295:          INC   L0301E3
        !           296: L290232  STZ   $F2
        !           297:          BRA   L290260
        !           298: L290236  LDA   #$000A
        !           299:          CLC
        !           300:          ADC   $F2
        !           301:          PHA
        !           302:          LDA   $F2
        !           303:          ASL
        !           304:          LDX   #$0000
        !           305:          PHX
        !           306:          PHA
        !           307:          LDA   #L0437E6
        !           308:          LDX   #^L0437E6
        !           309:          JSL   L2D0000
        !           310:          PLA
        !           311:          PLX
        !           312:          STA   $F4
        !           313:          STX   $F6
        !           314:          LDA   [$F4]
        !           315:          PHA
        !           316:          JSL   L0A00D5
        !           317:          PLY
        !           318:          PLY
        !           319:          INC   $F2
        !           320: L290260  LDA   $F2
        !           321:          CMP   L0301E3
        !           322:          BNE   L290236
        !           323:          LDA   L030107
        !           324:          CMP   #$0007
        !           325:          BEQ   L29027B
        !           326:          INC   L030107
        !           327:          LDA   L030107
        !           328:          PHA
        !           329:          JSL   L2900C2
        !           330:          PLY
        !           331: L29027B  TSC
        !           332:          CLC
        !           333:          ADC   #$0008
        !           334:          TCS
        !           335:          PLD
        !           336:          RTL
        !           337: 
        !           338: L290283  ENT
        !           339:          PHD
        !           340:          TSC
        !           341:          SEC
        !           342:          SBC   #$00FB
        !           343:          TCD
        !           344:          ADC   #$00F2
        !           345:          TCS
        !           346:          LDA   L0301E3
        !           347:          BNE   L290296
        !           348:          BRL   L290342
        !           349: L290296  LDA   L030107
        !           350:          CMP   L0301E3
        !           351:          BNE   L2902A1
        !           352:          BRL   L290318
        !           353: L2902A1  LDA   L030107
        !           354:          STA   $F4
        !           355:          BRL   L29030D
        !           356: L2902A9  LDA   $F4
        !           357:          CLC
        !           358:          ADC   #$0001
        !           359:          ASL
        !           360:          LDX   #$0000
        !           361:          PHX
        !           362:          PHA
        !           363:          LDA   #L0437E6
        !           364:          LDX   #^L0437E6
        !           365:          JSL   L2D0000
        !           366:          PLA
        !           367:          PLX
        !           368:          STA   $F6
        !           369:          STX   $F8
        !           370:          LDA   [$F6]
        !           371:          PHA
        !           372:          LDA   $F4
        !           373:          ASL
        !           374:          LDX   #$0000
        !           375:          PHX
        !           376:          PHA
        !           377:          LDA   #L0437E6
        !           378:          LDX   #^L0437E6
        !           379:          JSL   L2D0000
        !           380:          PLA
        !           381:          PLX
        !           382:          STA   $F6
        !           383:          STX   $F8
        !           384:          PLA
        !           385:          STA   [$F6]
        !           386:          LDA   #$000A
        !           387:          CLC
        !           388:          ADC   $F4
        !           389:          PHA
        !           390:          LDA   $F4
        !           391:          ASL
        !           392:          LDX   #$0000
        !           393:          PHX
        !           394:          PHA
        !           395:          LDA   #L0437E6
        !           396:          LDX   #^L0437E6
        !           397:          JSL   L2D0000
        !           398:          PLA
        !           399:          PLX
        !           400:          STA   $F6
        !           401:          STX   $F8
        !           402:          LDA   [$F6]
        !           403:          PHA
        !           404:          JSL   L0A00D5
        !           405:          PLY
        !           406:          PLY
        !           407:          INC   $F4
        !           408: L29030D  LDA   L0301E3
        !           409:          SEC
        !           410:          SBC   #$0001
        !           411:          CMP   $F4
        !           412:          BNE   L2902A9
        !           413: L290318  DEC   L0301E3
        !           414:          LDA   #$000A
        !           415:          CLC
        !           416:          ADC   L0301E3
        !           417:          PHA
        !           418:          PEA   $0000
        !           419:          JSL   L0A00D5
        !           420:          PLY
        !           421:          PLY
        !           422:          LDA   L030107
        !           423:          CMP   L0301E3
        !           424:          BEQ   L290342
        !           425:          BCC   L290342
        !           426:          DEC   L030107
        !           427:          LDA   L030107
        !           428:          PHA
        !           429:          JSL   L2900C2
        !           430:          PLY
        !           431: L290342  TAY
        !           432:          TSC
        !           433:          CLC
        !           434:          ADC   #$0008
        !           435:          TCS
        !           436:          TYA
        !           437:          PLD
        !           438:          RTL
        !           439: 
        !           440: L29034C  ENT
        !           441:          PHD
        !           442:          TSC
        !           443:          SEC
        !           444:          SBC   #$00FB
        !           445:          TCD
        !           446:          ADC   #$00F0
        !           447:          TCS
        !           448:          LDA   L03013B
        !           449:          SEC
        !           450:          SBC   #$00B0
        !           451:          STA   $F4
        !           452:          LDA   $F4
        !           453:          LSR
        !           454:          LSR
        !           455:          LSR
        !           456:          LSR
        !           457:          STA   $F2
        !           458:          LDA   $F2
        !           459:          CMP   L0301E3
        !           460:          BEQ   L290371
        !           461:          BCS   L290378
        !           462: L290371  PEI   $F2
        !           463:          JSL   L2900C2
        !           464:          PLY
        !           465: L290378  TSC
        !           466:          CLC
        !           467:          ADC   #$000A
        !           468:          TCS
        !           469:          PLD
        !           470:          RTL
        !           471: 
        !           472: L290380  ENT
        !           473:          PHD
        !           474:          TSC
        !           475:          SEC
        !           476:          SBC   #$00F7
        !           477:          TCD
        !           478:          ADC   #$00EA
        !           479:          TCS
        !           480:          LDA   $FD
        !           481:          CLC
        !           482:          ADC   L0301DF
        !           483:          SEC
        !           484:          SBC   #$0030
        !           485:          STA   $FD
        !           486:          LDA   $FF
        !           487:          SEC
        !           488:          SBC   #$0088
        !           489:          STA   $FF
        !           490:          LDA   $FD
        !           491:          LSR
        !           492:          LSR
        !           493:          LSR
        !           494:          LSR
        !           495:          ASL
        !           496:          STA   $EC
        !           497:          LDA   $FF
        !           498:          CMP   #$0013
        !           499:          BEQ   L2903B3
        !           500:          BCC   L2903B3
        !           501:          INC   $EC
        !           502: L2903B3  LDA   $EC
        !           503:          LDX   #$0000
        !           504:          PHX
        !           505:          PHA
        !           506:          LDA   #L04346C
        !           507:          LDX   #^L04346C
        !           508:          JSL   L2D0000
        !           509:          PLA
        !           510:          PLX
        !           511:          STA   $F2
        !           512:          STX   $F4
        !           513:          LDA   [$F2]
        !           514:          AND   #$00FF
        !           515:          AND   #$0080
        !           516:          TAY
        !           517:          BEQ   L2903DC
        !           518:          PEI   $EC
        !           519:          JSL   L2901AA
        !           520:          PLY
        !           521: L2903DC  TSC
        !           522:          CLC
        !           523:          ADC   #$000C
        !           524:          TCS
        !           525:          PLD
        !           526:          RTL

unix.superglobalmegacorp.com

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