Execute Computer/Zero: Difference between revisions

Content added Content deleted
m (RPL: optimized version)
m (RPL: optimized version)
Line 2,207: Line 2,207:
'''IF THEN 'µCODE'''' LAST GET EVAL '''ELSE''' DROP
'''IF THEN 'µCODE'''' LAST GET EVAL '''ELSE''' DROP
'''END END'''
'''END END'''
‘RUN’ STO
‘'''RUN'''’ STO
|
|
'''µCODE''' ''( counter accumulator address -- counter accumulator )''
'''µCODE''' ''( counter accumulator address -- counter accumulator )''
Line 2,226: Line 2,226:
instruction, addresss = divmod(byte,32)
instruction, addresss = divmod(byte,32)
if instruction <> NOP then execute it
if instruction <> NOP then execute it
display accumulator
|}
|}