Files
2025-10-26 00:55:37 +02:00

14 lines
199 B
Plaintext

# Quellkode: let mod(a,b) { a - (a / b) * b } in mod(14,5)
# Annahmen: a→stack[0], b→stack[1], PP=0, FP=0, TOP=-1
INVOKE 2 MOD 0
HALT
MOD: LOAD 0 0
LOAD 1 0
LOAD 0 0
LOAD 1 0
DIV
MUL
SUB
RETURN