1Program "Evolver 140 x 500" (length 19) by "David Bendit <109rattler@cox.net>" 2 3 ORG START 4START SPL.A # 286, < -19 5 SPL.F $ 181, < 0 6 MOV.I < 247, < -2 7 MOV.I } -4, } -2 8 DJN.I $ -2, } -2 9 JMP.BA @ 3, $ 204 10 MUL.AB > -15, @ 10 11 MOV.AB $ -387, $ 284 12 MOV.AB $ -387, < 284 13 MOV.AB $ -387, < 284 14 MOV.AB $ -387, < 284 15 DIV.AB $ -387, @ 284 16 DJN.X > 264, @ 284 17 DJN.F > 277, $ 284 18 JMN.AB } -395, $ 19 19 MOV.X $ 8, $ 284 20 MOV.X $ 8, $ 284 21 SNE.A # 284, > -7 22 SNE.AB # 4, > 219 23 24