260 lines
3.8 KiB
Plaintext
260 lines
3.8 KiB
Plaintext
reset:
|
|
br always >main
|
|
nop
|
|
hardfault:
|
|
reti
|
|
nop
|
|
memfault:
|
|
reti
|
|
nop
|
|
|
|
.align
|
|
scrolling_addr: .word 0x000F00A0
|
|
scrolling_count_addr: .word 0x000F00A4
|
|
|
|
scrolling_cnt_value: .word 0x20FC000 // for real board
|
|
// scrolling_cnt_value: .word 0x100 // for simulation
|
|
|
|
w_cnt_top: .word 0x3FC000 // for real board
|
|
// w_cnt_top: .word 0x100 //for simulation
|
|
|
|
pattern_ptr: .word =pattern1
|
|
|
|
pattern1:
|
|
.word 0x01030204
|
|
.word 0x05070608
|
|
.word 0x090B0A0C
|
|
.word 0x0D0F0E00
|
|
|
|
pattern2:
|
|
.word 0x0F0E0E0B
|
|
.word 0x100D0A0E
|
|
.word 0x0D000000
|
|
|
|
pattern3:
|
|
.word 0x01101010
|
|
|
|
pattern4:
|
|
.word 0x02100310
|
|
|
|
pattern5:
|
|
.word 0x00100010
|
|
.word 0x00100010
|
|
.word 0x00101010
|
|
|
|
write_mask:
|
|
.word 0x1000000
|
|
|
|
clear_mask:
|
|
.word 0x100
|
|
|
|
display_char:
|
|
// Read from ptr r3
|
|
ld08 r4, r3
|
|
lsh r4, r4, 16
|
|
or r4, r4, r1
|
|
st32 r0, r4
|
|
ret
|
|
nop
|
|
|
|
main:
|
|
ldr r8, >w_cnt_top
|
|
|
|
ldr r0, >scrolling_addr
|
|
ldr r1, >write_mask
|
|
ldr r2, >clear_mask
|
|
ldr r10, >pattern_ptr
|
|
|
|
number_loop:
|
|
// (Re)set scrolling speed
|
|
ldr r5, >scrolling_count_addr
|
|
ldr r7, >scrolling_cnt_value
|
|
st32 r5, r7
|
|
|
|
// --------- 132457689BACDFE0 ---------
|
|
clr r3
|
|
add r3, r3, r10
|
|
call >display_char
|
|
nop
|
|
|
|
clr r7
|
|
clr r11
|
|
addi r11, 15 // iterations
|
|
display_loop0:
|
|
addi r3, 0x01
|
|
call >display_char
|
|
nop
|
|
|
|
addi r7, 1
|
|
cmp neq r7, r11
|
|
br true >display_loop0
|
|
nop
|
|
|
|
// Turn on
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
call >wait
|
|
nop
|
|
|
|
// Turn off
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
// Double scrolling speed
|
|
ldr r5, >scrolling_count_addr
|
|
ldr r7, >scrolling_cnt_value
|
|
rsh r7, r7, 1 // Divide by 2
|
|
st32 r5, r7
|
|
|
|
// Clear
|
|
clr r4
|
|
or r4, r4, r2
|
|
st32 r0, r4
|
|
|
|
// --------- DEAD BEEF ---------
|
|
clr r7
|
|
clr r11
|
|
addi r11, 12 // iterations
|
|
display_loop1:
|
|
addi r3, 0x01
|
|
call >display_char
|
|
nop
|
|
|
|
addi r7, 1
|
|
cmp neq r7, r11
|
|
br true >display_loop1
|
|
nop
|
|
|
|
// Turn on
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
call >wait
|
|
nop
|
|
|
|
// Turn off
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
// Clear
|
|
clr r4
|
|
or r4, r4, r2
|
|
st32 r0, r4
|
|
|
|
// --------- 1 ---------
|
|
clr r7
|
|
clr r11
|
|
addi r11, 4 // iterations
|
|
display_loop2:
|
|
addi r3, 0x01
|
|
call >display_char
|
|
nop
|
|
|
|
addi r7, 1
|
|
cmp neq r7, r11
|
|
br true >display_loop2
|
|
nop
|
|
|
|
// Turn on
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
call >wait
|
|
nop
|
|
|
|
// Turn off
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
// Clear
|
|
clr r4
|
|
or r4, r4, r2
|
|
st32 r0, r4
|
|
|
|
// --------- 2 3 ---------
|
|
clr r7
|
|
clr r11
|
|
addi r11, 4 // iterations
|
|
display_loop3:
|
|
addi r3, 0x01
|
|
call >display_char
|
|
nop
|
|
|
|
addi r7, 1
|
|
cmp neq r7, r11
|
|
br true >display_loop3
|
|
nop
|
|
|
|
// Turn on
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
call >wait
|
|
nop
|
|
|
|
// Turn off
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
// Clear
|
|
clr r4
|
|
or r4, r4, r2
|
|
st32 r0, r4
|
|
|
|
// --------- 0 0 0 0 0 ---------
|
|
clr r7
|
|
clr r11
|
|
addi r11, 12 // iterations
|
|
display_loop4:
|
|
addi r3, 0x01
|
|
call >display_char
|
|
nop
|
|
|
|
addi r7, 1
|
|
cmp neq r7, r11
|
|
br true >display_loop4
|
|
nop
|
|
|
|
// Turn on
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
call >wait
|
|
nop
|
|
|
|
// Turn off
|
|
clr r4
|
|
addi r4, 0x1
|
|
st32 r0, r4
|
|
|
|
br always >number_loop
|
|
nop
|
|
|
|
//subroutine to iterate until counter overflow
|
|
wait:
|
|
clr r7 //inititalize inner counter
|
|
clr r6 // outer counter
|
|
clr r9
|
|
addi r9, 0x7F
|
|
inc_o:
|
|
clr r7
|
|
inc_i:
|
|
cmp neq r7,r8
|
|
br true >inc_i //if i=cnt_top
|
|
addi r7,1
|
|
cmp neq r6,r9 // else, if i=cnt_outer
|
|
br true >inc_o
|
|
addi r6,1 // else
|
|
ret
|
|
nop
|