15 lines
215 B
Plaintext
15 lines
215 B
Plaintext
%
|
|
(main program)
|
|
M98 P0002
|
|
M30 (end)
|
|
|
|
O0002 (O-word begins with '0')
|
|
(PRINT,x got here)
|
|
M99
|
|
|
|
O2 (O-word does not begin with '0')
|
|
(PRINT,x ERROR: should not get here)
|
|
M99
|
|
|
|
%
|