-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathrsisbios.asm
71 lines (70 loc) · 957 Bytes
/
rsisbios.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
comment The RSIS BIOS is licensed under the MIT license
comment Please see 'LICENSE.EMU' file.
comment -- Begin BIOS
set $a, @main
jmp $a
:strInfo
ds RSIS-BIOS v1.0 (C) 2016, 2017 Ronsor-OpenStar
db 10
db 10
ds Configured to boot from address starting at 6MiB
db 10
ds Press ESC for BIOS Options
db 10
db 0
:printstr
set $a, 0
set $b, 0
set $d, -2
set $e, -3
set $f, -4
set $g, 0
set $h, 0
:printloop
rm8 $a, $c
eq $a, $b
set $t, @noloop
jt $t
set $n, 10
eq $a, $n
set $t, @newline
jt $t
set $t, @skip1
jmp $t
:newline
set $t, @incry
call $t
set $t, 1
add $c, $t
set $t, @printloop
jmp $t
:skip1
wm8 $d, $a
set $t, @incrx
call $t
set $t, 1
add $c, $t
set $t, @printloop
jmp $t
:noloop
ret
:incrx
set $s, 8
add $g, $s
wm64 $f, $g
ret
:incry
set $s, 8
add $h, $s
wm64 $e, $h
set $s, 0
set $g, 0
wm64 $f, $s
ret
:main
set $c, @strInfo
set $a, @printstr
call $a
:abc
set $a, @abc
jmp $a