Execute Computer/Zero: Difference between revisions
Content added Content deleted
m (J: rely on 0 being the default value in zero assembly when no value is explicitly provided) |
m (J: actually... maybe it's better to use the LIT pseudocode for numbers which are not interpreted) |
||
| Line 166: | Line 166: | ||
<lang J> exec assemble 'LDA 3; ADD 4; STP; NOP 2; NOP 2' |
<lang J> exec assemble 'LDA 3; ADD 4; STP; NOP 2; NOP 2' |
||
4 |
4 |
||
exec assemble 'LDA 12; ADD 10; STA 12; LDA 11; SUB 13; STA 11; BRZ 8; JMP; LDA 12; STP; |
exec assemble 'LDA 12; ADD 10; STA 12; LDA 11; SUB 13; STA 11; BRZ 8; JMP; LDA 12; STP; LIT 8; LIT 7; LIT; LIT 1' |
||
56 |
56 |
||
exec assemble 'LDA 14; STA 15; ADD 13; STA 14; LDA 15; STA 13; LDA 16; SUB 17; BRZ 11; STA 16; JMP; LDA 14; STP; |
exec assemble 'LDA 14; STA 15; ADD 13; STA 14; LDA 15; STA 13; LDA 16; SUB 17; BRZ 11; STA 16; JMP; LDA 14; STP; LIT 1; LIT 1; LIT 0; LIT 8; LIT 1' |
||
55 |
55 |
||
exec assemble 'LDA 13; ADD 15; STA 5; ADD 16; STA 7; NOP; STA 14; NOP; BRZ 11; STA 15; JMP; LDA 14; STP; LDA; |
exec assemble 'LDA 13; ADD 15; STA 5; ADD 16; STA 7; NOP; STA 14; NOP; BRZ 11; STA 15; JMP; LDA 14; STP; LDA; LIT 0; LIT 28; LIT 1; LIT 0; LIT 0; LIT 0; LIT 6; LIT 0; LIT 2; LIT 26; LIT 5; LIT 20; LIT 3; LIT 30; LIT 1; LIT 22; LIT 4; LIT 24' |
||
6 |
6 |
||
exec assemble 'NOP; NOP; STP; NOP; LDA 3; SUB 29; BRZ 18; LDA 3; STA 29; BRZ 14; LDA 1; ADD 31; STA 1; JMP 2; LDA; ADD 31; STA; JMP 2; LDA 3; STA 29; LDA 1; ADD 30; ADD 3; STA 1; LDA; ADD 30; ADD 3; STA; JMP 2; |
exec assemble 'NOP; NOP; STP; NOP; LDA 3; SUB 29; BRZ 18; LDA 3; STA 29; BRZ 14; LDA 1; ADD 31; STA 1; JMP 2; LDA; ADD 31; STA; JMP 2; LDA 3; STA 29; LDA 1; ADD 30; ADD 3; STA 1; LDA; ADD 30; ADD 3; STA; JMP 2; LIT 0; LIT 1; LIT 3' |
||
0 |
|||
</lang> |
|||
=={{header|Julia}}== |
=={{header|Julia}}== |
||