0	MOV	#224,R0
1	MOV	#32,R1
2	CALL	37
3	MOV	#0,R1
4	CALL	15
5	MOV	R0,R2
6	MOV	#224,R0
7	SUB	R0,R2
8	CALL	70
9	CALL	31
10	OUT	32
11	MOV	R2,R1
12	CALL	70
13	CALL	27
14	JMP	0
15	MOV	#19,R2
16	CMP	#0,@R0
17	JNE	R2
18	RET	
19	CMP	#32,@R0+
20	JEQ	16
21	ADD	#1,R1
22	MOV	#24,R2
23	JMP	16
24	CMP	#32,@R0+
25	JNE	16
26	JMP	15
27	CALL	31
28	OUT	10
29	OUT	13
30	RET	
31	MOV	R0,R24
32	JMP	34
33	OUT	R24,@R24+
34	CMP	#0,@R24
35	JNE	33
36	RET	
37	MOV	R0,R25
38	MOV	R1,R26
39	JMP	46
40	CALL	58
41	CMP	#13,R24
42	JEQ	49
43	CMP	#8,R24
44	JEQ	51
45	MOV	R24,@R25+
46	SUB	#1,R26
47	JNE	40
48	CALL	28
49	MOV	#0,@R25
50	RET	
51	CMP	R25,R0
52	JEQ	40
53	SUB	#1,R25
54	ADD	#1,R26
55	OUT	32
56	OUT	8
57	JMP	40
58	IN	R24
59	JEQ	58
60	CMP	#10,R24
61	JNE	63
62	MOV	#13,R24
63	CMP	#13,R24
64	JEQ	28
65	CMP	#127,R24
66	JNE	68
67	MOV	#8,R24
68	OUT	R24,R24
69	RET	
70	MOV	R0,R29
71	MOV	R1,R24
72	MOV	#100,R25
73	CALL	82
74	MOV	R28,@R29+
75	MOV	#10,R25
76	CALL	82
77	MOV	R28,@R29+
78	ADD	#48,R24
79	MOV	R24,@R29+
80	MOV	#0,@R29
81	RET	
82	MOV	#48,R28
83	JMP	85
84	ADD	#1,R28
85	SUB	R25,R24
86	JNC	84
87	ADD	R25,R24
88	RET	


; Library Functions
; =================
; getc           58
; gets           37
; numtostr       70
; putnl          28
; puts           27
; putstr         31