1 | 1 |
deleted file mode 100644 |
... | ... |
@@ -1,42 +0,0 @@ |
1 |
-( hello world ) |
|
2 |
- |
|
3 |
-%RTN { JMP2r } |
|
4 |
- |
|
5 |
-( devices ) |
|
6 |
- |
|
7 |
-|0100 ;System { vector 2 pad 6 r 2 g 2 b 2 } |
|
8 |
-|0110 ;Console { vector 2 pad 6 char 1 byte 1 short 2 string 2 } |
|
9 |
- |
|
10 |
-( program ) |
|
11 |
- |
|
12 |
-|0200 |
|
13 |
- |
|
14 |
- ( for loop ) |
|
15 |
- #00 #0d |
|
16 |
- $loop |
|
17 |
- ( body ) |
|
18 |
- SWP #01 ADD SWP |
|
19 |
- DUP2 LTH ^$loop JNZ |
|
20 |
- POP2 |
|
21 |
- |
|
22 |
- ( while ) |
|
23 |
- #00 #0d |
|
24 |
- $while |
|
25 |
- ( body ) |
|
26 |
- DUP2 EQU ^$end JNZ |
|
27 |
- SWP #01 ADD SWP |
|
28 |
- ^$while JMP $end |
|
29 |
- POP2 |
|
30 |
- |
|
31 |
- ( switch ) |
|
32 |
- #02 |
|
33 |
- DUP #01 NEQ ^$b JNZ |
|
34 |
- ( a ) |
|
35 |
- $b DUP #02 NEQ ^$c JNZ |
|
36 |
- ( b ) |
|
37 |
- $c DUP #03 NEQ ^$default JNZ |
|
38 |
- ( c ) |
|
39 |
- $default |
|
40 |
- POP |
|
41 |
- |
|
42 |
-BRK |