You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
24 lines
199 B
Racket
24 lines
199 B
Racket
8 years ago
|
#lang reader "lang.rkt"
|
||
|
|
cpy 1 a
|
||
|
|
cpy 1 b
|
||
|
|
cpy 26 d
|
||
|
|
jnz c 2
|
||
|
|
jnz 1 5
|
||
|
|
cpy 7 c
|
||
|
|
inc d
|
||
|
|
dec c
|
||
|
|
jnz c -2
|
||
|
|
cpy a c
|
||
|
|
inc a
|
||
|
|
dec b
|
||
|
|
jnz b -2
|
||
|
|
cpy c b
|
||
|
|
dec d
|
||
|
|
jnz d -6
|
||
|
|
cpy 16 c
|
||
|
|
cpy 17 d
|
||
|
|
inc a
|
||
|
|
dec d
|
||
|
|
jnz d -2
|
||
|
|
dec c
|
||
|
|
jnz c -5
|