If N=5 And D=1001:Then 4ÞA
4ÞO
9ÞB
For 1ÞP To 2
Prog "SEPHIROT"
Next
Return
IfEnd
0=XãInt (Ran#©2‰1)ÞO
Getkey=25ã12ÞO
If O=1:Then F-Line 5,12,30,12
F-Line 30,12,27,17
F-Line 27,17,23,37
F-Line 15,37,13,29
F-Line 13,29,10,18
F-Line 10,18,7,14
F-Line 7,14,5,12
PlotOn 17,32
PlotOn 22,32
F-Line 22,35,26,40
F-Line 17,35,13,40
F-Line 21,35,19,45
F-Line 17,35,19,45
IfEnd
If O=2:Then F-Line A‰5,B‰20,A‰30,B‰20
F-Line A‰30,B‰20,A‰19,B‰45
F-Line A‰19,B‰45,A‰5,B‰20
PlotOn A‰18,B‰38
PlotOn A‰20,B‰38
IfEnd
If O=12:Then Circle 15,29,7
F-Line 15,36,35,47
F-Line 23,29,35,40
F-Line 35,47,35,40
F-Line 35,40,40,44
F-Line 40,44,35,47