blob: 94f37c56b70b7732ab9d02e8f2de030c38470c6d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
(1 ar4 con 60 ar2 r4a mem con 1 ar4 con 60 ar3 con 0 ar2 con 2 hlt)
(2 con 255 ar7 con 2 ar2 con 1 ar3 con 2 hlt)
# init sdl (1000, 600)
con 0 ar3 con 2 ar2 con 1000 ar4 con 600 ar5 con 2 hlt
# set color to 200,200,0,255
con 200 ar4 con 200 ar5 con 0 ar6 @2
# save spot
r8a ar6
# clear screen
con 2 ar2 con 2 ar3 con 2 hlt
# present screen
con 2 ar2 con 3 ar3 con 2 hlt
# jump-back
r6a ar8
# quit
con 0 hlt
|
