mirror of https://github.com/falsovsky/z80.git
First working version!!!!!!!!!!!!!!!!
This commit is contained in:
parent
ba3132da4f
commit
6f939f179f
|
@ -29,7 +29,7 @@ rom_define_borda equ $2294; Rotina da ROM que define a borda
|
||||||
screen_attribute equ $47
|
screen_attribute equ $47
|
||||||
|
|
||||||
; Valor de 0 a 7
|
; Valor de 0 a 7
|
||||||
border_color equ $6
|
border_color equ $0
|
||||||
|
|
||||||
clear_screen
|
clear_screen
|
||||||
ld a, screen_attribute
|
ld a, screen_attribute
|
||||||
|
|
|
@ -12,7 +12,7 @@ clr_screen EQU $0daf ; ROM routine to clear the screen
|
||||||
; X 1 Byte $0 - $ff
|
; X 1 Byte $0 - $ff
|
||||||
; Y 1 Byte $0 - $c0
|
; Y 1 Byte $0 - $c0
|
||||||
; Speed 1 Byte $1 - $3
|
; Speed 1 Byte $1 - $3
|
||||||
MAX_STARS EQU 10
|
MAX_STARS EQU 50
|
||||||
|
|
||||||
start
|
start
|
||||||
xor a
|
xor a
|
||||||
|
@ -28,7 +28,12 @@ main_start
|
||||||
|
|
||||||
main
|
main
|
||||||
ld a, (hl) ; HL points to X
|
ld a, (hl) ; HL points to X
|
||||||
dec a
|
inc hl
|
||||||
|
inc hl ; Jump to speed
|
||||||
|
ld e, (hl)
|
||||||
|
dec hl
|
||||||
|
dec hl
|
||||||
|
sbc a, e
|
||||||
ld d, a ; Save X-1 to D
|
ld d, a ; Save X-1 to D
|
||||||
inc hl
|
inc hl
|
||||||
|
|
||||||
|
@ -40,7 +45,7 @@ main
|
||||||
call get_screen_address
|
call get_screen_address
|
||||||
; Video RAM address for those X,Y is now in HL and the bit needed
|
; Video RAM address for those X,Y is now in HL and the bit needed
|
||||||
; to be set in that address value is in A
|
; to be set in that address value is in A
|
||||||
call clear_pixel ; Uses those values and writes the pixel
|
call clear_pixel ; Uses those values clears the pixel
|
||||||
pop bc
|
pop bc
|
||||||
pop hl
|
pop hl
|
||||||
|
|
||||||
|
@ -173,7 +178,7 @@ increment_x
|
||||||
ld c, MAX_STARS
|
ld c, MAX_STARS
|
||||||
increment_x_loop
|
increment_x_loop
|
||||||
ld a, (hl)
|
ld a, (hl)
|
||||||
cp $fc
|
cp $fb
|
||||||
jr z, increment_x_zero
|
jr z, increment_x_zero
|
||||||
jr nc, increment_x_zero
|
jr nc, increment_x_zero
|
||||||
|
|
||||||
|
@ -250,8 +255,8 @@ PROC
|
||||||
clear_pixel
|
clear_pixel
|
||||||
push bc
|
push bc
|
||||||
ld b, a
|
ld b, a
|
||||||
ld c, $0
|
ld c, $ff
|
||||||
scf
|
and a ; reset carry
|
||||||
clear_pixel_loop
|
clear_pixel_loop
|
||||||
ld a, c
|
ld a, c
|
||||||
rra
|
rra
|
||||||
|
@ -259,10 +264,10 @@ clear_pixel_loop
|
||||||
ld a, b
|
ld a, b
|
||||||
jr z, clear_pixel_do_it
|
jr z, clear_pixel_do_it
|
||||||
dec b
|
dec b
|
||||||
jr write_pixel_loop
|
jr clear_pixel_loop
|
||||||
clear_pixel_do_it
|
clear_pixel_do_it
|
||||||
ld a, (hl)
|
ld a, (hl)
|
||||||
or c
|
and c
|
||||||
ld (hl), a
|
ld (hl), a
|
||||||
pop bc
|
pop bc
|
||||||
ret
|
ret
|
||||||
|
|
|
@ -18,7 +18,7 @@ for idx in range(MAX_STARS):
|
||||||
x = random.randint(1,250)
|
x = random.randint(1,250)
|
||||||
xrandom.append(x)
|
xrandom.append(x)
|
||||||
|
|
||||||
speed = random.randint(1,3)
|
speed = random.randint(1,4)
|
||||||
speedrandom.append(speed)
|
speedrandom.append(speed)
|
||||||
|
|
||||||
for idx in range(0,191):
|
for idx in range(0,191):
|
||||||
|
|
|
@ -3,221 +3,221 @@ yrandpos dw yranddata
|
||||||
speedrandpos dw speedranddata
|
speedrandpos dw speedranddata
|
||||||
|
|
||||||
xranddata
|
xranddata
|
||||||
db 158
|
db 153
|
||||||
db 95
|
db 23
|
||||||
db 182
|
db 69
|
||||||
db 197
|
db 62
|
||||||
db 86
|
db 217
|
||||||
db 238
|
db 213
|
||||||
db 161
|
db 142
|
||||||
db 118
|
db 107
|
||||||
db 119
|
db 25
|
||||||
db 35
|
db 48
|
||||||
db 0
|
db 0
|
||||||
|
|
||||||
yranddata
|
yranddata
|
||||||
db 80
|
|
||||||
db 105
|
|
||||||
db 35
|
|
||||||
db 171
|
|
||||||
db 186
|
|
||||||
db 121
|
|
||||||
db 185
|
|
||||||
db 146
|
|
||||||
db 81
|
|
||||||
db 43
|
|
||||||
db 170
|
|
||||||
db 3
|
|
||||||
db 17
|
|
||||||
db 82
|
|
||||||
db 189
|
|
||||||
db 83
|
|
||||||
db 9
|
|
||||||
db 76
|
|
||||||
db 191
|
|
||||||
db 122
|
|
||||||
db 160
|
|
||||||
db 33
|
|
||||||
db 34
|
|
||||||
db 78
|
|
||||||
db 115
|
|
||||||
db 153
|
|
||||||
db 23
|
|
||||||
db 38
|
|
||||||
db 71
|
|
||||||
db 41
|
|
||||||
db 107
|
|
||||||
db 13
|
|
||||||
db 141
|
|
||||||
db 188
|
|
||||||
db 27
|
|
||||||
db 7
|
|
||||||
db 66
|
|
||||||
db 162
|
|
||||||
db 75
|
|
||||||
db 113
|
|
||||||
db 97
|
|
||||||
db 172
|
|
||||||
db 55
|
|
||||||
db 110
|
|
||||||
db 117
|
|
||||||
db 125
|
|
||||||
db 165
|
|
||||||
db 40
|
|
||||||
db 18
|
|
||||||
db 46
|
|
||||||
db 10
|
|
||||||
db 42
|
|
||||||
db 51
|
|
||||||
db 112
|
|
||||||
db 56
|
|
||||||
db 128
|
|
||||||
db 126
|
|
||||||
db 129
|
|
||||||
db 169
|
|
||||||
db 151
|
|
||||||
db 131
|
|
||||||
db 65
|
|
||||||
db 184
|
|
||||||
db 159
|
|
||||||
db 31
|
|
||||||
db 134
|
|
||||||
db 96
|
|
||||||
db 2
|
|
||||||
db 167
|
|
||||||
db 1
|
|
||||||
db 135
|
|
||||||
db 69
|
|
||||||
db 90
|
|
||||||
db 85
|
|
||||||
db 26
|
|
||||||
db 64
|
|
||||||
db 74
|
|
||||||
db 178
|
|
||||||
db 163
|
|
||||||
db 127
|
|
||||||
db 152
|
|
||||||
db 156
|
|
||||||
db 79
|
|
||||||
db 148
|
|
||||||
db 161
|
|
||||||
db 60
|
|
||||||
db 157
|
|
||||||
db 67
|
|
||||||
db 102
|
|
||||||
db 92
|
|
||||||
db 24
|
|
||||||
db 47
|
|
||||||
db 25
|
|
||||||
db 176
|
|
||||||
db 150
|
|
||||||
db 15
|
|
||||||
db 177
|
|
||||||
db 88
|
|
||||||
db 50
|
|
||||||
db 164
|
|
||||||
db 130
|
|
||||||
db 99
|
|
||||||
db 32
|
|
||||||
db 138
|
|
||||||
db 72
|
|
||||||
db 104
|
|
||||||
db 147
|
|
||||||
db 6
|
|
||||||
db 118
|
|
||||||
db 136
|
|
||||||
db 140
|
|
||||||
db 54
|
|
||||||
db 5
|
|
||||||
db 22
|
|
||||||
db 12
|
|
||||||
db 119
|
|
||||||
db 144
|
|
||||||
db 166
|
|
||||||
db 89
|
|
||||||
db 36
|
|
||||||
db 158
|
|
||||||
db 149
|
|
||||||
db 179
|
|
||||||
db 187
|
|
||||||
db 20
|
|
||||||
db 4
|
|
||||||
db 100
|
|
||||||
db 49
|
|
||||||
db 132
|
|
||||||
db 86
|
|
||||||
db 73
|
|
||||||
db 84
|
|
||||||
db 114
|
|
||||||
db 11
|
|
||||||
db 45
|
|
||||||
db 94
|
|
||||||
db 14
|
|
||||||
db 108
|
|
||||||
db 154
|
|
||||||
db 120
|
|
||||||
db 168
|
|
||||||
db 28
|
|
||||||
db 91
|
|
||||||
db 137
|
|
||||||
db 16
|
|
||||||
db 19
|
|
||||||
db 59
|
|
||||||
db 21
|
|
||||||
db 48
|
|
||||||
db 109
|
|
||||||
db 39
|
|
||||||
db 111
|
|
||||||
db 101
|
|
||||||
db 173
|
|
||||||
db 58
|
|
||||||
db 106
|
|
||||||
db 181
|
|
||||||
db 87
|
|
||||||
db 77
|
|
||||||
db 190
|
|
||||||
db 98
|
|
||||||
db 70
|
|
||||||
db 30
|
|
||||||
db 53
|
|
||||||
db 8
|
|
||||||
db 57
|
|
||||||
db 145
|
|
||||||
db 37
|
|
||||||
db 139
|
|
||||||
db 61
|
|
||||||
db 62
|
|
||||||
db 180
|
|
||||||
db 174
|
|
||||||
db 95
|
|
||||||
db 175
|
db 175
|
||||||
db 143
|
db 23
|
||||||
db 123
|
db 139
|
||||||
db 44
|
db 64
|
||||||
db 29
|
db 38
|
||||||
db 142
|
db 70
|
||||||
db 52
|
db 45
|
||||||
db 182
|
db 61
|
||||||
db 103
|
db 168
|
||||||
db 155
|
db 132
|
||||||
db 63
|
db 172
|
||||||
db 93
|
db 40
|
||||||
db 116
|
db 27
|
||||||
db 68
|
db 177
|
||||||
db 183
|
db 183
|
||||||
db 133
|
db 189
|
||||||
|
db 165
|
||||||
|
db 72
|
||||||
|
db 162
|
||||||
|
db 88
|
||||||
|
db 21
|
||||||
|
db 32
|
||||||
|
db 67
|
||||||
|
db 7
|
||||||
|
db 114
|
||||||
|
db 63
|
||||||
|
db 60
|
||||||
|
db 24
|
||||||
|
db 151
|
||||||
|
db 2
|
||||||
|
db 156
|
||||||
|
db 15
|
||||||
|
db 37
|
||||||
|
db 22
|
||||||
|
db 96
|
||||||
|
db 153
|
||||||
|
db 174
|
||||||
|
db 155
|
||||||
|
db 59
|
||||||
|
db 120
|
||||||
|
db 94
|
||||||
|
db 10
|
||||||
|
db 68
|
||||||
|
db 131
|
||||||
|
db 176
|
||||||
|
db 136
|
||||||
|
db 49
|
||||||
|
db 158
|
||||||
|
db 115
|
||||||
|
db 113
|
||||||
|
db 29
|
||||||
|
db 48
|
||||||
|
db 169
|
||||||
|
db 11
|
||||||
|
db 84
|
||||||
|
db 138
|
||||||
|
db 126
|
||||||
|
db 76
|
||||||
|
db 137
|
||||||
|
db 123
|
||||||
|
db 74
|
||||||
|
db 119
|
||||||
|
db 19
|
||||||
|
db 125
|
||||||
|
db 52
|
||||||
db 124
|
db 124
|
||||||
|
db 103
|
||||||
|
db 122
|
||||||
|
db 85
|
||||||
|
db 117
|
||||||
|
db 12
|
||||||
|
db 5
|
||||||
|
db 100
|
||||||
|
db 106
|
||||||
|
db 163
|
||||||
|
db 55
|
||||||
|
db 108
|
||||||
|
db 54
|
||||||
|
db 86
|
||||||
|
db 129
|
||||||
|
db 143
|
||||||
|
db 93
|
||||||
|
db 185
|
||||||
|
db 181
|
||||||
|
db 99
|
||||||
|
db 4
|
||||||
|
db 43
|
||||||
|
db 107
|
||||||
|
db 134
|
||||||
|
db 190
|
||||||
|
db 141
|
||||||
|
db 133
|
||||||
|
db 35
|
||||||
|
db 98
|
||||||
|
db 79
|
||||||
|
db 127
|
||||||
|
db 95
|
||||||
|
db 51
|
||||||
|
db 80
|
||||||
|
db 18
|
||||||
|
db 69
|
||||||
|
db 91
|
||||||
|
db 186
|
||||||
|
db 6
|
||||||
|
db 20
|
||||||
|
db 171
|
||||||
|
db 44
|
||||||
|
db 46
|
||||||
|
db 9
|
||||||
|
db 150
|
||||||
|
db 179
|
||||||
|
db 110
|
||||||
|
db 187
|
||||||
|
db 135
|
||||||
|
db 75
|
||||||
|
db 164
|
||||||
|
db 184
|
||||||
|
db 16
|
||||||
|
db 130
|
||||||
|
db 50
|
||||||
|
db 121
|
||||||
|
db 180
|
||||||
|
db 102
|
||||||
|
db 128
|
||||||
|
db 101
|
||||||
|
db 57
|
||||||
|
db 97
|
||||||
|
db 90
|
||||||
|
db 144
|
||||||
|
db 152
|
||||||
|
db 39
|
||||||
|
db 82
|
||||||
|
db 42
|
||||||
|
db 145
|
||||||
|
db 30
|
||||||
|
db 142
|
||||||
|
db 104
|
||||||
|
db 160
|
||||||
|
db 14
|
||||||
|
db 58
|
||||||
|
db 81
|
||||||
|
db 77
|
||||||
|
db 65
|
||||||
|
db 36
|
||||||
|
db 111
|
||||||
|
db 157
|
||||||
|
db 173
|
||||||
|
db 161
|
||||||
|
db 17
|
||||||
|
db 28
|
||||||
|
db 66
|
||||||
|
db 31
|
||||||
|
db 154
|
||||||
|
db 8
|
||||||
|
db 166
|
||||||
|
db 148
|
||||||
|
db 83
|
||||||
|
db 33
|
||||||
|
db 71
|
||||||
|
db 92
|
||||||
|
db 147
|
||||||
|
db 78
|
||||||
|
db 25
|
||||||
|
db 1
|
||||||
|
db 140
|
||||||
|
db 149
|
||||||
|
db 87
|
||||||
|
db 170
|
||||||
|
db 159
|
||||||
|
db 47
|
||||||
|
db 13
|
||||||
|
db 109
|
||||||
|
db 41
|
||||||
|
db 73
|
||||||
|
db 112
|
||||||
|
db 167
|
||||||
|
db 56
|
||||||
|
db 62
|
||||||
|
db 116
|
||||||
|
db 53
|
||||||
|
db 26
|
||||||
|
db 182
|
||||||
|
db 191
|
||||||
|
db 188
|
||||||
|
db 105
|
||||||
|
db 118
|
||||||
|
db 89
|
||||||
|
db 146
|
||||||
|
db 34
|
||||||
|
db 3
|
||||||
|
db 178
|
||||||
db 0
|
db 0
|
||||||
|
|
||||||
speedranddata
|
speedranddata
|
||||||
db 1
|
db 1
|
||||||
db 2
|
db 2
|
||||||
db 1
|
|
||||||
db 1
|
|
||||||
db 2
|
|
||||||
db 2
|
|
||||||
db 2
|
db 2
|
||||||
db 3
|
db 3
|
||||||
db 2
|
db 4
|
||||||
|
db 1
|
||||||
db 3
|
db 3
|
||||||
|
db 1
|
||||||
|
db 2
|
||||||
|
db 4
|
||||||
db 0
|
db 0
|
||||||
|
|
Loading…
Reference in New Issue