forked from ascrnet/FujiLogo
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Fuji.asm
119 lines (110 loc) · 3.26 KB
/
Fuji.asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
; ATARI Logo Fuji
; By AsCrNet
; 2021-04-24
;-----------------------------
SDLSTL = $230
COLOR1 = $2C5
COLOR2 = $2C6
CHBAS = $2F4
COLPF0 = $D016
VCOUNT = $D40B
org $2000
dlist
:7 .by $70
.by $46
.wo fuji
:8 .by $06
.by $70
.by $42
.wo atari
:3 .by $02
.by $41
.wo dlist
fuji
.sb ' !"# '
.sb ' !"# '
.sb ' !"# '
.sb ' $"% '
.sb ' &"',$27,' '
.sb ' ()"*+ '
.sb ' ,-"./ '
.sb ' 012"345 '
.sb ' 67 " 89 '
atari
.sb ' :;<=>:; ?@ABX '
.sb ' CDEFGCDEFG HUY '
.sb ' IJKLGIJKLGMNVY '
.sb ' OPQRGOPQRGSTWY '
start
mwa #dlist SDLSTL
mva #>font CHBAS
mva #$C COLOR1
mva #$0 COLOR2
loop
lda VCOUNT
clc
sbc 20
sta VCOUNT
sta COLPF0
jmp loop
org $3000
font
.by $00,$00,$00,$00,$00,$00,$00,$00
.by $1E,$1E,$1E,$1E,$1E,$1E,$1E,$1E
.by $FF,$FF,$FF,$FF,$FF,$FF,$FF,$FF
.by $78,$78,$78,$78,$78,$78,$78,$78
.by $1E,$1E,$3E,$3E,$3E,$3E,$3E,$3E
.by $78,$78,$7C,$7C,$7C,$7C,$7C,$7C
.by $3E,$3E,$7E,$7E,$7E,$7C,$7C,$FC
.by $7C,$7C,$7E,$7E,$7E,$3E,$3E,$3F
.by $00,$00,$00,$01,$01,$01,$03,$03
.by $FC,$FC,$FC,$FC,$F8,$F8,$F8,$F8
.by $3F,$3F,$3F,$3F,$1F,$1F,$1F,$1F
.by $00,$00,$00,$80,$80,$80,$C0,$C0
.by $03,$07,$07,$0F,$0F,$1F,$1F,$3F
.by $F8,$F0,$F0,$F0,$F0,$E0,$E0,$E0
.by $1F,$0F,$0F,$0F,$0F,$07,$07,$07
.by $C0,$E0,$E0,$F0,$F0,$F8,$F8,$FC
.by $00,$00,$01,$07,$3F,$3F,$3F,$3F
.by $7F,$FF,$FF,$FF,$FF,$FF,$FF,$FE
.by $C0,$C0,$C0,$80,$80,$00,$00,$00
.by $03,$03,$03,$01,$01,$00,$00,$00
.by $FE,$FF,$FF,$FF,$FF,$FF,$FF,$7F
.by $00,$00,$80,$E0,$FC,$FC,$FC,$FC
.by $3F,$3F,$3F,$3F,$3F,$3F,$3F,$3C
.by $FE,$FC,$F8,$F0,$E0,$C0,$00,$00
.by $7F,$3F,$1F,$0F,$07,$03,$00,$00
.by $FC,$FC,$FC,$FC,$FC,$FC,$FC,$3C
.by $00,$00,$03,$0F,$1F,$1F,$3F,$3F
.by $00,$00,$C0,$F0,$F8,$F8,$FC,$FC
.by $00,$00,$7F,$7F,$7F,$7F,$7F,$00
.by $00,$00,$FF,$FF,$FF,$FF,$FF,$7E
.by $00,$00,$FE,$FE,$FE,$FE,$FE,$00
.by $00,$00,$3F,$7F,$7F,$7F,$7F,$7E
.by $00,$00,$FF,$FF,$FF,$FF,$FF,$03
.by $00,$00,$00,$E0,$F8,$FC,$FE,$FF
.by $00,$00,$07,$07,$07,$07,$07,$07
.by $00,$00,$00,$00,$00,$00,$00,$01
.by $3F,$7F,$7E,$7E,$FC,$FC,$FC,$F8
.by $FC,$FE,$7E,$7E,$3F,$3F,$3F,$1F
.by $00,$00,$00,$00,$00,$00,$00,$80
.by $7E,$7E,$7E,$7E,$7E,$7E,$7E,$7E
.by $FF,$7F,$3F,$3F,$3F,$3F,$7F,$FF
.by $01,$01,$03,$03,$03,$07,$07,$07
.by $F8,$F8,$F0,$F0,$FF,$FF,$FF,$FF
.by $1F,$1F,$0F,$0F,$FF,$FF,$FF,$FF
.by $80,$80,$C0,$C0,$C0,$E0,$E0,$E0
.by $03,$0F,$3F,$7F,$7F,$7F,$3F,$1F
.by $FE,$FC,$F8,$E0,$80,$00,$80,$C0
.by $0F,$0F,$0F,$1F,$1F,$1F,$3F,$3F
.by $FF,$C0,$C0,$80,$80,$80,$00,$00
.by $FF,$03,$03,$01,$01,$01,$00,$00
.by $F0,$F0,$F0,$F8,$F8,$F8,$FC,$FC
.by $0F,$07,$03,$01,$00,$00,$00,$00
.by $E0,$F0,$F8,$FC,$FE,$7F,$3F,$1F
.by $07,$87,$87,$87,$87,$87,$07,$07
.by $07,$07,$07,$07,$07,$07,$07,$07
.by $07,$07,$07,$07,$07,$07,$87,$C7
.by $00,$00,$E0,$E0,$E0,$E0,$E0,$E0
.by $E0,$E0,$E0,$E0,$E0,$E0,$E0,$E0
run start