ZoriaRPG icon

Rebonakku Global ZASM

ZoriaRPG | PRO | 09/09/17 11:00:18 AM UTC | 0 ⭐ | 893 👁️ | Never ⏰ | []
ASM (NASM) |

0 B

|

None

|

0 👍

/

0 👎

GhostZHActiveScript
  SETV D2, 0
  PUSHR D3
  SETR D4, SP
  PUSHR D4
  SETV D2, 8
  PUSHR D2
  GOTO 15026
  POP D4
  SETV D2, 0
  SETV D2, 0.0001
  COMPAREV D2, 0
  GOTOTRUE 33
  PUSHR D4
  SETV D2, 17
  PUSHR D2
  GOTO 15036
  POP D4
  PUSHR D4
  SETV D2, 22
  PUSHR D2
  GOTO 21816
  POP D4
  PUSHR D4
  SETV D2, 27
  PUSHR D2
  GOTO 15056
  POP D4
  PUSHR D4
  SETV D2, 32
  PUSHR D2
  GOTO 21813
  POP D4
  GOTO 8
  SETV D2, 0
  SETV D3, 0
  QUIT
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 69
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 82
  SETV D2, 0
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 95
  SETV D2, 5
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 108
  SETV D2, 3
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 121
  SETV D2, 7
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 12
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 134
  SETV D2, 1
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 147
  SETV D2, 6
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 160
  SETV D2, 2
  GOTO 176
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 173
  SETV D2, 4
  GOTO 176
  SETV D2, 0
  SETV D2, 0
  GOTO 176
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 194
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22184
  POP D4
  PUSHR D2
  SETV D2, 65536
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 207
  SETV D2, 0
  GOTO 254
  SETV D2, 0
  PUSHR D4
  SETV D2, 219
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22184
  POP D4
  PUSHR D2
  SETV D2, 65535
  POP D3
  ANDR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 238
  SETV D2, 0
  GOTO 254
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 23
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 254
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 279
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 22091
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 301
  PUSHR D4
  SETV D2, 295
  PUSHR D2
  GOTO 18339
  POP D4
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 300
  GOTO 773
  SETV D2, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 8
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 7
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 6
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 5
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 3
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 1
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 374
  PUSHR D4
  SETV D2, 347
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 22085
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 363
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  GOTO 368
  SETV D3, 0
  SETV D2, 2
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETV D3, 0
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 383
  SETV D3, 0
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETV D2, 5
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D3, 0
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 400
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22010
  POP D4
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 772
  PUSHR D4
  SETV D2, 416
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22015
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  PUSHR D4
  SETV D2, 428
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  GOTO 180
  POP D4
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 442
  GOTO 761
  SETV D2, 0
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 481
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 480
  GOTO 761
  SETV D2, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 506
  SETV D2, 64
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  GOTO 511
  SETV D3, 0
  SETV D2, 128
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 538
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  GOTO 545
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETV D3, 0
  SETV D2, 3
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 760
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 738
  PUSHR D4
  SETV D2, 738
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22047
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 554
  SETV D3, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 388
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 812
  PUSHR D4
  SETV D2, 809
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 4914
  POP D4
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 837
  PUSHR D4
  SETV D2, 834
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 5282
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  PUSHR D4
  SETV D2, 849
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 22079
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D4
  SETV D3, 867
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D4
  SETV D3, 882
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D4
  SETV D3, 897
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D4
  SETV D3, 912
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22285
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 925
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22301
  POP D4
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 961
  PUSHR D4
  SETV D2, 948
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  GOTO 6235
  POP D4
  PUSHR D4
  SETV D3, 960
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22252
  POP D4
  GOTO 977
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D4
  SETV D3, 977
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22252
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 1001
  PUSHR D4
  SETV D2, 1001
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22416
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 32
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 1029
  SETV D2, 0
  PUSHR D4
  SETV D3, 1029
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22435
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 1053
  PUSHR D4
  SETV D2, 1053
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 512
  POP D3
  ORR D2, D3
  PUSHR D4
  SETV D3, 1075
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 1086
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22113
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 1090
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 1131
  GOTO 3282
  SETV D2, 0
  PUSHR D4
  SETV D2, 1141
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1153
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1171
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 128
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1855
  PUSHR D4
  SETV D2, 1193
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 1575
  PUSHR D4
  SETV D2, 1211
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 1348
  PUSHR D4
  SETV D2, 1229
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1246
  PUSHR D4
  SETV D2, 1245
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 9795
  POP D4
  GOTO 1346
  SETV D3, 0
  PUSHR D4
  SETV D2, 1258
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1275
  PUSHR D4
  SETV D2, 1274
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 10102
  POP D4
  GOTO 1345
  SETV D3, 0
  PUSHR D4
  SETV D2, 1287
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1304
  PUSHR D4
  SETV D2, 1303
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 10506
  POP D4
  GOTO 1344
  SETV D3, 0
  PUSHR D4
  SETV D2, 1316
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1333
  PUSHR D4
  SETV D2, 1332
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 11095
  POP D4
  GOTO 1343
  SETV D3, 0
  PUSHR D4
  SETV D2, 1343
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 11279
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  GOTO 1574
  SETV D3, 0
  PUSHR D4
  SETV D2, 1360
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1409
  PUSHR D4
  SETV D2, 1378
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1392
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1404
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 11814
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  GOTO 1573
  SETV D3, 0
  PUSHR D4
  SETV D2, 1421
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 15
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1438
  PUSHR D4
  SETV D2, 1437
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 12638
  POP D4
  GOTO 1572
  SETV D3, 0
  PUSHR D4
  SETV D2, 1450
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 19
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1467
  PUSHR D4
  SETV D2, 1466
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 13072
  POP D4
  GOTO 1571
  SETV D3, 0
  PUSHR D4
  SETV D2, 1479
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 20
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1528
  PUSHR D4
  SETV D2, 1497
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1511
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1523
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 13407
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  GOTO 1570
  SETV D3, 0
  PUSHR D4
  SETV D2, 1540
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1554
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  PUSHR D4
  SETV D2, 1566
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 14192
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 1587
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 1853
  PUSHR D4
  SETV D2, 1605
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1671
  PUSHR D4
  SETV D2, 1623
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 12
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 1642
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 12
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 1653
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 12
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 1669
  PUSHR D4
  SETV D2, 1669
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  SETV D2, 0
  GOTO 1852
  SETV D3, 0
  PUSHR D4
  SETV D2, 1683
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1761
  PUSHR D4
  SETV D2, 1731
  PUSHR D2
  PUSHR D4
  SETV D2, 1702
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 1712
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 1720
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 1728
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  GOTO 21664
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 1743
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 12
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1759
  PUSHR D4
  SETV D2, 1759
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  SETV D2, 0
  GOTO 1851
  SETV D3, 0
  PUSHR D4
  SETV D2, 1773
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1850
  PUSHR D4
  SETV D2, 1812
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  PUSHR D4
  SETV D2, 1794
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 1806
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 12
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21849
  POP D4
  PUSHR D4
  SETV D3, 1824
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  PUSHR D4
  SETV D2, 1833
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 1849
  PUSHR D4
  SETV D2, 1849
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  GOTO 2409
  SETV D3, 0
  PUSHR D4
  SETV D2, 1867
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 1884
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1024
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 2408
  PUSHR D4
  SETV D2, 1914
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1933
  PUSHR D4
  SETV D2, 1932
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 6349
  POP D4
  GOTO 2407
  SETV D3, 0
  PUSHR D4
  SETV D2, 1945
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2167
  PUSHR D4
  SETV D2, 1965
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 1986
  SETV D2, 0
  PUSHR D4
  SETV D3, 1985
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  GOTO 2165
  SETV D3, 0
  PUSHR D4
  SETV D2, 1998
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2015
  PUSHR D4
  SETV D2, 2014
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 7350
  POP D4
  GOTO 2164
  SETV D3, 0
  PUSHR D4
  SETV D2, 2027
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2044
  PUSHR D4
  SETV D2, 2043
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 7716
  POP D4
  GOTO 2163
  SETV D3, 0
  PUSHR D4
  SETV D2, 2056
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2073
  PUSHR D4
  SETV D2, 2072
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 7802
  POP D4
  GOTO 2162
  SETV D3, 0
  PUSHR D4
  SETV D2, 2085
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2102
  PUSHR D4
  SETV D2, 2101
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 7888
  POP D4
  GOTO 2161
  SETV D3, 0
  PUSHR D4
  SETV D2, 2114
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2131
  PUSHR D4
  SETV D2, 2130
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 8012
  POP D4
  GOTO 2160
  SETV D3, 0
  PUSHR D4
  SETV D2, 2143
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2159
  PUSHR D4
  SETV D2, 2159
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 8136
  POP D4
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  GOTO 2406
  SETV D3, 0
  PUSHR D4
  SETV D2, 2179
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2196
  PUSHR D4
  SETV D2, 2195
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 8382
  POP D4
  GOTO 2405
  SETV D3, 0
  PUSHR D4
  SETV D2, 2208
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 9
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2225
  PUSHR D4
  SETV D2, 2224
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 8506
  POP D4
  GOTO 2404
  SETV D3, 0
  PUSHR D4
  SETV D2, 2237
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 10
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2254
  PUSHR D4
  SETV D2, 2253
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 8639
  POP D4
  GOTO 2403
  SETV D3, 0
  PUSHR D4
  SETV D2, 2266
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 11
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2283
  PUSHR D4
  SETV D2, 2282
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 8772
  POP D4
  GOTO 2402
  SETV D3, 0
  PUSHR D4
  SETV D2, 2295
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 12
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2312
  PUSHR D4
  SETV D2, 2311
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 9027
  POP D4
  GOTO 2401
  SETV D3, 0
  PUSHR D4
  SETV D2, 2324
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 13
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2341
  PUSHR D4
  SETV D2, 2340
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 9373
  POP D4
  GOTO 2400
  SETV D3, 0
  PUSHR D4
  SETV D2, 2353
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 14
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2370
  PUSHR D4
  SETV D2, 2369
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 9265
  POP D4
  GOTO 2399
  SETV D3, 0
  PUSHR D4
  SETV D2, 2382
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 15
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2398
  PUSHR D4
  SETV D2, 2398
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 9458
  POP D4
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 2421
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 2460
  PUSHR D4
  SETV D2, 2441
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2459
  PUSHR D4
  SETV D2, 2459
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 4668
  POP D4
  SETV D2, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 2472
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3073
  SETV D2, 1000
  PUSHR D4
  SETV D3, 2496
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22382
  POP D4
  PUSHR D4
  SETV D2, 2503
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21989
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 2511
  GOTO 3282
  SETV D2, 0
  PUSHR D4
  SETV D2, 2523
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 2559
  GOTO 3282
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 4
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 3
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 2581
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22296
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 2602
  PUSHR D4
  SETV D2, 2598
  PUSHR D2
  PUSHR D4
  SETV D2, 2595
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21544
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2744
  SETV D3, 0
  PUSHR D4
  SETV D2, 2618
  PUSHR D2
  PUSHR D4
  SETV D2, 2615
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22247
  POP D4
  PUSHR D2
  GOTO 36
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2636
  SETV D2, -90
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2743
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2652
  SETV D2, -45
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2742
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2668
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2741
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2684
  SETV D2, 45
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2740
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2700
  SETV D2, 90
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2739
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2716
  SETV D2, 135
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2738
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2732
  SETV D2, 180
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 2737
  SETV D3, 0
  SETV D2, -135
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  COMPAREV D2, 0
  GOTOTRUE 2833
  PUSHR D4
  SETV D2, 2759
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 2769
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 2784
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21835
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  PUSHR D4
  SETV D2, 2800
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 2810
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 2825
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21826
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  GOTO 2862
  SETV D3, 0
  PUSHR D4
  SETV D2, 2845
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  PUSHR D4
  SETV D2, 2859
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 2920
  PUSHR D4
  SETV D2, 2917
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 21731
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 180
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 2959
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 2964
  SETV D3, 0
  SETV D2, 2
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  PUSHR D4
  SETV D2, 3072
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 2989
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 3002
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22310
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3012
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3022
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22366
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3032
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22321
  POP D4
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 3054
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  SETV D2, 128
  PUSHR D2
  GOTO 22028
  POP D4
  GOTO 3175
  SETV D3, 0
  PUSHR D4
  SETV D2, 3085
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3142
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3127
  SETV D2, 1000
  PUSHR D4
  SETV D3, 3126
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22382
  POP D4
  GOTO 3141
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 3141
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22382
  POP D4
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 3154
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3174
  PUSHR D4
  SETV D2, 3174
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 3187
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 64
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 3281
  PUSHR D4
  SETV D2, 3218
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 3233
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22404
  POP D4
  PUSHR D4
  SETV D2, 3242
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 3257
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22410
  POP D4
  PUSHR D4
  SETV D2, 3266
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 3281
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22393
  POP D4
  SETV D2, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 3310
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3349
  PUSHR D4
  SETV D2, 3330
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3348
  PUSHR D4
  SETV D2, 3348
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 4668
  POP D4
  SETV D2, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 3361
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3770
  SETV D2, 1000
  PUSHR D4
  SETV D3, 3385
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22382
  POP D4
  PUSHR D4
  SETV D2, 3396
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 3432
  GOTO 3873
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 3446
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22296
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 3467
  PUSHR D4
  SETV D2, 3463
  PUSHR D2
  PUSHR D4
  SETV D2, 3460
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21544
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3609
  SETV D3, 0
  PUSHR D4
  SETV D2, 3483
  PUSHR D2
  PUSHR D4
  SETV D2, 3480
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22247
  POP D4
  PUSHR D2
  GOTO 36
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3501
  SETV D2, -90
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3608
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3517
  SETV D2, -45
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3607
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3533
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3606
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3549
  SETV D2, 45
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3605
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3565
  SETV D2, 90
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3604
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3581
  SETV D2, 135
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3603
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3597
  SETV D2, 180
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 3602
  SETV D3, 0
  SETV D2, -135
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 180
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 3648
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 3653
  SETV D3, 0
  SETV D2, 2
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  PUSHR D4
  SETV D2, 3769
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  PUSHR D4
  SETV D2, 3670
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3680
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3690
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 3703
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22310
  POP D4
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  PUSHR D4
  SETV D2, 3717
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22321
  POP D4
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  PUSHR D4
  SETV D2, 3731
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3741
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 3751
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22230
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  SETV D2, 128
  PUSHR D2
  GOTO 22028
  POP D4
  GOTO 3872
  SETV D3, 0
  PUSHR D4
  SETV D2, 3782
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3839
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3824
  SETV D2, 1000
  PUSHR D4
  SETV D3, 3823
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22382
  POP D4
  GOTO 3838
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 3838
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22382
  POP D4
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 3851
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 3871
  PUSHR D4
  SETV D2, 3871
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 3893
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3927
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.3927
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5.8905
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 3960
  SETV D2, 3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4079
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1.1781
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3978
  SETV D2, 7
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4078
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1.9635
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 3996
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4077
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2.7489
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4014
  SETV D2, 6
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4076
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3.5343
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4032
  SETV D2, 2
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4075
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4.3197
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4050
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4074
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5.1051
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4068
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  GOTO 4073
  SETV D3, 0
  SETV D2, 5
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 4091
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 4114
  PUSHR D4
  SETV D2, 4111
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 6235
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D4
  SETV D3, 4130
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22252
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 4149
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22296
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 4302
  PUSHR D4
  SETV D2, 4160
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4190
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.7854
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5.4978
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4232
  SETV D2, 4
  PUSHR D4
  SETV D3, 4231
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4300
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2.3562
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 4257
  SETV D2, 3
  PUSHR D4
  SETV D3, 4256
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4299
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3.9270
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4284
  SETV D2, 7
  PUSHR D4
  SETV D3, 4283
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4298
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 4298
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  GOTO 4464
  SETV D3, 0
  PUSHR D4
  SETV D2, 4318
  PUSHR D2
  PUSHR D4
  SETV D2, 4315
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22247
  POP D4
  PUSHR D2
  GOTO 36
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4371
  SETV D2, 0
  PUSHR D4
  SETV D3, 4370
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4463
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4422
  SETV D2, 3
  PUSHR D4
  SETV D3, 4421
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4462
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4447
  SETV D2, 7
  PUSHR D4
  SETV D3, 4446
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4461
  SETV D3, 0
  SETV D2, 4
  PUSHR D4
  SETV D3, 4461
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 4482
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 36
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4535
  SETV D2, 0
  PUSHR D4
  SETV D3, 4534
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4627
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4586
  SETV D2, 3
  PUSHR D4
  SETV D3, 4585
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4626
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4611
  SETV D2, 7
  PUSHR D4
  SETV D3, 4610
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  GOTO 4625
  SETV D3, 0
  SETV D2, 4
  PUSHR D4
  SETV D3, 4625
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22326
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 4646
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 128
  POP D3
  ORR D2, D3
  PUSHR D4
  SETV D3, 4664
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4707
  GOTO 4908
  SETV D2, 0
  PUSHR D4
  SETV D2, 4717
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 4732
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22377
  POP D4
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  PUSHR D4
  SETV D2, 4746
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 4756
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22366
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 16
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 4777
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22388
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 4789
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22399
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 1
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4856
  PUSHR D4
  SETV D2, 4855
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 27400
  PUSHR D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  SETV D2, 64
  PUSHR D2
  GOTO 22028
  POP D4
  GOTO 4907
  SETV D3, 0
  PUSHR D4
  SETV D2, 4907
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 27400
  PUSHR D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  SETV D2, 128
  PUSHR D2
  GOTO 22028
  POP D4
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 129
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 145
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 4945
  SETV D2, 17
  GOTO 5275
  GOTO 5274
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 133
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4959
  SETV D2, 18
  GOTO 5275
  GOTO 5273
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 130
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4973
  SETV D2, 19
  GOTO 5275
  GOTO 5272
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 140
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 4987
  SETV D2, 35
  GOTO 5275
  GOTO 5271
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 142
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5001
  SETV D2, 81
  GOTO 5275
  GOTO 5270
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 139
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5015
  SETV D2, 80
  GOTO 5275
  GOTO 5269
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 134
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5029
  SETV D2, 21
  GOTO 5275
  GOTO 5268
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 132
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5043
  SETV D2, 20
  GOTO 5275
  GOTO 5267
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 141
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5057
  SETV D2, 36
  GOTO 5275
  GOTO 5266
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 137
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5071
  SETV D2, 76
  GOTO 5275
  GOTO 5265
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 138
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5085
  SETV D2, 77
  GOTO 5275
  GOTO 5264
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 131
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5260
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 256
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5226
  PUSHR D4
  SETV D2, 5132
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21999
  POP D4
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5137
  GOTO 5215
  SETV D2, 0
  PUSHR D4
  SETV D2, 5149
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22107
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  PUSHR D4
  SETV D2, 5161
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21969
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 5169
  GOTO 5215
  SETV D2, 0
  PUSHR D4
  SETV D2, 5179
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21974
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5214
  PUSHR D4
  SETV D2, 5199
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21974
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 5213
  GOTO 5226
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 5108
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 5240
  SETV D2, 4
  GOTO 5275
  GOTO 5258
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5254
  SETV D2, 5
  GOTO 5275
  GOTO 5257
  SETV D3, 0
  SETV D2, 6
  GOTO 5275
  SETV D3, 0
  SETV D3, 0
  GOTO 5263
  SETV D3, 0
  SETV D2, 0
  GOTO 5275
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 129
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 145
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 5310
  SETV D2, 40
  GOTO 5398
  GOTO 5397
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 134
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 141
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 5337
  SETV D2, 32
  GOTO 5398
  GOTO 5396
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 140
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 142
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 139
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 5377
  SETV D2, 13
  GOTO 5398
  GOTO 5395
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 133
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5391
  SETV D2, 51
  GOTO 5398
  GOTO 5394
  SETV D3, 0
  SETV D2, 0
  GOTO 5398
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 5423
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  PUSHR D4
  SETV D2, 5420
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22291
  POP D4
  PUSHR D2
  GOTO 22079
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  PUSHR D4
  SETV D2, 5437
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5467
  PUSHR D4
  SETV D2, 5467
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 5464
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 22416
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 5477
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22332
  POP D4
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 5654
  SETV D2, 3
  PUSHR D4
  SETV D3, 5497
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22337
  POP D4
  PUSHR D4
  SETV D2, 5506
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  PUSHR D4
  SETV D3, 5518
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22360
  POP D4
  PUSHR D4
  SETV D2, 5527
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22366
  POP D4
  PUSHR D4
  SETV D3, 5539
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22371
  POP D4
  SETV D2, 16
  PUSHR D2
  PUSHR D4
  SETV D2, 5550
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  POP D3
  MULTR D2, D3
  PUSHR D4
  SETV D3, 5564
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22343
  POP D4
  SETV D2, 16
  PUSHR D2
  PUSHR D4
  SETV D2, 5575
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22366
  POP D4
  POP D3
  MULTR D2, D3
  PUSHR D4
  SETV D3, 5589
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22349
  POP D4
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  PUSHR D4
  SETV D2, 5604
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 5621
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  PUSHR D4
  SETV D2, 5636
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 5653
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  GOTO 5695
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 5675
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 5695
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  SETV D3, 0
  PUSHR D4
  SETV D2, 5707
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 5719
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  PUSHR D4
  SETV D2, 5728
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D4
  SETV D3, 5740
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22285
  POP D4
  SETV D2, 0.0001
  PUSHR D4
  SETV D3, 5753
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22301
  POP D4
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D4
  SETV D3, 5768
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  PUSHR D4
  SETV D2, 5777
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 3880
  POP D4
  PUSHR D4
  SETV D2, 5786
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D4
  SETV D3, 5800
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 5809
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D4
  SETV D3, 5823
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 5834
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 5848
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 8
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 5859
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 5873
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 10
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 5884
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 15
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 5901
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 6001
  PUSHR D4
  SETV D2, 5953
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 5934
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 5946
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21664
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 5963
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  POP D3
  DIVR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0.1600
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  MULTR D2, D3
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 6000
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 9
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 6027
  SETV D3, 0
  PUSHR D4
  SETV D2, 6013
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 6027
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 9
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  PUSHR D4
  SETV D2, 6039
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 6053
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 11
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 6064
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 12
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 6078
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 12
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 6089
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 6103
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 13
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 6114
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 6128
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 14
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 6139
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 256
  BITNOT D2
  POP D3
  ANDR D2, D3
  PUSHR D4
  SETV D3, 6158
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 6169
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 32
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 6193
  SETV D2, 0
  PUSHR D4
  SETV D3, 6193
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22435
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 6205
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 6225
  PUSHR D4
  SETV D2, 6225
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6249
  SETV D2, 8
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6262
  SETV D2, 12
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6275
  SETV D2, 14
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6288
  SETV D2, 10
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6301
  SETV D2, 15
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6314
  SETV D2, 9
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6327
  SETV D2, 13
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6340
  SETV D2, 11
  GOTO 6345
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 6345
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 13
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 12
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 11
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 10
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 9
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 8
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 7
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 6
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 5
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6418
  PUSHR D2
  PUSHR D4
  SETV D2, 6415
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 21477
  POP D4
  SETR D6, D4
  ADDV D6, 13
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6428
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22067
  POP D4
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6515
  PUSHR D4
  SETV D2, 6455
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 22072
  POP D4
  SETR D6, D4
  ADDV D6, 12
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6469
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 768
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 768
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 6481
  GOTO 6504
  SETV D2, 0
  PUSHR D4
  SETV D2, 6493
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 13
  LOADI D2, D6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6503
  GOTO 6515
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  POP D2
  GOTO 6431
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6697
  ALLOCATEMEMV D2, 43
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETR D0, D2
  SETV D1, -1
  ADDV D1, 1
  SETV D2, 103
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 46
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 122
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 58
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 70
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 108
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 102
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 121
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 119
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 0
  SETR SCRIPTRAM, D2
  PUSHR D4
  SETV D2, 6670
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  GOTO 21819
  POP D4
  PUSHR D4
  SETV D2, 6675
  PUSHR D2
  GOTO 21823
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 6688
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 7332
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D2, 0
  PUSHR D4
  SETV D2, 6709
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 10
  POP D3
  MODR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6733
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 13
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 10000
  POP D3
  MULTR D2, D3
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6758
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  RSHIFTR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 10
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6787
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22332
  POP D4
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6851
  PUSHR D4
  SETV D2, 6803
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  PUSHR D4
  SETV D2, 6815
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 9
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6831
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  PUSHR D4
  SETV D2, 6843
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22366
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  GOTO 6884
  SETV D3, 0
  PUSHR D4
  SETV D2, 6861
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 9
  STOREI D2, D6
  PUSHR D4
  SETV D2, 6877
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6984
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 6963
  PUSHR D4
  SETV D2, 6952
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6.2832
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  MULTR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D3
  DIVR D3, D2
  SETR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 5402
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  POP D2
  GOTO 6899
  SETV D3, 0
  PUSHR D4
  SETV D2, 6983
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  PUSHR D4
  SETV D2, 6980
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 22113
  POP D4
  GOTO 7318
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7076
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7055
  PUSHR D4
  SETV D2, 7044
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 7036
  PUSHR D2
  SETV D2, 31416
  PUSHR D2
  GOTO 21809
  POP D4
  PUSHR D2
  SETV D2, 5000
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 5402
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  POP D2
  GOTO 6999
  SETV D3, 0
  PUSHR D4
  SETV D2, 7075
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  PUSHR D4
  SETV D2, 7072
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 22113
  POP D4
  GOTO 7317
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7224
  PUSHR D4
  SETV D2, 7132
  PUSHR D2
  PUSHR D4
  SETV D2, 7099
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7118
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21844
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7222
  PUSHR D4
  SETV D2, 7211
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  MULTR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  POP D3
  DIVR D3, D2
  SETR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 5402
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 7151
  SETV D3, 0
  GOTO 7297
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7296
  PUSHR D4
  SETV D2, 7296
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 7293
  PUSHR D2
  PUSHR D4
  SETV D2, 7260
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7279
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21844
  POP D4
  PUSHR D2
  GOTO 5402
  POP D4
  SETV D2, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 7317
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  PUSHR D4
  SETV D2, 7314
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 22113
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 7332
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  PUSHR D4
  SETV D3, 7366
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  PUSHR D4
  SETV D2, 7377
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 7396
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 14
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 7407
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 7504
  PUSHR D4
  SETV D2, 7455
  PUSHR D2
  PUSHR D4
  SETV D2, 7426
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 7436
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 7444
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 7452
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  GOTO 21772
  POP D4
  PUSHR D4
  SETV D3, 7467
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  PUSHR D4
  SETV D2, 7476
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 3880
  POP D4
  SETV D2, 300
  PUSHR D4
  SETV D3, 7489
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 7504
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 13
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 7514
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 0.3000
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 7530
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  GOTO 7711
  PUSHR D4
  SETV D2, 7542
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 7563
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 7604
  PUSHR D4
  SETV D2, 7587
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 0.3000
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 7603
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  GOTO 7710
  SETV D3, 0
  SETV D2, 0
  COMPAREV D2, 0
  GOTOTRUE 7709
  PUSHR D4
  SETV D2, 7619
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 6
  POP D3
  ANDR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7648
  PUSHR D4
  SETV D2, 7647
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 7708
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7671
  PUSHR D4
  SETV D2, 7670
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 7707
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7694
  PUSHR D4
  SETV D2, 7693
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 7706
  SETV D3, 0
  PUSHR D4
  SETV D2, 7706
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 4471
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 7785
  PUSHR D2
  SETV D2, 135
  PUSHR D2
  PUSHR D4
  SETV D2, 7732
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7747
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7762
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22247
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  PUSHR D4
  SETV D2, 7776
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 7798
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 7871
  PUSHR D2
  SETV D2, 136
  PUSHR D2
  PUSHR D4
  SETV D2, 7818
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7833
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7848
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22247
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  PUSHR D4
  SETV D2, 7862
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 7884
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 7993
  PUSHR D4
  SETV D2, 7982
  PUSHR D2
  SETV D2, 129
  PUSHR D2
  PUSHR D4
  SETV D2, 7922
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7937
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 200
  PUSHR D2
  PUSHR D4
  SETV D2, 7958
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 7975
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 7895
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 8007
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8117
  PUSHR D4
  SETV D2, 8106
  PUSHR D2
  SETV D2, 129
  PUSHR D2
  PUSHR D4
  SETV D2, 8046
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8061
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 200
  PUSHR D2
  PUSHR D4
  SETV D2, 8082
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8099
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 8019
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 8131
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 8147
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 21809
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8258
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8256
  PUSHR D4
  SETV D2, 8245
  PUSHR D2
  SETV D2, 129
  PUSHR D2
  PUSHR D4
  SETV D2, 8185
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8200
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 200
  PUSHR D2
  PUSHR D4
  SETV D2, 8221
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8238
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 8158
  SETV D3, 0
  GOTO 8362
  SETV D3, 0
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8361
  PUSHR D4
  SETV D2, 8350
  PUSHR D2
  SETV D2, 129
  PUSHR D2
  PUSHR D4
  SETV D2, 8290
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8305
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 200
  PUSHR D2
  PUSHR D4
  SETV D2, 8326
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8343
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 8263
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 8376
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8487
  PUSHR D4
  SETV D2, 8476
  PUSHR D2
  SETV D2, 129
  PUSHR D2
  PUSHR D4
  SETV D2, 8416
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8431
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 200
  PUSHR D2
  PUSHR D4
  SETV D2, 8452
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8469
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 8389
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 8501
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8611
  PUSHR D4
  SETV D2, 8600
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 8540
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8555
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 100
  PUSHR D2
  PUSHR D4
  SETV D2, 8576
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8593
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 8513
  SETV D3, 0
  PUSHR D4
  SETV D2, 8621
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22113
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 8634
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8744
  PUSHR D4
  SETV D2, 8733
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 8673
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8688
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 71
  PUSHR D2
  PUSHR D4
  SETV D2, 8709
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8726
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 8646
  SETV D3, 0
  PUSHR D4
  SETV D2, 8754
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22113
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 8767
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 8783
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 21809
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8894
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8892
  PUSHR D4
  SETV D2, 8881
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 8821
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8836
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 100
  PUSHR D2
  PUSHR D4
  SETV D2, 8857
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8874
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 8794
  SETV D3, 0
  GOTO 8998
  SETV D3, 0
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 8997
  PUSHR D4
  SETV D2, 8986
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 8926
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8941
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 71
  PUSHR D2
  PUSHR D4
  SETV D2, 8962
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 8979
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 8899
  SETV D3, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 9008
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22113
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 9021
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 9133
  PUSHR D4
  SETV D2, 9122
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 9062
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9077
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 100
  PUSHR D2
  PUSHR D4
  SETV D2, 9098
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9115
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 9035
  SETV D3, 0
  SETV D2, 4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 9236
  PUSHR D4
  SETV D2, 9225
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 9165
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9180
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 71
  PUSHR D2
  PUSHR D4
  SETV D2, 9201
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9218
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 9138
  SETV D3, 0
  PUSHR D4
  SETV D2, 9246
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22113
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 9259
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 9347
  PUSHR D2
  SETV D2, 140
  PUSHR D2
  PUSHR D4
  SETV D2, 9281
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9296
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9311
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22247
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  PUSHR D4
  SETV D2, 9323
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22280
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9340
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 785
  POP D4
  PUSHR D4
  SETV D2, 9356
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 13
  PUSHR D2
  GOTO 22113
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 9369
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 9395
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  PUSHR D4
  SETV D2, 9392
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 22022
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 9407
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D4
  SETV D3, 9419
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22128
  POP D4
  PUSHR D4
  SETV D2, 9428
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D4
  SETV D3, 9440
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22139
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 9453
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 4
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 3
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 9486
  PUSHR D2
  GOTO 18170
  POP D4
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 9513
  SETV D2, 0
  PUSHR D4
  SETV D3, 9512
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22315
  POP D4
  GOTO 9786
  SETV D2, 0
  PUSHR D4
  SETV D2, 9525
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  GOTO 22005
  POP D4
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  PUSHR D4
  SETV D2, 9535
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22067
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 9624
  PUSHR D4
  SETV D2, 9562
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22072
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  PUSHR D4
  SETV D2, 9576
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 768
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 512
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 9588
  GOTO 9613
  SETV D2, 0
  PUSHR D4
  SETV D2, 9610
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 9607
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 21854
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 9538
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 9647
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 3
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 9658
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1024
  POP D3
  ORR D2, D3
  PUSHR D4
  SETV D3, 9676
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 1
  PUSHR D4
  SETV D3, 9689
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21885
  POP D4
  PUSHR D4
  SETV D2, 9698
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 21600
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 9715
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21908
  POP D4
  PUSHR D4
  SETV D2, 9724
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 21632
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 9741
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21914
  POP D4
  PUSHR D4
  SETV D2, 9752
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 14
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 9764
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21896
  POP D4
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 9786
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 0
  PUSHR D2
  GOTO 21962
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 9813
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 9825
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 9841
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 9852
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 9870
  PUSHR D2
  PUSHR D4
  SETV D2, 9867
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  GOTO 21826
  POP D4
  POP D3
  MULTR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 9886
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 9896
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9917
  PUSHR D2
  PUSHR D4
  SETV D2, 9914
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21839
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 9935
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 9946
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 9956
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 9977
  PUSHR D2
  PUSHR D4
  SETV D2, 9974
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21830
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 9995
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 10006
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 10030
  PUSHR D2
  PUSHR D4
  SETV D2, 10023
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 1.5708
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21839
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 10046
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  PUSHR D4
  SETV D2, 10057
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 10081
  PUSHR D2
  PUSHR D4
  SETV D2, 10074
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 1.5708
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21830
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 10097
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 10116
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10146
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  PUSHR D4
  SETV D2, 10188
  PUSHR D2
  PUSHR D4
  SETV D2, 10159
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10169
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10177
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10185
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  GOTO 21772
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10213
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6.2832
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  PUSHR D4
  SETV D2, 10230
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21864
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 10248
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6.2832
  PUSHR D2
  PUSHR D4
  SETV D2, 10271
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 10301
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D4
  SETV D3, 10300
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  GOTO 10412
  SETV D3, 0
  PUSHR D4
  SETV D2, 10318
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21558
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10333
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3.1416
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21558
  POP D4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10374
  PUSHR D4
  SETV D2, 10347
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10359
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 10373
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  GOTO 10411
  SETV D3, 0
  PUSHR D4
  SETV D2, 10384
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10396
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 10411
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  SETV D3, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 10422
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 3880
  POP D4
  PUSHR D4
  SETV D2, 10433
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10498
  PUSHR D4
  SETV D2, 10453
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SUBV D2, 1
  PUSHR D4
  SETV D3, 10469
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 10
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  PUSHR D4
  SETV D2, 10481
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 10497
  PUSHR D4
  SETV D2, 10497
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 10520
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10552
  PUSHR D4
  SETV D2, 10538
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 10552
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 10564
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10707
  PUSHR D4
  SETV D2, 10584
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SUBV D2, 1
  PUSHR D4
  SETV D3, 10600
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  PUSHR D4
  SETV D2, 10612
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10705
  PUSHR D4
  SETV D2, 10630
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 10647
  PUSHR D4
  SETV D2, 10646
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  GOTO 10704
  SETV D3, 0
  PUSHR D4
  SETV D2, 10659
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SUBV D2, 1
  PUSHR D4
  SETV D3, 10675
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 9
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  SETV D2, 0
  PUSHR D4
  SETV D3, 10689
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  SETV D2, -20
  PUSHR D4
  SETV D3, 10704
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  SETV D2, 0
  GOTO 11089
  SETV D3, 0
  PUSHR D4
  SETV D2, 10719
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  ADDV D2, 1
  PUSHR D4
  SETV D3, 10735
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  PUSHR D4
  SETV D2, 10747
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 10886
  SETV D2, 45
  PUSHR D4
  SETV D3, 10769
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 10810
  PUSHR D2
  PUSHR D4
  SETV D2, 10781
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10791
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10799
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21979
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 10807
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21984
  POP D4
  PUSHR D2
  GOTO 21772
  POP D4
  PUSHR D4
  SETV D3, 10822
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  PUSHR D4
  SETV D2, 10833
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 10845
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  PUSHR D4
  SETV D2, 10854
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 3880
  POP D4
  PUSHR D4
  SETV D2, 10865
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 10885
  PUSHR D4
  SETV D2, 10885
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 10898
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 10935
  PUSHR D4
  SETV D2, 10918
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 0.3000
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 10934
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  GOTO 11088
  SETV D3, 0
  PUSHR D4
  SETV D2, 10947
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 11087
  PUSHR D4
  SETV D2, 10967
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 0.2000
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 10983
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  PUSHR D4
  SETV D2, 10994
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 6
  POP D3
  ANDR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11026
  PUSHR D4
  SETV D2, 11025
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 11086
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11049
  PUSHR D4
  SETV D2, 11048
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 11085
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11072
  PUSHR D4
  SETV D2, 11071
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 11084
  SETV D3, 0
  PUSHR D4
  SETV D2, 11084
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 4471
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 11106
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 11128
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  PUSHR D4
  SETV D2, 11123
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  MULTR D2, D3
  PUSHR D2
  GOTO 21519
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 11140
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 11157
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  PUSHR D4
  SETV D2, 11166
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 3880
  POP D4
  PUSHR D4
  SETV D2, 11177
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 11197
  PUSHR D4
  SETV D2, 11197
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 11209
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11274
  PUSHR D4
  SETV D2, 11229
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SUBV D2, 1
  PUSHR D4
  SETV D3, 11245
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 10
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  PUSHR D4
  SETV D2, 11257
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 11273
  PUSHR D4
  SETV D2, 11273
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 11293
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11325
  PUSHR D4
  SETV D2, 11311
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 11325
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 11337
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11480
  PUSHR D4
  SETV D2, 11357
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SUBV D2, 1
  PUSHR D4
  SETV D3, 11373
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  PUSHR D4
  SETV D2, 11385
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11478
  PUSHR D4
  SETV D2, 11403
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 11420
  PUSHR D4
  SETV D2, 11419
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  GOTO 11477
  SETV D3, 0
  PUSHR D4
  SETV D2, 11432
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SUBV D2, 1
  PUSHR D4
  SETV D3, 11448
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 9
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  SETV D2, 0
  PUSHR D4
  SETV D3, 11462
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  SETV D2, -20
  PUSHR D4
  SETV D3, 11477
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  SETV D2, 0
  GOTO 11808
  SETV D3, 0
  PUSHR D4
  SETV D2, 11492
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  ADDV D2, 1
  PUSHR D4
  SETV D3, 11508
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  PUSHR D4
  SETV D2, 11520
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11630
  SETV D2, 45
  PUSHR D4
  SETV D3, 11542
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 11549
  PUSHR D2
  SETV D2, 31416
  PUSHR D2
  GOTO 21809
  POP D4
  PUSHR D2
  SETV D2, 5000
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 11566
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  PUSHR D4
  SETV D2, 11577
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 11589
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  PUSHR D4
  SETV D2, 11598
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 3880
  POP D4
  PUSHR D4
  SETV D2, 11609
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 11629
  PUSHR D4
  SETV D2, 11629
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4136
  POP D4
  SETV D2, 0
  SETV D2, 0
  PUSHR D4
  SETV D2, 11642
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 11679
  PUSHR D4
  SETV D2, 11662
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  SETV D2, 0.3000
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 11678
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22263
  POP D4
  GOTO 11807
  SETV D3, 0
  PUSHR D4
  SETV D2, 11691
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 11806
  PUSHR D4
  SETV D2, 11713
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 6
  POP D3
  ANDR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11745
  PUSHR D4
  SETV D2, 11744
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 11805
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11768
  PUSHR D4
  SETV D2, 11767
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 11804
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 11791
  PUSHR D4
  SETV D2, 11790
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 4471
  POP D4
  GOTO 11803
  SETV D3, 0
  PUSHR D4
  SETV D2, 11803
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  PUSHR D2
  GOTO 4471
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 11828
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 11842
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 11852
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 11873
  PUSHR D2
  PUSHR D4
  SETV D2, 11870
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21839
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 11891
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 11902
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 11912
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 11933
  PUSHR D2
  PUSHR D4
  SETV D2, 11930
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21830
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 11951
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12002
  PUSHR D4
  SETV D2, 11972
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 11984
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 12001
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12547
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12053
  PUSHR D4
  SETV D2, 12024
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12036
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12052
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12546
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12105
  PUSHR D4
  SETV D2, 12075
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12087
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 12104
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12545
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12156
  PUSHR D4
  SETV D2, 12127
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12139
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12155
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12544
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12256
  PUSHR D4
  SETV D2, 12178
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12190
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 12211
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 12222
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12234
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 12255
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12543
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12355
  PUSHR D4
  SETV D2, 12278
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12290
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12310
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 12321
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12333
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 12354
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12542
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12454
  PUSHR D4
  SETV D2, 12377
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12389
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 12410
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 12421
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12433
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12453
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 12541
  SETV D3, 0
  PUSHR D4
  SETV D2, 12466
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12478
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12498
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 12509
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12521
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12541
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 12559
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 12571
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  PUSHR D4
  SETV D2, 12582
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 12594
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  PUSHR D4
  SETV D2, 12605
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12617
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 12633
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  PUSHR D4
  SETV D3, 12654
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22241
  POP D4
  PUSHR D4
  SETV D2, 12665
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 12682
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 12737
  PUSHR D4
  SETV D2, 12708
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 12722
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 12737
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 9
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D2, 12771
  PUSHR D2
  PUSHR D4
  SETV D2, 12752
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 12764
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 21849
  POP D4
  PUSHR D4
  SETV D3, 12785
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 7
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 12796
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 12808
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22235
  POP D4
  PUSHR D4
  SETV D2, 12819
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12870
  PUSHR D4
  SETV D2, 12855
  PUSHR D2
  PUSHR D4
  SETV D2, 12842
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.1600
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 3.2000
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21849
  POP D4
  PUSHR D4
  SETV D3, 12869
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 13066
  SETV D3, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 12886
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 12979
  PUSHR D4
  SETV D2, 12908
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -0.5000
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 12972
  PUSHR D4
  SETV D2, 12928
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -0.5000
  POP D3
  MULTR D2, D3
  PUSHR D4
  SETV D3, 12946
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 12955
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 0.7500
  POP D3
  MULTR D2, D3
  PUSHR D4
  SETV D3, 12971
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  GOTO 12977
  SETV D3, 0
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  GOTO 12984
  SETV D3, 0
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  COMPAREV D2, 0
  GOTOTRUE 13065
  PUSHR D4
  SETV D2, 13001
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 13035
  SETV D2, 0
  PUSHR D4
  SETV D3, 13025
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22235
  POP D4
  PUSHR D4
  SETV D2, 13034
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  GOTO 13064
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 13051
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 8
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 13064
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  PUSHR D4
  SETV D3, 13088
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22241
  POP D4
  PUSHR D4
  SETV D2, 13099
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13111
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 13128
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 7
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 13139
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 13151
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22235
  POP D4
  PUSHR D4
  SETV D2, 13174
  PUSHR D2
  PUSHR D4
  SETV D2, 13165
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.1600
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 3.2000
  PUSHR D2
  GOTO 21854
  POP D4
  PUSHR D4
  SETV D3, 13188
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 13199
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 13401
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 13221
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 13314
  PUSHR D4
  SETV D2, 13243
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -0.5000
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13307
  PUSHR D4
  SETV D2, 13263
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, -0.5000
  POP D3
  MULTR D2, D3
  PUSHR D4
  SETV D3, 13281
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 13290
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 0.7500
  POP D3
  MULTR D2, D3
  PUSHR D4
  SETV D3, 13306
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  GOTO 13312
  SETV D3, 0
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  GOTO 13319
  SETV D3, 0
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  COMPAREV D2, 0
  GOTOTRUE 13400
  PUSHR D4
  SETV D2, 13336
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 13370
  SETV D2, 0
  PUSHR D4
  SETV D3, 13360
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22235
  POP D4
  PUSHR D4
  SETV D2, 13369
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 4633
  POP D4
  GOTO 13399
  SETV D3, 0
  SETV D2, 0
  PUSHR D4
  SETV D3, 13386
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 8
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 13399
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22274
  POP D4
  SETV D3, 0
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 13421
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 13435
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13445
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 13466
  PUSHR D2
  PUSHR D4
  SETV D2, 13463
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21839
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 13484
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 13495
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13505
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 13526
  PUSHR D2
  PUSHR D4
  SETV D2, 13523
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21830
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 13544
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13595
  PUSHR D4
  SETV D2, 13565
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13577
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 13594
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14140
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13646
  PUSHR D4
  SETV D2, 13617
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13629
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 13645
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14139
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13698
  PUSHR D4
  SETV D2, 13668
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13680
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 13697
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14138
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13749
  PUSHR D4
  SETV D2, 13720
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13732
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 13748
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14137
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13849
  PUSHR D4
  SETV D2, 13771
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13783
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 13804
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 13815
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13827
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 13848
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14136
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 13948
  PUSHR D4
  SETV D2, 13871
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13883
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 13903
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 13914
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13926
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 13947
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14135
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14047
  PUSHR D4
  SETV D2, 13970
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 13982
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14003
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14014
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14026
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14046
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14134
  SETV D3, 0
  PUSHR D4
  SETV D2, 14059
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14071
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14091
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14102
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14114
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14134
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 14152
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 14164
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  PUSHR D4
  SETV D2, 14175
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 14187
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 14206
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 9
  PUSHR D2
  GOTO 22422
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 14220
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 14348
  PUSHR D4
  SETV D2, 14238
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14248
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 14269
  PUSHR D2
  PUSHR D4
  SETV D2, 14266
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21839
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14287
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14298
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14308
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22269
  POP D4
  PUSHR D2
  SETV D2, 100
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 14329
  PUSHR D2
  PUSHR D4
  SETV D2, 14326
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22258
  POP D4
  PUSHR D2
  GOTO 21830
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14347
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14377
  SETV D3, 0
  PUSHR D4
  SETV D2, 14360
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  ADDV D2, 1
  PUSHR D4
  SETV D3, 14376
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 6
  PUSHR D2
  GOTO 22428
  POP D4
  POP D2
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14429
  PUSHR D4
  SETV D2, 14399
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14411
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14428
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14974
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14480
  PUSHR D4
  SETV D2, 14451
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14463
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14479
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14973
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14532
  PUSHR D4
  SETV D2, 14502
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14514
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14531
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14972
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14583
  PUSHR D4
  SETV D2, 14554
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14566
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14582
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14971
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14683
  PUSHR D4
  SETV D2, 14605
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14617
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14638
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14649
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14661
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14682
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14970
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14782
  PUSHR D4
  SETV D2, 14705
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14717
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14737
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14748
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14760
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14781
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14969
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 14881
  PUSHR D4
  SETV D2, 14804
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14816
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 14837
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14848
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14860
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14880
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  GOTO 14968
  SETV D3, 0
  PUSHR D4
  SETV D2, 14893
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14905
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14925
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 4
  PUSHR D2
  GOTO 22428
  POP D4
  PUSHR D4
  SETV D2, 14936
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 14948
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 0.7071
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D4
  SETV D3, 14968
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 5
  PUSHR D2
  GOTO 22428
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 14986
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 14998
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22213
  POP D4
  PUSHR D4
  SETV D2, 15009
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D4
  SETV D3, 15021
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22224
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 15033
  PUSHR D2
  GOTO 15076
  POP D4
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 15043
  PUSHR D2
  GOTO 15461
  POP D4
  PUSHR D4
  SETV D2, 15048
  PUSHR D2
  GOTO 15760
  POP D4
  PUSHR D4
  SETV D2, 15053
  PUSHR D2
  GOTO 15137
  POP D4
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 15063
  PUSHR D2
  GOTO 259
  POP D4
  PUSHR D4
  SETV D2, 15068
  PUSHR D2
  GOTO 15905
  POP D4
  PUSHR D4
  SETV D2, 15073
  PUSHR D2
  GOTO 15237
  POP D4
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 3
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 4
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 5
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 6
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 15147
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22102
  POP D4
  PUSHR D2
  SETV D2, 8
  POP D3
  LSHIFTR D3, D2
  SETR D2, D3
  PUSHR D2
  PUSHR D4
  SETV D2, 15160
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22097
  POP D4
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D2, GD26
  PUSHR D2
  SETV D2, 7
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 15199
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 6
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 7
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  GOTO 15232
  SETV D3, 0
  SETR D2, GD26
  PUSHR D2
  SETV D2, 6
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15231
  SETR D2, GD26
  PUSHR D2
  SETV D2, 6
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SUBV D2, 1
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 6
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  POP D2
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D2, GD26
  PUSHR D2
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 8
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15296
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ORR D2, D3
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  GOTO 15315
  SETV D3, 0
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  BITNOT D2
  POP D3
  ANDR D2, D3
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D3, 0
  SETV D2, 4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15386
  SETR D2, GD26
  PUSHR D2
  SETV D2, 3
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  ADDV D2, 1
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 3
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  POP D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 3
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 15385
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 3
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETR D2, GD26
  PUSHR D2
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 4
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETV D2, 0
  SETV D2, 4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15457
  SETR D2, GD26
  PUSHR D2
  SETV D2, 5
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  ADDV D2, 1
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 5
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  POP D2
  SETR D2, GD26
  PUSHR D2
  SETV D2, 5
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 15456
  SETV D2, 0
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 5
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETR D2, GD26
  PUSHR D2
  SETV D2, 4
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 4
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D0, GD26
  SETR D5, D2
  PUSHR D0
  SETV D2, 4
  POP D0
  SETR D1, D2
  SETR GLOBALRAM, D5
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 2
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 15477
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21994
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 15490
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21994
  POP D4
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 15507
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21994
  POP D4
  PUSHR D2
  SETV D2, 14
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 15524
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21994
  POP D4
  PUSHR D2
  SETV D2, 15
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15645
  PUSHR D4
  SETV D2, 15544
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22067
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15643
  PUSHR D4
  SETV D2, 15571
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 22072
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  PUSHR D4
  SETV D2, 15585
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 512
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 15606
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 256
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 15622
  GOTO 15632
  SETV D2, 0
  PUSHR D4
  SETV D2, 15632
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 1103
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 15547
  SETV D3, 0
  GOTO 15753
  SETV D3, 0
  PUSHR D4
  SETV D2, 15653
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22067
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 15752
  PUSHR D4
  SETV D2, 15680
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22072
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  PUSHR D4
  SETV D2, 15694
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 512
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 15715
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22422
  POP D4
  PUSHR D2
  SETV D2, 256
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 15731
  GOTO 15741
  SETV D2, 0
  PUSHR D4
  SETV D2, 15741
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 3294
  POP D4
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 15656
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 15771
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 21989
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 15899
  SETR D6, D4
  ADDV D6, 1
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 32
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 15898
  PUSHR D4
  SETV D2, 15823
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22005
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D2, GD24
  PUSHR D2
  PUSHR D4
  SETV D2, 15837
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21891
  POP D4
  PUSHR D2
  SETV D2, 4
  POP D3
  RSHIFTR D3, D2
  SETR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  PUSHR D4
  SETV D2, 15857
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21891
  POP D4
  PUSHR D2
  SETV D2, 15
  POP D3
  ANDR D2, D3
  POP D3
  LSHIFTR D3, D2
  SETR D2, D3
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 15886
  SETV D2, 0
  PUSHR D4
  SETV D3, 15886
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21885
  POP D4
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 15801
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D2, GD26
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, GLOBALRAM
  PUSHR D2
  SETV D2, 2
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 15933
  GOTO 16679
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 7
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 5
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 15953
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  GOTO 22010
  POP D4
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 16678
  PUSHR D4
  SETV D2, 15980
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  GOTO 22015
  POP D4
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 15992
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22156
  POP D4
  PUSHR D2
  SETV D2, 20
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 16009
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22156
  POP D4
  PUSHR D2
  SETV D2, 511
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 16023
  GOTO 16667
  SETV D2, 0
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 16098
  PUSHR D4
  SETV D2, 16043
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22184
  POP D4
  PUSHR D2
  SETV D2, 65536
  POP D3
  ANDR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 16055
  GOTO 16667
  SETV D2, 0
  PUSHR D4
  SETV D2, 16067
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22197
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 16084
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22197
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 16096
  GOTO 16667
  SETV D2, 0
  GOTO 16119
  SETV D3, 0
  PUSHR D4
  SETV D2, 16110
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 15
  PUSHR D2
  GOTO 22184
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 16118
  GOTO 16667
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  SETV D2, 0
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 16208
  PUSHR D4
  SETV D2, 16147
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  GOTO 22197
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  PUSHR D4
  SETV D2, 16161
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 11
  PUSHR D2
  GOTO 22197
  POP D4
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, -1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 16206
  ALLOCATEMEMV D2, 2
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  PUSHR D4
  SETV D2, 16191
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 16690
  POP D4
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D2, 0
  GOTO 16279
  SETV D3, 0
  ALLOCATEMEMV D2, 2
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 16226
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 16690
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 1
  PUSHR D4
  SETV D3, 16263
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22190
  POP D4
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 16274
  GOTO 16667
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 511
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 16315
  PUSHR D4
  SETV D2, 16314
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 17977
  POP D4
  GOTO 16667
  SETV D2, 0
  PUSHR D4
  SETV D2, 16325
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  GOTO 18183
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 16348
  PUSHR D4
  SETV D2, 16347
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 17977
  POP D4
  GOTO 16667
  SETV D2, 0
  PUSHR D4
  SETV D2, 16360
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  GOTO 22005
  POP D4
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  SETV D2, 1
  PUSHR D4
  SETV D3, 16376
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21885
  POP D4
  PUSHR D4
  SETV D2, 16385
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22167
  POP D4
  PUSHR D4
  SETV D3, 16397
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21902
  POP D4
  SETV D2, 1
  PUSHR D4
  SETV D3, 16410
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21950
  POP D4
  SETV D2, 1
  PUSHR D4
  SETV D3, 16423
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21956
  POP D4
  PUSHR D4
  SETV D2, 16432
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22123
  POP D4
  PUSHR D4
  SETV D3, 16444
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21908
  POP D4
  PUSHR D4
  SETV D2, 16453
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22134
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 16463
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22145
  POP D4
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D4
  SETV D3, 16478
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21914
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 16491
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21920
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 16504
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21926
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 16517
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21932
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 16530
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21938
  POP D4
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D4
  SETV D3, 16545
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 21896
  POP D4
  PUSHR D4
  SETV D2, 16554
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 22156
  POP D4
  PUSHR D4
  SETV D3, 16568
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 0
  PUSHR D2
  GOTO 21962
  POP D4
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, -1
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 16621
  SETV D2, 3
  PUSHR D4
  SETV D3, 16608
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22172
  POP D4
  SETV D2, 1024
  PUSHR D4
  SETV D3, 16621
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22178
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 16648
  SETV D2, 1
  PUSHR D4
  SETV D3, 16647
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22190
  POP D4
  GOTO 16666
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D4
  SETV D3, 16666
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22190
  POP D4
  SETV D3, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  POP D2
  GOTO 15956
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  ALLOCATEMEMV D2, 64
  SETR D6, D4
  ADDV D6, 10
  STOREI D2, D6
  ALLOCATEMEMV D2, 64
  SETR D6, D4
  ADDV D6, 9
  STOREI D2, D6
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 11
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  PUSHR D4
  SETV D2, 16734
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  GOTO 22203
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 63
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 17458
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 64
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 17446
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 16796
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  GOTO 18050
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 17232
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  SETV D2, 0
  PUSHR D4
  SETV D2, 16831
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 18050
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 16874
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  POP D2
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  GOTO 16812
  SETV D3, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  PUSHR D4
  SETV D2, 16898
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 22118
  POP D4
  SETR D6, D4
  ADDV D6, 11
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETR D6, D4
  ADDV D6, 11
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 17230
  ALLOCATEMEMV D2, 60
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  SETR D0, D2
  SETV D1, -1
  ADDV D1, 1
  SETV D2, 103
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 46
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 122
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 58
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 65
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 117
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 71
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 117
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 102
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 108
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 45
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 120
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 46
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 92
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 0
  SETR SCRIPTRAM, D2
  ALLOCATEMEMV D2, 80
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETR D0, D2
  SETV D1, -1
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 83
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 109
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 58
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 37
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 92
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 0
  SETR SCRIPTRAM, D2
  PUSHR D4
  SETV D2, 17192
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 18400
  POP D4
  PUSHR D4
  SETV D2, 17205
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 18447
  POP D4
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 5
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 9
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 10
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 17961
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 5
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D2, 0
  GOTO 17445
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 48
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 57
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 45
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 17444
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 45
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 17310
  SETV D2, 45
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 48
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 57
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 17404
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  POP D2
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  GOTO 17321
  SETV D3, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  PUSHR D4
  SETV D2, 17426
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 20811
  POP D4
  SETR D6, D4
  ADDV D6, 11
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D2, 0
  SETV D3, 0
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  GOTO 16738
  SETV D3, 0
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 11
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 17952
  SETR D6, D4
  ADDV D6, 11
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 17951
  ALLOCATEMEMV D2, 55
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETR D0, D2
  SETV D1, -1
  ADDV D1, 1
  SETV D2, 103
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 46
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 122
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 58
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 65
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 117
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 71
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 117
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 102
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 108
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 45
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 102
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 117
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 46
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 92
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 0
  SETR SCRIPTRAM, D2
  ALLOCATEMEMV D2, 80
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D0, D2
  SETV D1, -1
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 69
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 109
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 121
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 109
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 58
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 37
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 92
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 0
  SETR SCRIPTRAM, D2
  ALLOCATEMEMV D2, 55
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETR D0, D2
  SETV D1, -1
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 83
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 112
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 109
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 111
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 117
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 108
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 100
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 102
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 105
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 115
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 104
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 97
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 116
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 101
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 114
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 58
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 32
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 37
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 99
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 92
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 110
  SETR SCRIPTRAM, D2
  ADDV D1, 1
  SETV D2, 0
  SETR SCRIPTRAM, D2
  PUSHR D4
  SETV D2, 17915
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 18400
  POP D4
  PUSHR D4
  SETV D2, 17928
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  GOTO 18447
  POP D4
  PUSHR D4
  SETV D2, 17939
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 64
  PUSHR D2
  GOTO 18447
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 1
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 2
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D2, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 9
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETR D6, D4
  ADDV D6, 10
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETV D2, 65536
  PUSHR D4
  SETV D3, 17994
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  SETV D2, 15
  PUSHR D2
  GOTO 22190
  POP D4
  SETV D2, 1024
  PUSHR D4
  SETV D3, 18007
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22128
  POP D4
  SETV D2, 1024
  PUSHR D4
  SETV D3, 18020
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22139
  POP D4
  SETV D2, -1000
  PUSHR D4
  SETV D3, 18033
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22150
  POP D4
  SETV D2, 0
  PUSHR D4
  SETV D3, 18046
  PUSHR D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  PUSHR D2
  PUSHR D3
  GOTO 22161
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 97
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 122
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 18081
  SETV D2, 0.0001
  GOTO 18165
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 65
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 90
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 18111
  SETV D2, 0.0001
  GOTO 18165
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 95
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18124
  SETV D2, 0.0001
  GOTO 18165
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18162
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 48
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 57
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 18161
  SETV D2, 0.0001
  GOTO 18165
  SETV D2, 0
  SETV D2, 0
  SETV D2, 0
  GOTO 18165
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 18179
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 18183
  POP D4
  GOTO 18180
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 1
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 18206
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 21849
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 32
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  GOTOTRUE 18330
  PUSHR D4
  SETV D2, 18231
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22005
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  PUSHR D4
  SETV D2, 18243
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21880
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 18258
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21880
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 18277
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21891
  POP D4
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  PUSHR D2
  PUSHR D4
  SETV D2, 18302
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  PUSHR D2
  GOTO 21944
  POP D4
  COMPAREV D2, 0
  SETTRUE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 18318
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 18333
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 18209
  SETV D3, 0
  SETV D2, 0
  GOTO 18333
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 18350
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 50
  PUSHR D2
  GOTO 21999
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 18360
  PUSHR D2
  SETR D2, GD0
  PUSHR D2
  SETV D2, 63
  PUSHR D2
  GOTO 21999
  POP D4
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  GOTO 18365
  SETV D3, 0
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 18443
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 18757
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 18492
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 18757
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 110
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18512
  SETV D2, 0
  GOTO 18634
  GOTO 18631
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 105
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18526
  SETV D2, 2
  GOTO 18634
  GOTO 18630
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 102
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18540
  SETV D2, 3
  GOTO 18634
  GOTO 18629
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 100
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18554
  SETV D2, 4
  GOTO 18634
  GOTO 18628
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 115
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18568
  SETV D2, 1
  GOTO 18634
  GOTO 18627
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 112
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18582
  SETV D2, 5
  GOTO 18634
  GOTO 18626
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 99
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18596
  SETV D2, 6
  GOTO 18634
  GOTO 18625
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 120
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18610
  SETV D2, 7
  GOTO 18634
  GOTO 18624
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 88
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 18623
  SETV D2, 8
  GOTO 18634
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D2, -1
  GOTO 18634
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 110
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 115
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 105
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 102
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 100
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 112
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 99
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 120
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 88
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  GOTO 18753
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  ALLOCATEMEMV D2, 512
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 18841
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 17
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 16
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 15
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 13
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 11
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 18875
  POP D4
  PUSHR D4
  SETV D2, 18850
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21819
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  ALLOCATEMEMV D2, 16
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  PUSHR D4
  SETV D2, 18969
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 22
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 21
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 20
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 19
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 18
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 17
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 16
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 15
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 13
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 11
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 21177
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 23
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 19229
  SETR D6, D4
  ADDV D6, 23
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 92
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19074
  SETR D6, D4
  ADDV D6, 23
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 110
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19072
  SETV D2, 10
  SETR D6, D4
  ADDV D6, 24
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  POP D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  POP D2
  GOTO 19218
  SETV D2, 0
  GOTO 19194
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 37
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19193
  SETR D6, D4
  ADDV D6, 23
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19111
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 18638
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 19192
  PUSHR D4
  SETV D2, 19143
  PUSHR D2
  SETR D6, D4
  ADDV D6, 24
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  PUSHR D4
  SETV D2, 19140
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 18497
  POP D4
  PUSHR D2
  GOTO 19270
  POP D4
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 24
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 19172
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  POP D2
  GOTO 19143
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  POP D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  POP D2
  GOTO 19218
  SETV D2, 0
  SETV D2, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 24
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  POP D2
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  POP D2
  GOTO 18973
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19242
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19325
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19307
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 20569
  POP D4
  PUSHR D4
  SETV D2, 19320
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 7
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19706
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 7
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19373
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19355
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 20261
  POP D4
  PUSHR D4
  SETV D2, 19368
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 6
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19705
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 8
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19421
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19403
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.0001
  PUSHR D2
  GOTO 20261
  POP D4
  PUSHR D4
  SETV D2, 19416
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 5
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19704
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19469
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19451
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 19811
  POP D4
  PUSHR D4
  SETV D2, 19464
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 4
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19703
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 3
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19517
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19499
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 19811
  POP D4
  PUSHR D4
  SETV D2, 19512
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 3
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19702
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19563
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19545
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 19721
  POP D4
  PUSHR D4
  SETV D2, 19558
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 2
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19701
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 5
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19609
  ALLOCATEMEMV D2, 32
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19591
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 20569
  POP D4
  PUSHR D4
  SETV D2, 19604
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 1
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19700
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 6
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19657
  ALLOCATEMEMV D2, 2
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 19639
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 18368
  POP D4
  PUSHR D4
  SETV D2, 19652
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETR D6, D4
  ADDV D6, 0
  LOADI D3, D6
  DEALLOCATEMEMR D3
  GOTO 19699
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 19698
  PUSHR D4
  SETV D2, 19698
  PUSHR D2
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  PUSHR D2
  GOTO 20986
  POP D4
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 19738
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 19744
  POP D4
  GOTO 19739
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 19759
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21477
  POP D4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19783
  PUSHR D4
  SETV D2, 19781
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 20592
  POP D4
  GOTO 19805
  GOTO 19804
  SETV D3, 0
  PUSHR D4
  SETV D2, 19803
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 19839
  POP D4
  GOTO 19805
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 19832
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 19839
  POP D4
  GOTO 19833
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 5
  STOREI D2, D6
  SETV D2, 100000
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 3
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 19911
  SETV D2, 45
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  SETV D2, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20204
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  LSHIFTR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 10
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 20023
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  COMPAREV D2, 0.0001
  SETMORE D2
  COMPAREV D2, 0
  GOTOTRUE 20021
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 48
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  GOTO 20119
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20044
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 20118
  SETV D3, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20090
  SETV D2, 48
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SUBV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 20045
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 48
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D3, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 7
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  POP D3
  DIVR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20159
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  GOTO 20192
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.1000
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20191
  SETV D2, 46
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D2, 0
  SETV D3, 0
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 19916
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 4
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20236
  SETV D2, 48
  SETR D6, D4
  ADDV D6, 9
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 8
  STOREI D2, D6
  POP D2
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  GOTO 20248
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 20282
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 20289
  POP D4
  GOTO 20283
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  PUSHR D4
  SETV D2, 20311
  PUSHR D2
  PUSHR D4
  SETV D2, 20308
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  GOTO 21864
  POP D4
  PUSHR D2
  GOTO 21477
  POP D4
  SETR D6, D4
  ADDV D6, 6
  STOREI D2, D6
  SETV D2, 48
  SETR D6, D4
  ADDV D6, 8
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D2, 120
  SETR D6, D4
  ADDV D6, 8
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D2, 2
  SETR D6, D4
  ADDV D6, 4
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20374
  SETV D2, 48
  SETR D6, D4
  ADDV D6, 8
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETV D2, 2
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D2, 3
  GOTO 20557
  SETV D2, 0
  PUSHR D4
  SETV D2, 20396
  PUSHR D2
  PUSHR D4
  SETV D2, 20389
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  SETV D2, 16
  PUSHR D2
  GOTO 21447
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21477
  POP D4
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  PUSHR D4
  SETV D2, 20412
  PUSHR D2
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETV D2, 55
  PUSHR D2
  SETV D2, 87
  PUSHR D2
  GOTO 21423
  POP D4
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20546
  PUSHR D4
  SETV D2, 20470
  PUSHR D2
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 20464
  PUSHR D2
  SETV D2, 16
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21859
  POP D4
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21477
  POP D4
  PUSHR D2
  SETV D2, 16
  POP D3
  MODR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 20512
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 48
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21423
  POP D4
  SETR D6, D4
  ADDV D6, 8
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 20419
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  GOTO 20557
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 20586
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 20592
  POP D4
  GOTO 20587
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20644
  SETV D2, 45
  SETR D6, D4
  ADDV D6, 5
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  POP D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  SETV D3, 0
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 3
  STOREI D2, D6
  GOTO 20670
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20669
  SETV D2, 48
  SETR D6, D4
  ADDV D6, 5
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D2, 1
  GOTO 20802
  SETV D2, 0
  SETV D3, 0
  PUSHR D4
  SETV D2, 20690
  PUSHR D2
  PUSHR D4
  SETV D2, 20683
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  GOTO 21868
  POP D4
  PUSHR D2
  SETV D2, 1
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21477
  POP D4
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20791
  PUSHR D4
  SETV D2, 20748
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 20742
  PUSHR D2
  SETV D2, 10
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 1
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21859
  POP D4
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21477
  POP D4
  PUSHR D2
  SETV D2, 10
  POP D3
  MODR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 48
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 5
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 20697
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  GOTO 20802
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 20824
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 20829
  POP D4
  GOTO 20825
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 45
  POP D3
  COMPARER D2, D3
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 20878
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  POP D2
  SETV D2, 0.0001
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  PUSHR D4
  SETV D2, 20910
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  GOTO 21391
  POP D4
  COMPAREV D2, 0
  GOTOTRUE 20957
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 10
  POP D3
  MULTR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 48
  POP D3
  SUBR D3, D2
  SETR D2, D3
  POP D3
  ADDR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 2
  STOREI D2, D6
  POP D2
  GOTO 20887
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  PUSHR D4
  SETV D2, 20975
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETV D2, -1
  PUSHR D2
  SETV D2, 1
  PUSHR D2
  GOTO 21423
  POP D4
  POP D3
  MULTR D2, D3
  GOTO 20978
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21003
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  PUSHR D2
  GOTO 21008
  POP D4
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 1
  SETV D2, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 21025
  PUSHR D2
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  GOTO 21127
  POP D4
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 21100
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  SETR D6, D4
  ADDV D6, 4
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  POP D2
  GOTO 21032
  SETV D3, 0
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 4
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  ADDR D2, D3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  SETV D2, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D0
  SETR D1, D2
  SETR D2, SCRIPTRAM
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D2, D3
  SETFALSE D2
  COMPAREV D2, 0
  GOTOTRUE 21167
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  ADDV D2, 1
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  POP D2
  GOTO 21138
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 21172
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 15
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 0
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 14
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 1
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 13
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 2
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 12
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 3
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 11
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 4
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 10
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 5
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 9
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 6
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 8
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 7
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 7
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 8
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 6
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 9
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 10
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 11
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 12
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 13
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 14
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  SETR D6, D4
  ADDV D6, 16
  LOADI D0, D6
  SETR D5, D2
  PUSHR D0
  SETV D2, 15
  POP D0
  SETR D1, D2
  SETR SCRIPTRAM, D5
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 48
  POP D3
  COMPARER D3, D2
  SETMORE D2
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 57
  POP D3
  COMPARER D3, D2
  SETLESS D2
  POP D3
  COMPAREV D2, 0
  SETFALSE D2
  COMPAREV D3, 0
  SETFALSE D3
  ADDR D2, D3
  COMPAREV D2, 0.0002
  SETMORE D2
  GOTO 21419
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  COMPAREV D2, 0
  GOTOTRUE 21435
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  GOTO 21441
  GOTO 21440
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  GOTO 21441
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21458
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  GOTO 21872
  POP D4
  PUSHR D2
  PUSHR D4
  SETV D2, 21468
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 21872
  POP D4
  POP D3
  DIVR D3, D2
  SETR D2, D3
  GOTO 21472
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 21505
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0.9999
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETV D2, 0
  POP D3
  LSHIFTR D3, D2
  SETR D2, D3
  GOTO 21515
  SETV D2, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  LSHIFTR D3, D2
  SETR D2, D3
  GOTO 21515
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21528
  PUSHR D2
  SETV D2, 32767
  PUSHR D2
  GOTO 21809
  POP D4
  PUSHR D2
  SETV D2, 32767
  POP D3
  DIVR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  MULTR D2, D3
  GOTO 21540
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 57.2958
  POP D3
  MULTR D2, D3
  GOTO 21554
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETLESS D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 21575
  SETV D2, 1
  GOTO 21596
  GOTO 21595
  SETV D3, 0
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETV D2, 0
  POP D3
  COMPARER D3, D2
  SETMORE D2
  COMPAREV D2, 0
  SETTRUE D2
  COMPAREV D2, 0
  GOTOTRUE 21591
  SETV D2, -1
  GOTO 21596
  GOTO 21594
  SETV D3, 0
  SETV D2, 0
  GOTO 21596
  SETV D3, 0
  SETV D3, 0
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21611
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22208
  POP D4
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  PUSHR D4
  SETV D2, 21623
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22355
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  GOTO 21628
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21643
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22219
  POP D4
  PUSHR D2
  SETV D2, 8
  PUSHR D2
  PUSHR D4
  SETV D2, 21655
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  GOTO 22366
  POP D4
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  GOTO 21660
  SETV D3, 0
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  PUSHR D2
  PUSHR D2
  SETR D4, SP
  SETR D6, D4
  ADDV D6, 5
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 1
  STOREI D2, D6
  SETR D6, D4
  ADDV D6, 4
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  SETR D6, D4
  ADDV D6, 0
  STOREI D2, D6
  PUSHR D4
  SETV D2, 21721
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  POP D3
  MULTR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  POP D3
  MULTR D2, D3
  POP D3
  ADDR D2, D3
  PUSHR D2
  GOTO 21876
  POP D4
  GOTO 21722
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21760
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21844
  POP D4
  PUSHR D2
  SETV D2, 57.2958
  POP D3
  MULTR D2, D3
  GOTO 21765
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  SETV D2, 0
  SETR D4, SP
  PUSHR D4
  SETV D2, 21801
  PUSHR D2
  SETR D6, D4
  ADDV D6, 1
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 3
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  SETR D6, D4
  ADDV D6, 0
  LOADI D2, D6
  PUSHR D2
  SETR D6, D4
  ADDV D6, 2
  LOADI D2, D6
  POP D3
  SUBR D3, D2
  SETR D2, D3
  PUSHR D2
  GOTO 21844
  POP D4
  GOTO 21802
  SETV D3, 0
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  GOTOR D3
  POP D3
  RNDR D2, D3
  POP D3
  GOTOR D3
  WAITFRAME
  POP D3
  GOTOR D3
  WAITDRAW
  POP D3
  GOTOR D3
  POP D0
  TRACE6
  POP D3
  GOTOR D3
  TRACE3
  POP D3
  GOTOR D3
  POP D3
  SINR D2, D3
  POP D3
  GOTOR D3
  POP D3
  MULTV D3, 57.2958
  SINR D2, D3
  POP D3
  GOTOR D3
  POP D3
  COSR D2, D3
  POP D3
  GOTOR D3
  POP D3
  MULTV D3, 57.2958
  COSR D2, D3
  POP D3
  GOTOR D3
  POP D1
  POP D0
  ARCTANR D2
  POP D3
  GOTOR D3
  POP D3
  POP D2
  MAXR D2, D3
  POP D3
  GOTOR D3
  POP D3
  POP D2
  MINR D2, D3
  POP D3
  GOTOR D3
  POP D3
  POP D2
  POWERR D2, D3
  POP D3
  GOTOR D3
  POP D2
  ABS D2
  POP D3
  GOTOR D3
  POP D2
  LOG10 D2
  POP D3
  GOTOR D3
  POP D2
  LOGE D2
  POP D3
  GOTOR D3
  POP D2
  SQROOTR D2, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFFFC, D3
  SETR D2, DATA
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR DATA, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFFFC, D3
  SETR D2, FFSCRIPT
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR FFSCRIPT, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR CSET, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR X, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR Y, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR XD, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR YD, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR XD2, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR YD2, D2
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR REFFFC, D3
  SETR D2, FFFLAGSD
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR FFTWIDTH, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR FFTHEIGHT, D2
  POP D3
  GOTOR D3
  POP D0
  POP D2
  POP D3
  SETR REFFFC, D3
  SETR FFINITDD, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFITEMCLASS, D3
  SETR D2, IDATAFAMILY
  POP D3
  GOTOR D3
  POP D3
  SETR REFITEMCLASS, D3
  SETR D2, IDATALEVEL
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, LINKX
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, LINKY
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, LINKHP
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, LINKACTION
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR D5, D3
  SETR D2, LINKITEMD
  POP D3
  GOTOR D3
  POP D2
  POP D5
  SUBV D2, 1
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, NPCCOUNT
  POP D3
  GOTOR D3
  POP D2
  POP D5
  SUBV D2, 1
  LOADNPCR D2
  SETR D2, REFNPC
  POP D3
  GOTOR D3
  POP D2
  POP D5
  CREATENPCR D2
  SETR D2, REFNPC
  POP D3
  GOTOR D3
  DRAWTILE
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D5
  POP D3
  GOTOR D3
  DRAWCOMBO
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D3
  POP D5
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, EWPNCOUNT
  POP D3
  GOTOR D3
  POP D2
  POP D5
  SUBV D2, 1
  LOADEWEAPONR D2
  SETR D2, REFEWPN
  POP D3
  GOTOR D3
  POP D2
  POP D5
  CREATEEWEAPONR D2
  SETR D2, REFEWPN
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR D5, D3
  SETR D2, SCREENFLAGSD
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR D5, D3
  SETR D2, SCREENEFLAGSD
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, CURDSCR
  POP D3
  GOTOR D3
  POP D3
  SETR D5, D3
  SETR D2, CURDMAP
  POP D3
  GOTOR D3
  POP D2
  POP D5
  LOADITEMDATAR D2
  SETR D2, REFITEMCLASS
  POP D3
  GOTOR D3
  POP D2
  POP D5
  PLAYSOUNDR D2
  POP D3
  GOTOR D3
  POP D2
  POP D5
  GETFFCSCRIPT D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCX
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCX, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCY
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCY, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCZ
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCHP, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCID
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCITEMSET, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCCSET
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCEXTEND, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCXOFS, D2
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCMISCD
  POP D3
  GOTOR D3
  POP D0
  POP D2
  POP D3
  SETR REFNPC, D3
  SETR NPCMISCD, D2
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR REFNPC, D3
  SETR D2, NPCDD
  POP D3
  GOTOR D3
  POP D2
  POP D5
  NPCNAME D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNX
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNX, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNY
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNY, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNZ
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNZ, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNJUMP, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNDIR
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNDIR, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNANGLE
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNANGLE, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNSTEP
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNSTEP, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNPOWER
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNPOWER, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNID
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNANGULAR
  POP D3
  GOTOR D3
  POP D2
  COMPAREV D2, 0
  GOTOTRUE 22305
  SETV D2, 1
  POP D3
  SETR REFEWPN, D3
  SETR EWPNANGULAR, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNTILE
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNDEAD, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNCSET
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNFLIP, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNEXTEND
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNEXTEND, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNHXSZ, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNHYSZ, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNTXSZ
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNTXSZ, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNTYSZ
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNTYSZ, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNXOFS
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNXOFS, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNYOFS
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNYOFS, D2
  POP D3
  GOTOR D3
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNZOFS
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNZOFS, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNHYOFS, D2
  POP D3
  GOTOR D3
  POP D2
  POP D3
  SETR REFEWPN, D3
  EWPNUSESPRITER D2
  POP D3
  GOTOR D3
  POP D0
  POP D3
  SETR REFEWPN, D3
  SETR D2, EWPNMISCD
  POP D3
  GOTOR D3
  POP D0
  POP D2
  POP D3
  SETR REFEWPN, D3
  SETR EWPNMISCD, D2
  POP D3
  GOTOR D3
  POP D2
  COMPAREV D2, 0
  GOTOTRUE 22439
  SETV D2, 1
  POP D3
  SETR REFEWPN, D3
  SETR EWPNCOLLDET, D2
  POP D3
  GOTOR D3

Comments