SS MAIN
FILE INFORMATION
FILENAME(S): SS MAIN
FILE TYPE(S): SEQ
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 17:16:38
APPEARS ON: 2 disk(s)
FILE HASH
2d6fa3007a365ec1021deee1f8fc2c03e90f8121e59c033c26d928fd802f4421
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ALIANTS | SS MAIN | SEQ | Jonathan | 16 | 1 |
⚠ CORRUPT DOWNLOAD FILE |
| ALIANTS | SS MAIN | SEQ | Jonathan | 16 | 1 |
⚠ CORRUPT DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 0D 2A A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |.*..............| 00000030: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................| 00000040: 2A 0D 2A A0 A0 A0 A0 A0 A0 A0 A0 A0 73 6F 66 74 |*.*.........soft| 00000050: 73 74 61 72 A0 6C 6F 67 6F A0 A0 A0 A0 A0 A0 A0 |star.logo.......| 00000060: A0 2A 0D 2A A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |.*.*............| 00000070: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................| 00000080: A0 A0 2A 0D 2A A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |..*.*...........| 00000090: 73 73 A0 6D 61 69 6E A0 A0 A0 A0 A0 A0 A0 A0 A0 |ss.main.........| 000000A0: A0 A0 A0 2A 0D 2A A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |...*.*..........| 000000B0: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................| 000000C0: A0 A0 A0 A0 2A 0D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....*.**********| 000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000E0: 2A 2A 2A 2A 2A 2A 0D 63 68 61 72 73 65 74 31 20 |******.charset1 | 000000F0: 3D 20 24 34 38 30 30 0D 2A 2A 2A 2A 2A 2A 2A 2A |= $4800.********| 00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000110: 2A 2A 2A 2A 2A 2A 2A 2A 0D 20 6F 72 67 20 24 38 |********. org $8| 00000120: 30 30 30 0D 73 74 61 72 74 20 6C 64 61 20 23 25 |000.start lda #%| 00000130: 30 30 30 30 30 30 30 30 0D 20 73 74 61 20 24 64 |00000000. sta $d| 00000140: 30 31 31 0D 20 73 74 61 20 24 64 30 32 30 0D 20 |011. sta $d020. | 00000150: 73 74 61 20 24 64 30 32 31 0D 20 6C 64 61 20 23 |sta $d021. lda #| 00000160: 37 0D 20 73 74 61 20 24 64 30 32 32 0D 20 6C 64 |7. sta $d022. ld| 00000170: 61 20 23 39 0D 20 73 74 61 20 24 64 30 32 33 0D |a #9. sta $d023.| 00000180: 20 6C 64 61 20 24 64 64 30 32 0D 20 6F 72 61 20 | lda $dd02. ora | 00000190: 23 33 0D 20 73 74 61 20 24 64 64 30 32 0D 20 6C |#3. sta $dd02. l| 000001A0: 64 61 20 24 64 64 30 30 0D 20 61 6E 64 20 23 24 |da $dd00. and #$| 000001B0: 66 63 0D 20 6F 72 61 20 23 32 0D 20 73 74 61 20 |fc. ora #2. sta | 000001C0: 24 64 64 30 30 0D 20 6C 64 61 20 23 24 30 32 0D |$dd00. lda #$02.| 000001D0: 20 73 74 61 20 24 64 30 31 38 0D 20 6C 64 61 20 | sta $d018. lda | 000001E0: 23 25 30 30 30 31 31 30 30 30 0D 20 73 74 61 20 |#%00011000. sta | 000001F0: 24 64 30 31 36 0D 20 3E 3E 3E 20 63 6C 72 6D 65 |$d016. >>> clrme| 00000200: 6D 2E 24 64 38 30 30 3B 38 30 30 3B 31 34 0D 20 |m.$d800;800;14. | 00000210: 3E 3E 3E 20 63 6C 72 6D 65 6D 2E 24 64 38 30 30 |>>> clrmem.$d800| 00000220: 2B 38 30 30 3B 32 30 30 3B 31 0D 20 3E 3E 3E 20 |+800;200;1. >>> | 00000230: 63 6C 72 6D 65 6D 2E 24 64 38 30 30 2B 38 34 38 |clrmem.$d800+848| 00000240: 3B 32 33 3B 33 0D 20 3E 3E 3E 20 63 6C 72 6D 65 |;23;3. >>> clrme| 00000250: 6D 2E 24 64 38 30 30 2B 39 32 38 3B 32 33 3B 33 |m.$d800+928;23;3| 00000260: 0D 20 3E 3E 3E 20 63 6C 72 6D 65 6D 2E 24 64 38 |. >>> clrmem.$d8| 00000270: 30 30 2B 38 38 38 3B 32 33 3B 32 0D 20 3E 3E 3E |00+888;23;2. >>>| 00000280: 20 6D 6F 76 65 62 6C 6F 6B 2E 66 6F 6E 74 3B 63 | moveblok.font;c| 00000290: 68 61 72 73 65 74 31 3B 24 38 30 30 0D 20 3E 3E |harset1;$800. >>| 000002A0: 3E 20 6D 6F 76 65 62 6C 6F 6B 2E 73 63 72 6E 63 |> moveblok.scrnc| 000002B0: 68 61 72 3B 73 63 72 65 65 6E 3B 31 30 30 30 0D |har;screen;1000.| 000002C0: 20 3E 3E 3E 20 73 65 74 72 61 73 74 2E 32 35 30 | >>> setrast.250| 000002D0: 3B 6C 69 6E 65 32 35 30 0D 20 6C 64 61 20 23 25 |;line250. lda #%| 000002E0: 30 30 30 31 31 30 31 31 0D 20 73 74 61 20 24 64 |00011011. sta $d| 000002F0: 30 31 31 0D 5D 73 74 6F 70 20 6A 6D 70 20 5D 73 |011.]stop jmp ]s| 00000300: 74 6F 70 0D 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |top.************| 00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000320: 2A 2A 2A 2A 0D 6C 69 6E 65 32 35 30 20 3E 3E 3E |****.line250 >>>| 00000330: 20 69 66 72 61 73 74 0D 20 3E 3E 3E 20 63 6E 74 | ifrast. >>> cnt| 00000340: 64 77 6E 30 2E 66 6C 61 73 68 63 6E 74 0D 20 62 |dwn0.flashcnt. b| 00000350: 6E 65 20 6C 69 6E 65 32 35 30 61 0D 20 6C 64 61 |ne line250a. lda| 00000360: 20 23 33 30 0D 20 73 74 61 20 66 6C 61 73 68 63 | #30. sta flashc| 00000370: 6E 74 0D 20 6C 64 61 20 23 31 0D 20 65 6F 72 20 |nt. lda #1. eor | 00000380: 66 6C 61 73 68 6E 6F 0D 20 73 74 61 20 66 6C 61 |flashno. sta fla| 00000390: 73 68 6E 6F 0D 20 74 61 79 0D 20 6C 64 61 20 66 |shno. tay. lda f| 000003A0: 6C 61 73 68 74 61 62 2C 79 0D 20 73 74 61 20 24 |lashtab,y. sta $| 000003B0: 64 30 32 32 0D 6C 69 6E 65 32 35 30 61 20 3E 3E |d022.line250a >>| 000003C0: 3E 20 63 6E 74 64 77 6E 30 2E 72 6F 74 61 74 65 |> cntdwn0.rotate| 000003D0: 0D 20 62 6E 65 20 6C 69 6E 65 32 35 30 62 0D 20 |. bne line250b. | 000003E0: 6C 64 61 20 23 34 0D 20 73 74 61 20 72 6F 74 61 |lda #4. sta rota| 000003F0: 74 65 0D 20 69 6E 63 20 72 6F 74 63 6E 74 0D 20 |te. inc rotcnt. | 00000400: 6C 64 61 20 72 6F 74 63 6E 74 0D 20 61 6E 64 20 |lda rotcnt. and | 00000410: 23 33 0D 20 63 6C 63 0D 20 72 6F 72 0D 20 72 6F |#3. clc. ror. ro| 00000420: 72 0D 20 72 6F 72 0D 20 61 64 63 20 23 36 33 0D |r. ror. adc #63.| 00000430: 20 74 61 78 0D 20 6C 64 79 20 23 36 33 0D 5D 6C | tax. ldy #63.]l| 00000440: 6F 6F 70 20 6C 64 61 20 62 6F 72 64 65 72 2C 78 |oop lda border,x| 00000450: 0D 20 73 74 61 20 24 34 66 38 38 2C 79 0D 20 64 |. sta $4f88,y. d| 00000460: 65 78 0D 20 64 65 79 0D 20 62 70 6C 20 5D 6C 6F |ex. dey. bpl ]lo| 00000470: 6F 70 0D 6C 69 6E 65 32 35 30 62 20 6A 6D 70 20 |op.line250b jmp | 00000480: 72 65 74 69 6E 74 0D 2A 2A 2A 2A 2A 2A 2A 2A 2A |retint.*********| 00000490: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000004A0: 2A 2A 2A 2A 2A 2A 2A 0D 72 61 73 74 73 65 74 20 |*******.rastset | 000004B0: 73 65 69 0D 20 73 74 61 20 24 64 30 31 32 0D 20 |sei. sta $d012. | 000004C0: 6C 64 61 20 23 24 37 66 0D 20 73 74 61 20 24 64 |lda #$7f. sta $d| 000004D0: 63 30 64 0D 20 6C 64 61 20 23 31 0D 20 73 74 61 |c0d. lda #1. sta| 000004E0: 20 24 64 30 31 61 0D 20 73 74 78 20 24 30 33 31 | $d01a. stx $031| 000004F0: 34 0D 20 73 74 79 20 24 30 33 31 35 0D 20 6C 64 |4. sty $0315. ld| 00000500: 61 20 23 24 37 66 0D 20 61 6E 64 20 24 64 30 31 |a #$7f. and $d01| 00000510: 31 0D 20 73 74 61 20 24 64 30 31 31 0D 20 6C 64 |1. sta $d011. ld| 00000520: 61 20 23 25 30 30 30 30 30 31 31 30 0D 20 73 74 |a #%00000110. st| 00000530: 61 20 24 31 0D 20 63 6C 69 0D 20 72 74 73 0D 2A |a $1. cli. rts.*| 00000540: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D |***************.| 00000560: 6E 78 74 72 73 74 32 20 73 74 61 20 24 64 30 31 |nxtrst2 sta $d01| 00000570: 32 0D 20 73 74 78 20 24 30 33 31 34 0D 20 73 74 |2. stx $0314. st| 00000580: 79 20 24 30 33 31 35 0D 72 65 74 69 6E 74 20 70 |y $0315.retint p| 00000590: 6C 61 0D 20 74 61 79 0D 20 70 6C 61 0D 20 74 61 |la. tay. pla. ta| 000005A0: 78 0D 20 70 6C 61 0D 20 72 74 69 0D 2A 2A 2A 2A |x. pla. rti.****| 000005B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 63 6C 72 |************.clr| 000005D0: 73 75 62 20 6C 64 79 20 23 30 0D 20 6C 64 78 20 |sub ldy #0. ldx | 000005E0: 6F 66 66 73 65 74 2B 31 0D 20 62 65 71 20 63 6C |offset+1. beq cl| 000005F0: 72 73 75 62 32 0D 5D 6C 6F 6F 70 20 73 74 61 20 |rsub2.]loop sta | 00000600: 28 67 6F 74 6F 31 29 2C 79 0D 20 69 6E 79 0D 20 |(goto1),y. iny. | 00000610: 62 6E 65 20 5D 6C 6F 6F 70 0D 20 69 6E 63 20 67 |bne ]loop. inc g| 00000620: 6F 74 6F 31 2B 31 0D 20 64 65 78 0D 20 62 6E 65 |oto1+1. dex. bne| 00000630: 20 5D 6C 6F 6F 70 0D 63 6C 72 73 75 62 32 20 6C | ]loop.clrsub2 l| 00000640: 64 78 20 6F 66 66 73 65 74 0D 20 62 65 71 20 65 |dx offset. beq e| 00000650: 6E 64 63 6C 72 0D 5D 6C 6F 6F 70 20 73 74 61 20 |ndclr.]loop sta | 00000660: 28 67 6F 74 6F 31 29 2C 79 0D 20 69 6E 79 0D 20 |(goto1),y. iny. | 00000670: 64 65 78 0D 20 62 6E 65 20 5D 6C 6F 6F 70 0D 65 |dex. bne ]loop.e| 00000680: 6E 64 63 6C 72 20 72 74 73 0D 2A 2A 2A 2A 2A 2A |ndclr rts.******| 00000690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 6D 6F 76 65 73 |**********.moves| 000006B0: 75 62 20 6C 64 79 20 23 30 0D 20 6C 64 78 20 6D |ub ldy #0. ldx m| 000006C0: 6F 76 65 6E 75 6D 2B 31 0D 20 62 65 71 20 6D 6F |ovenum+1. beq mo| 000006D0: 76 65 70 72 74 0D 5D 6C 6F 6F 70 20 6C 64 61 20 |veprt.]loop lda | 000006E0: 28 67 65 74 66 72 6F 6D 29 2C 79 0D 20 73 74 61 |(getfrom),y. sta| 000006F0: 20 28 67 6F 74 6F 31 29 2C 79 0D 20 69 6E 79 0D | (goto1),y. iny.| 00000700: 20 62 6E 65 20 5D 6C 6F 6F 70 0D 20 69 6E 63 20 | bne ]loop. inc | 00000710: 67 65 74 66 72 6F 6D 2B 31 0D 20 69 6E 63 20 67 |getfrom+1. inc g| 00000720: 6F 74 6F 31 2B 31 0D 20 64 65 78 0D 20 62 6E 65 |oto1+1. dex. bne| 00000730: 20 5D 6C 6F 6F 70 0D 6D 6F 76 65 70 72 74 20 6C | ]loop.moveprt l| 00000740: 64 78 20 6D 6F 76 65 6E 75 6D 0D 20 62 65 71 20 |dx movenum. beq | 00000750: 6D 6F 76 65 65 6E 64 0D 5D 6C 6F 6F 70 20 6C 64 |moveend.]loop ld| 00000760: 61 20 28 67 65 74 66 72 6F 6D 29 2C 79 0D 20 73 |a (getfrom),y. s| 00000770: 74 61 20 28 67 6F 74 6F 31 29 2C 79 0D 20 69 6E |ta (goto1),y. in| 00000780: 79 0D 20 64 65 78 0D 20 62 6E 65 20 5D 6C 6F 6F |y. dex. bne ]loo| 00000790: 70 0D 6D 6F 76 65 65 6E 64 20 72 74 73 0D 2A 2A |p.moveend rts.**| 000007A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000007B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 63 |**************.c| 000007C0: 6F 6C 62 79 74 65 20 64 66 62 20 30 0D 6F 66 66 |olbyte dfb 0.off| 000007D0: 73 65 74 20 64 61 20 30 0D 6D 6F 76 65 6E 75 6D |set da 0.movenum| 000007E0: 20 64 61 20 30 0D 66 6C 61 73 68 63 6E 74 20 64 | da 0.flashcnt d| 000007F0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000800: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000810: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000820: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000830: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000840: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000850: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000860: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000870: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000880: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000890: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000008A0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000008B0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000008C0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000008D0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000008E0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |.............. |
********************************.*
*.* SOFT
STAR LOGO *.*
*.* SS MAIN
*.* *.**
******************************.CHARSET1
= $4800.********************************
. ORG $8000.START LDA #%00000000. STA $D
011. STA $D020. STA $D021. LDA #7. STA $
D022. LDA #9. STA $D023. LDA $DD02. ORA
#3. STA $DD02. LDA $DD00. AND #$FC. ORA
#2. STA $DD00. LDA #$02. STA $D018. LDA
#%00011000. STA $D016. >>> CLRMEM.$D800;
800;14. >>> CLRMEM.$D800+800;200;1. >>>
CLRMEM.$D800+848;23;3. >>> CLRMEM.$D800+
928;23;3. >>> CLRMEM.$D800+888;23;2. >>>
MOVEBLOK.FONT;CHARSET1;$800. >>> MOVEBL
OK.SCRNCHAR;SCREEN;1000. >>> SETRAST.250
;LINE250. LDA #%00011011. STA $D011.]STO
P JMP ]STOP.****************************
****.LINE250 >>> IFRAST. >>> CNTDWN0.FLA
SHCNT. BNE LINE250A. LDA #30. STA FLASHC
NT. LDA #1. EOR FLASHNO. STA FLASHNO. TA
Y. LDA FLASHTAB,Y. STA $D022.LINE250A >>
> CNTDWN0.ROTATE. BNE LINE250B. LDA #4.
STA ROTATE. INC ROTCNT. LDA ROTCNT. AND
#3. CLC. ROR. ROR. ROR. ADC #63. TAX. LD
Y #63.]LOOP LDA BORDER,X. STA $4F88,Y. D
EX. DEY. BPL ]LOOP.LINE250B JMP RETINT.*
*******************************.RASTSET
SEI. STA $D012. LDA #$7F. STA $DC0D. LDA
#1. STA $D01A. STX $0314. STY $0315. LD
A #$7F. AND $D011. STA $D011. LDA #%0000
0110. STA $1. CLI. RTS.*****************
***************.NXTRST2 STA $D012. STX $
0314. STY $0315.RETINT PLA. TAY. PLA. TA
X. PLA. RTI.****************************
****.CLRSUB LDY #0. LDX OFFSET+1. BEQ CL
RSUB2.]LOOP STA (GOTO1),Y. INY. BNE ]LOO
P. INC GOTO1+1. DEX. BNE ]LOOP.CLRSUB2 L
DX OFFSET. BEQ ENDCLR.]LOOP STA (GOTO1),
Y. INY. DEX. BNE ]LOOP.ENDCLR RTS.******
**************************.MOVESUB LDY #
0. LDX MOVENUM+1. BEQ MOVEPRT.]LOOP LDA
(GETFROM),Y. STA (GOTO1),Y. INY. BNE ]LO
OP. INC GETFROM+1. INC GOTO1+1. DEX. BNE
]LOOP.MOVEPRT LDX MOVENUM. BEQ MOVEEND.
]LOOP LDA (GETFROM),Y. STA (GOTO1),Y. IN
Y. DEX. BNE ]LOOP.MOVEEND RTS.**********
**********************.COLBYTE DFB 0.OFF
SET DA 0.MOVENUM DA 0.FLASHCNT D........
........................................
........................................
........................................
........................................
........................................
........................................
......
> CLICK IMAGE PREVIEW FOR FULL MODAL