@0


@1
   MOV -90 ACC
   ADD UP
   MOV ACC LAST
   MOV -1  ACC
   ADD UP
   MOV ACC ANY
   MOV ACC DOWN
   MOV UP  DOWN
   MOV UP  ACC
   SUB 3
G: SUB 1
   MOV -2  DOWN
   JGZ G
   MOV 1   DOWN

@2





#  90 -> -1
# 270 ->  1

@3


@4


@5
   MOV UP  RIGHT
   MOV UP  RIGHT
   JLZ Z
   MOV 0   LAST
Z: MOV UP  ACC
   MOV RIGHT NIL
   ADD 907
   SUB 998
   MOV ACC ANY
   MOV -3  RIGHT
   JRO UP
   MOV ACC RIGHT
   MOV UP  ACC
   MOV ACC RIGHT

@6
   MOV ACC  DOWN
   SAV
   MOV 9    ACC
   SUB LEFT
   JGZ G
   MOV 1    DOWN
   SUB 1
G: MOV ACC  DOWN
   SWP
   ADD LEFT
   MOV ACC  ANY
   MOV 10 ANY
   MOV LEFT DOWN
   JRO LEFT
   SUB LEFT

@7


@8


@9
ADD LAST
MOV -1  DOWN
MOV ANY DOWN
MOV ACC DOWN
JRO UP
MOV 3   DOWN
MOV 3   DOWN
MOV 3   DOWN
MOV 3   DOWN
MOV 3   DOWN
MOV 3   DOWN
MOV 3   DOWN
MOV 3   DOWN
JRO UP
MOV 3   DOWN

@10