This commit is contained in:
QkoSad
2025-07-16 13:00:37 +03:00
commit 7894b48931
806 changed files with 162532 additions and 0 deletions
+106
View File
@@ -0,0 +1,106 @@
function Main.main 1
push constant 8001
push constant 16
push constant 1
neg
call Main.fillMemory 3
pop temp 0
push constant 8000
call Memory.peek 1
pop local 0
push local 0
call Main.convert 1
pop temp 0
push constant 0
return
function Main.convert 3
push constant 1
neg
pop local 2
label L0
push local 2
not
if-goto L1
push local 1
push constant 1
add
pop local 1
push local 0
call Main.nextMask 1
pop local 0
push local 1
push constant 16
gt
not
not
if-goto L2
push argument 0
push local 0
and
push constant 0
eq
not
not
if-goto L3
push constant 8000
push local 1
add
push constant 1
call Memory.poke 2
pop temp 0
goto L4
label L3
push constant 8000
push local 1
add
push constant 0
call Memory.poke 2
pop temp 0
label L4
goto L5
label L2
push constant 0
pop local 2
label L5
goto L0
label L1
push constant 0
return
function Main.nextMask 0
push argument 0
push constant 0
eq
not
if-goto L6
push constant 1
return
goto L7
label L6
push argument 0
push constant 2
call Math.multiply 2
return
label L7
function Main.fillMemory 0
label L8
push argument 1
push constant 0
gt
not
if-goto L9
push argument 0
push argument 2
call Memory.poke 2
pop temp 0
push argument 1
push constant 1
sub
pop argument 1
push argument 0
push constant 1
add
pop argument 0
goto L8
label L9
push constant 0
return