start
lica....
init
ref
repl
lica....
load-program
ref
liju....
repl
ref
init
lica....
clear-program
ref
liju....
clear-variables
ref
clear-variables
lili....
Variables
ref
ClearPtr
ref
stlili..
26
num
ClearCount
ref
st......
clear-variables-loop
life....
ClearCount
ref
ligtli..
0
num
clear-variables-body
ref
cj......
re......
clear-variables-body
li......
0
num
life....
ClearPtr
ref
st......
life....
ClearPtr
ref
liadli..
1
num
ClearPtr
ref
stlife..
ClearCount
ref
lisuli..
1
num
ClearCount
ref
stliju..
clear-variables-loop
ref
clear-program
lili....
ProgramBuffer
ref
ProgramWrite
ref
stlili..
0
num
LineCount
ref
stlili..
0
num
CurrentIndex
ref
stlili..
0
num
EOFFlag
ref
st......
re......
halt
liio....
6
num
load-program
lp-loop
lica....
read-line
ref
life....
EOFFlag
ref
lieqli..
-1
num
halt
ref
cj......
lili....
InputBuffer
ref
SrcPtr
ref
stlica..
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
0
num
lp-loop
ref
cj......
lica....
is-bye-command
ref
life....
ByeFlag
ref
lieqli..
-1
num
halt
ref
cj......
lica....
is-new-command
ref
life....
NewFlag
ref
lieqli..
-1
num
lp-new
ref
cj......
lica....
is-run-command
ref
life....
RunFlag
ref
lieqli..
-1
num
lp-run
ref
cj......
life....
TempChar
ref
liltli..
48
num
lp-loop
ref
cj......
life....
TempChar
ref
ligtli..
57
num
lp-loop
ref
cj......
lica....
store-line
ref
liju....
lp-loop
ref
lp-new
lica....
clear-program
ref
liju....
lp-loop
ref
lp-run
lica....
clear-variables
ref
lica....
execute-program
ref
re......
is-run-command
lili....
0
num
RunFlag
ref
st......
life....
SrcPtr
ref
fe......
lieqli..
82
num
ir-match
ref
cj......
re......
ir-match
lili....
-1
num
RunFlag
ref
stre....
is-new-command
lili....
0
num
NewFlag
ref
st......
life....
SrcPtr
ref
fe......
lieqli..
78
num
in-match
ref
cj......
re......
in-match
lili....
-1
num
NewFlag
ref
stre....
is-bye-command
lili....
0
num
ByeFlag
ref
st......
life....
SrcPtr
ref
fe......
lieqli..
66
num
ib-match
ref
cj......
re......
ib-match
lili....
-1
num
ByeFlag
ref
stre....
read-line
lili....
InputBuffer
ref
InputPtr
ref
stlili..
0
num
ReadLen
ref
stlili..
0
num
EOFFlag
ref
st......
rl-loop
liio....
1
num
duli....
-1
num
eqli....
rl-eof
ref
cj......
duli....
10
num
eqli....
rl-finish
ref
cj......
duli....
13
num
eqli....
rl-finish
ref
cj......
life....
InputPtr
ref
st......
life....
InputPtr
ref
liadli..
1
num
InputPtr
ref
stlife..
ReadLen
ref
liadli..
1
num
ReadLen
ref
stliju..
rl-loop
ref
rl-eof
life....
ReadLen
ref
lieqli..
0
num
rl-set-eof
ref
cj......
liju....
rl-finish
ref
rl-set-eof
lili....
-1
num
EOFFlag
ref
st......
rl-finish
drli....
0
num
life....
InputPtr
ref
stre....
re......
store-line
lili....
InputBuffer
ref
SrcPtr
ref
stlica..
parse-number
ref
lifeli..
ParseResult
ref
TargetLine
ref
stlica..
find-line
ref
life....
FoundFlag
ref
lieqli..
0
num
sl-new
ref
cj......
life....
ProgramWrite
ref
life....
FoundIndex
ref
liad....
LineAddrs
ref
st......
liju....
sl-copy-setup
ref
sl-new
life....
TargetLine
ref
life....
LineCount
ref
liad....
LineNumbers
ref
st......
life....
ProgramWrite
ref
life....
LineCount
ref
liad....
LineAddrs
ref
st......
sl-copy-setup
life....
ProgramWrite
ref
li......
DstPtr
ref
st......
lili....
InputBuffer
ref
SrcPtr
ref
st......
sl-copy
lifefeli
SrcPtr
ref
TempChar
ref
stlife..
TempChar
ref
life....
DstPtr
ref
st......
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlife..
DstPtr
ref
liadli..
1
num
DstPtr
ref
stlife..
TempChar
ref
lieqli..
0
num
sl-done
ref
cj......
liju....
sl-copy
ref
sl-done
lifeli..
DstPtr
ref
ProgramWrite
ref
stlife..
life....
FoundFlag
ref
lieqli..
0
num
sl-bump-count
ref
cj......
re......
sl-bump-count
life....
LineCount
ref
liadli..
1
num
LineCount
ref
stre....
execute-program
lili....
0
num
CurrentIndex
ref
st......
ep-loop
life....
CurrentIndex
ref
life....
LineCount
ref
ltli....
ep-body
ref
cj......
re......
ep-body
life....
CurrentIndex
ref
liad....
LineAddrs
ref
feli....
SrcPtr
ref
stlica..
parse-number
ref
lica....
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
80
num
stmt-print
ref
cj......
life....
TempChar
ref
lieqli..
76
num
stmt-let
ref
cj......
life....
TempChar
ref
lieqli..
73
num
stmt-i
ref
cj......
life....
TempChar
ref
lieqli..
71
num
stmt-goto
ref
cj......
life....
TempChar
ref
lieqli..
82
num
stmt-rem
ref
cj......
life....
TempChar
ref
lieqli..
69
num
stmt-end
ref
cj......
lica....
next-line
ref
liju....
ep-loop
ref
stmt-i
life....
SrcPtr
ref
liad....
1
num
fe......
lieqli..
78
num
stmt-input
ref
cj......
liju....
stmt-if
ref
stmt-print
life....
SrcPtr
ref
liadli..
5
num
SrcPtr
ref
stlica..
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
34
num
print-string-stmt
ref
cj......
lica....
parse-expression
ref
lifeli..
ExprResult
ref
NumberTemp
ref
stlica..
print-number
ref
lica....
print-line-end
ref
lica....
next-line
ref
liju....
ep-loop
ref
print-string-stmt
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
st......
pss-loop
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
34
num
pss-done
ref
cj......
life....
TempChar
ref
lieqli..
0
num
pss-done
ref
cj......
life....
TempChar
ref
liio....
0
num
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stliju..
pss-loop
ref
pss-done
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
print-line-end
ref
lica....
next-line
ref
liju....
ep-loop
ref
stmt-let
life....
SrcPtr
ref
liadli..
3
num
SrcPtr
ref
stlica..
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
stlife..
TempChar
ref
lisuli..
65
num
TargetVar
ref
stlife..
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
61
num
let-have-eq
ref
cj......
liju....
let-have-eq
ref
let-have-eq
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
parse-expression
ref
life....
ExprResult
ref
life....
TargetVar
ref
liad....
Variables
ref
stlica..
next-line
ref
liju....
ep-loop
ref
stmt-input
life....
SrcPtr
ref
liadli..
5
num
SrcPtr
ref
stlica..
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
stlife..
TempChar
ref
lisuli..
65
num
TargetVar
ref
stlili..
63
num
0
num
io......
liio....
32
num
lica....
read-line
ref
lili....
InputBuffer
ref
SrcPtr
ref
stlica..
parse-number
ref
life....
ParseResult
ref
life....
TargetVar
ref
liad....
Variables
ref
stlica..
next-line
ref
liju....
ep-loop
ref
stmt-goto
life....
SrcPtr
ref
liadli..
4
num
SrcPtr
ref
stlica..
parse-number
ref
lifeli..
ParseResult
ref
TargetLine
ref
stlica..
find-line
ref
life....
FoundFlag
ref
lieqli..
0
num
halt
ref
cj......
lifeli..
FoundIndex
ref
CurrentIndex
ref
stliju..
ep-loop
ref
stmt-if
life....
SrcPtr
ref
liadli..
2
num
SrcPtr
ref
stlica..
parse-expression
ref
lifeli..
ExprResult
ref
LeftValue
ref
stlica..
skip-spaces
ref
lifefeli
SrcPtr
ref
CompChar
ref
stlife..
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
parse-expression
ref
lifeli..
ExprResult
ref
RightValue
ref
stlica..
skip-spaces
ref
life....
SrcPtr
ref
liadli..
4
num
SrcPtr
ref
stlica..
parse-number
ref
lifeli..
ParseResult
ref
TargetLine
ref
st......
life....
CompChar
ref
lieqli..
61
num
if-eq
ref
cj......
life....
CompChar
ref
lieqli..
60
num
if-lt
ref
cj......
liju....
if-gt
ref
if-eq
life....
LeftValue
ref
life....
RightValue
ref
eq......
liju....
if-after-compare
ref
if-lt
life....
LeftValue
ref
life....
RightValue
ref
lt......
liju....
if-after-compare
ref
if-gt
life....
LeftValue
ref
life....
RightValue
ref
gt......
if-after-compare
lieqli..
0
num
if-false
ref
cj......
lica....
find-line
ref
life....
FoundFlag
ref
lieqli..
0
num
halt
ref
cj......
lifeli..
FoundIndex
ref
CurrentIndex
ref
stliju..
ep-loop
ref
if-false
lica....
next-line
ref
liju....
ep-loop
ref
stmt-rem
lica....
next-line
ref
liju....
ep-loop
ref
stmt-end
life....
LineCount
ref
CurrentIndex
ref
stliju..
ep-loop
ref
next-line
life....
CurrentIndex
ref
liadli..
1
num
CurrentIndex
ref
stre....
skip-spaces
ss-loop
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
32
num
ss-advance
ref
cj......
re......
ss-advance
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stliju..
ss-loop
ref
parse-number
lica....
skip-spaces
ref
lili....
1
num
NumSign
ref
stlili..
0
num
ParseResult
ref
stlifeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
45
num
pn-neg
ref
cj......
liju....
pn-digits
ref
pn-neg
lili....
-1
num
NumSign
ref
stlife..
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
st......
pn-digits
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
liltli..
48
num
pn-done
ref
cj......
life....
TempChar
ref
ligtli..
57
num
pn-done
ref
cj......
life....
ParseResult
ref
limuli..
10
num
ParseResult
ref
stlife..
TempChar
ref
lisuli..
48
num
Temp
ref
stlife..
ParseResult
ref
life....
Temp
ref
adli....
ParseResult
ref
stlife..
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stliju..
pn-digits
ref
pn-done
life....
NumSign
ref
lieqli..
-1
num
pn-apply-sign
ref
cj......
re......
pn-apply-sign
lili....
0
num
ParseResult
ref
fesuli..
ParseResult
ref
st......
re......
parse-value
lica....
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
liltli..
65
num
pv-number
ref
cj......
life....
TempChar
ref
ligtli..
90
num
pv-number
ref
cj......
life....
TempChar
ref
lisuli..
65
num
Temp
ref
stlife..
Temp
ref
liad....
Variables
ref
feli....
ParseResult
ref
stlife..
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
st......
re......
pv-number
liju....
parse-number
ref
parse-expression
lica....
parse-value
ref
lifeli..
ParseResult
ref
ExprResult
ref
st......
pe-loop
lica....
skip-spaces
ref
lifefeli
SrcPtr
ref
OpChar
ref
st......
life....
OpChar
ref
lieqli..
43
num
pe-plus
ref
cj......
life....
OpChar
ref
lieqli..
45
num
pe-minus
ref
cj......
life....
OpChar
ref
lieqli..
42
num
pe-mul
ref
cj......
life....
OpChar
ref
lieqli..
47
num
pe-div
ref
cj......
re......
pe-plus
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
parse-value
ref
life....
ExprResult
ref
life....
ParseResult
ref
adli....
ExprResult
ref
stliju..
pe-loop
ref
pe-minus
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
parse-value
ref
life....
ExprResult
ref
life....
ParseResult
ref
suli....
ExprResult
ref
stliju..
pe-loop
ref
pe-mul
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
parse-value
ref
life....
ExprResult
ref
life....
ParseResult
ref
muli....
ExprResult
ref
stliju..
pe-loop
ref
pe-div
life....
SrcPtr
ref
liadli..
1
num
SrcPtr
ref
stlica..
parse-value
ref
life....
ExprResult
ref
life....
ParseResult
ref
di......
swdrli..
ExprResult
ref
stliju..
pe-loop
ref
find-line
lili....
0
num
SearchIndex
ref
stlili..
0
num
FoundFlag
ref
st......
fl-loop
life....
SearchIndex
ref
life....
LineCount
ref
ltli....
fl-body
ref
cj......
re......
fl-body
life....
SearchIndex
ref
liad....
LineNumbers
ref
fe......
life....
TargetLine
ref
eqli....
fl-found
ref
cj......
life....
SearchIndex
ref
liadli..
1
num
SearchIndex
ref
stliju..
fl-loop
ref
fl-found
lili....
-1
num
FoundFlag
ref
stlifeli
SearchIndex
ref
FoundIndex
ref
st......
re......
print-number
life....
NumberTemp
ref
lieqli..
0
num
pn-zero
ref
cj......
life....
NumberTemp
ref
liltli..
0
num
pn-neg-out
ref
cj......
liju....
pn-prepare
ref
pn-neg-out
liio....
45
num
lili....
0
num
NumberTemp
ref
fesuli..
NumberTemp
ref
st......
pn-prepare
lili....
0
num
DigitCount
ref
st......
pn-split
life....
NumberTemp
ref
lidi....
10
num
swli....
Remainder
ref
stli....
NumberTemp
ref
stlife..
Remainder
ref
life....
DigitCount
ref
liad....
Digits
ref
stlife..
DigitCount
ref
liadli..
1
num
DigitCount
ref
stlife..
NumberTemp
ref
ligtli..
0
num
pn-split
ref
cj......
pn-emit-loop
life....
DigitCount
ref
lieqli..
0
num
pn-done-emit
ref
cj......
life....
DigitCount
ref
lisuli..
1
num
DigitCount
ref
stlife..
DigitCount
ref
liad....
Digits
ref
fe......
liadli..
48
num
0
num
io......
liju....
pn-emit-loop
ref
pn-zero
lili....
48
num
0
num
io......
re......
pn-done-emit
re......
newline
lili....
10
num
0
num
io......
re......
print-line-end
lica....
skip-spaces
ref
lifefeli
SrcPtr
ref
TempChar
ref
st......
life....
TempChar
ref
lieqli..
59
num
ple-no-newline
ref
cj......
lica....
newline
ref
re......
ple-no-newline
re......
origin
@56000
origin
Variables
26 cells
reserve
LineNumbers
256 cells
reserve
LineAddrs
256 cells
reserve
Digits
16 cells
reserve
ProgramBuffer
4096 cells
reserve
InputBuffer
256 cells
reserve
ProgramWrite
0
num
LineCount
0
num
CurrentIndex
0
num
SrcPtr
0
num
DstPtr
0
num
InputPtr
0
num
ReadLen
0
num
EOFFlag
0
num
ParseResult
0
num
ExprResult
0
num
TargetLine
0
num
FoundIndex
0
num
FoundFlag
0
num
SearchIndex
0
num
NumSign
0
num
Temp
0
num
TempChar
0
num
OpChar
0
num
TargetVar
0
num
LeftValue
0
num
RightValue
0
num
CompChar
0
num
NumberTemp
0
num
DigitCount
0
num
Remainder
0
num
RunFlag
0
num
NewFlag
0
num
ByeFlag
0
num
ClearPtr
0
num
ClearCount
0
num