:{-}11.75→Xmin
:11.75→Xmax
:{-}7.75→Ymin
:7.75→Ymax
:AxesOff
:ClrDraw
:PlotsOff
:FnOff
:Circle({-}10.5,6.5,1)
:Line({-}11.75,{-}7.75,{-}7.5,{-}1.75)
:Line(11.75,{-}7.75,7.5,{-}1.75)
:StorePic 1
:ClrDraw
:Line({-}7.5,{-}1.75,{-}7.5,11.75)
:Line({-}7.5,1.25,{-}5,1.25)
:StorePic 2
:ClrDraw
:Line(7.5,{-}1.75,7.5,11.75)
:Line(7.5,1.25,5,1.25)
:StorePic 3
:ClrDraw
:Line({-}7.5,{-}1.75,{-}5,1.25)
:StorePic 4
:ClrDraw
:Line(7.5,{-}1.75,5,1.25)
:StorePic 5
:ClrDraw
:Line({-}5,1.25,0,7.75)
:Line(5,1.25,0,7.75)
:Line({-}1.25,6,1.25,6)
:Line({-}1.25,6.25,1.25,6.25)
:Line({-}1.25,6.5,1.25,6.5)
:Line({-}1.25,6.75,1.25,6.75)
:Line({-}1.25,7,1.25,7)
:Line({-}1.25,7.25,1.25,7.25)
:Line({-}1.25,7.5,1.25,7.5)
:Line({-}1.25,7.75,1.25,7.75)
:StorePic 6
:ClrDraw
:Line({-}5,1.25,5,1.25)
:StorePic 7
:ClrDraw
:Line({-}5,1.25,{-}5,7.75)
:StorePic 8
:ClrDraw
:Line(5,1.25,5,7.75)
:StorePic 9
:ClrDraw
:1→A
:0→B
:{-}1→C
:0→D
:0→E
:1→F
:0→G
:{-}1→H
:1→I
:0→J
:0→K
:0→L
:1→M
:0→N
:0→Q
:0→R
:0→S
:0→X
:2→Z
:0→V
:Pt-On({-}10.5,6.5)
:Pt-On({-}10.5,6.75)
:Pt-On({-}10.5,7)
:RecallPic 1
:RecallPic 2
:RecallPic 3
:RecallPic 6
:RecallPic 8
:RecallPic 9
:Text(28,44,"3D")
:Text(34,40,"MAZE")
:Pause
:ClrDraw
:ClrHome
:Lbl 4
:ClrHome
:If V=0
:Disp " "," "," > NORMAL"," "," MIRROR"
:If V=1
:Disp " "," "," NORMAL"," "," > MIRROR"
:Lbl 5
:getKey→θ
:If θ=25
:0→V
:If θ=34
:1→V
:If θ=25 or θ=34
:Goto 4
:If θ≠105
:Goto 5
:If V=1
:Then
:{-}1→F
:1→H
:End
:0→θ
:0→U
:startTmr→T
:ClrHome
:Goto 2
:Lbl 1
:getKey→θ
:If θ=43
:Then
:ClrHome
:Prompt θ
:θ/10000→θ
:int(θ)→Q
:θ-Q→θ
:θ*100→θ
:int(θ)→R
:θ-R→θ
:θ*100→θ
:int(θ)→S
:0→θ
:ClrHome
:DispGraph
:Goto 3
:End
:If θ=45 or K=28
:Then
:If K=28
:Then
:startTmr-T→T
:Text(31,37,"YOU WIN")
:Text(40,41,"TIME")
:T/60→M
:(M-int(M))*60→T
:int(M)→M
:Text(46,41,M,",",T)
:Pause
:End
:0→A
:0→B
:0→C
:0→D
:0→E
:0→F
:0→G
:0→H
:0→I
:0→J
:0→K
:0→L
:0→M
:0→N
:0→O
:0→Q
:0→R
:0→S
:0→X
:0→V
:0→θ
:0→T
:ClrDraw
:ClrHome
:AxesOn
:Stop
:End
:If θ=25 and M=1
:0→θ
:If θ=24
:Then
:If L=1
:0→θ
:If L≠1
:Then
:A→X
:D→A
:C→D
:B→C
:X→B
:E→X
:H→E
:G→H
:F→G
:X→F
:0→X
:I-1→I
:If I<1
:I+4→I
:End
:End
:If θ=26
:Then
:If N=1
:0→θ
:If N≠1
:Then
:A→X
:B→A
:C→B
:D→C
:X→D
:E→X
:F→E
:G→F
:H→G
:X→H
:0→X
:I+1→I
:If I>4
:I-4→I
:End
:End
:If θ=34
:Then
:A*{-}1→A
:B*{-}1→B
:C*{-}1→C
:D*{-}1→D
:E*{-}1→E
:F*{-}1→F
:G*{-}1→G
:H*{-}1→H
:I+2→I
:If I>4
:I-4→I
:End
:If θ≠24 and θ≠25 and θ≠26 and θ≠34
:Goto 1
:J+E→J
:K+A→K
:Goto 3
:Lbl 2
:If Z=100 or Z=200 or Z=300 or Z=400
:0→Z
:If Z=101 or Z=208 or Z=303 or Z=402
:Then
:1→Z
:If V=1 and I≠2 and I≠4
:3→Z
:End
:If Z=102 or Z=201 or Z=308 or Z=403 or Z=203 or Z=401
:2→Z
:If Z=103 or Z=202 or Z=301 or Z=408
:Then
:3→Z
:If V=1 and I≠2 and I≠4
:1→Z
:End
:If Z=104 or Z=209 or Z=304 or Z=409
:4→Z
:If Z=105 or Z=206 or Z=310 or Z=411 or Z=211 or Z=406
:Then
:5→Z
:If V=1
:6→Z
:End
:If Z=106 or Z=210 or Z=311 or Z=405 or Z=205 or Z=410
:Then
:6→Z
:If V=1
:5→Z
:End
:If Z=107 or Z=212 or Z=313 or Z=414 or Z=214 or Z=412
:7→Z
:0→L
:0→M
:0→N
:ClrDraw
:If I=1
:Line({-}10.5,7,{-}10.5,6.5)
:If I=2
:Line({-}11,6.5,{-}10.5,6.5)
:If I=3
:Line({-}10.5,6,{-}10.5,6.5)
:If I=4
:Line({-}10,6.5,{-}10.5,6.5)
:RecallPic 1
:If Z=0 or Z=1 or Z=2 or Z=6
:RecallPic 2
:If Z=0 or Z=2 or Z=3 or Z=5
:RecallPic 3
:If Z=3 or Z=4 or Z=5 or Z=7
:Then
:RecallPic 4
:1→L
:End
:If Z=1 or Z=4 or Z=6 or Z=7
:Then
:RecallPic 5
:1→N
:End
:If Z=0 or Z=1 or Z=3 or Z=4
:RecallPic 6
:If Z=2 or Z=5 or Z=6 or Z=7
:Then
:RecallPic 7
:1→M
:End
:If Z=0 or Z=1 or Z=5 or Z=7
:RecallPic 8
:If Z=0 or Z=3 or Z=6 or Z=7
:RecallPic 9
:Goto 1
:Lbl 3
:I*100→Z
:If J=0 and K={-}1
:13→X
:If K=0
:Then
:If J={-}12 or J={-}2 or J=2
:11→X
:If J={-}11 or J={-}9 or J={-}8 or J={-}6 or J={-}4 or J=5 or J=8 or J=11
:9→X
:If J={-}10 or J={-}7 or J={-}5 or J={-}1 or J=6 or J=7 or J=9 or J=10 or J=12
:8→X
:If J={-}3 or J=3
:10→X
:If J=0
:2→X
:If J=1 or J=13
:12→X
:If J=4
:14→X
:End
:If K=1
:Then
:If J={-}12 or J={-}5 or J={-}1 or J=6
:4→X
:If J={-}11
:14→X
:If J={-}10 or J={-}2 or J=2
:6→X
:If J={-}9 or J=0 or J=8
:11→X
:If J={-}8 or J={-}6 or J=5 or J=11 or J=13
:10→X
:If J={-}7 or J={-}3 or J=10 or J=12
:5→X
:If J={-}4
:13→X
:If J=1 or J=4
:8→X
:If J=3
:3→X
:If J=7
:7→X
:If J=9
:1→X
:End
:If K=2
:Then
:If J={-}12 or J={-}8 or J={-}5 or J={-}1
:5→X
:If J={-}11
:8→X
:If J={-}10
:9→X
:If J={-}9 or J=11
:1→X
:If J={-}7
:12→X
:If J={-}6 or J=4 or J=5 or J=6
:4→X
:If J={-}4 or J=0 or J=3 or J=8 or J=13
:6→X
:If J={-}3 or J=2 or J=7 or J=10 or J=12
:11→X
:If J={-}2
:10→X
:If J=1 or J=9
:7→X
:End
:If K=3
:Then
:If J={-}12
:14→X
:If J={-}11 or J={-}6 or J=4 or J=6
:6→X
:If J={-}10 or J={-}8 or J={-}5 or J=3 or J=9
:11→X
:If J={-}9 or J=2 or J=10
:1→X
:If J={-}7 or J={-}1 or J=0 or J=1
:9→X
:If J={-}4
:12→X
:If J={-}3 or J=11
:4→X
:If J={-}2 or J=5 or J=7
:5→X
:If J=8 or J=13
:10→X
:If J=12
:3→X
:End
:If K=4
:Then
:If J={-}12 or J={-}4 or J={-}2 or J=0 or J=5
:11→X
:If J={-}11 or J={-}7
:9→X
:If J={-}10 or J={-}3 or J=8
:6→X
:If J={-}9 or J=12 or J=13
:7→X
:If J={-}8
:5→X
:If J={-}6 or J={-}1 or J=1 or J=4 or J=6
:10→X
:If J={-}5 or J=2 or J=9 or J=10 or J=11
:4→X
:If J=3
:3→X
:If J=7
:14→X
:End
:If K=5
:Then
:If J={-}12 or J={-}6 or J={-}5 or J={-}4 or J=4 or J=5 or J=6 or J=10
:4→X
:If J={-}11 or J={-}9 or J=7
:11→X
:If J={-}10 or J={-}7
:10→X
:If J={-}8 or J=12
:8→X
:If J={-}3
:14→X
:If J={-}2 or J=0 or J=9
:6→X
:If J={-}1 or J=1
:5→X
:If J=2
:1→X
:If J=3
:7→X
:If J=8
:9→X
:If J=11
:3→X
:If J=13
:12→X
:End
:If K=6
:Then
:If J={-}12 or J={-}10 or J={-}5 or J=6
:5→X
:If J={-}11 or J={-}9 or J=4 or J=7 or J=10
:6→X
:If J={-}8
:7→X
:If J={-}7 or J={-}6 or J=2 or J=5 or J=11
:4→X
:If J={-}4
:1→X
:If J={-}3 or J=0 or J=3
:11→X
:If J={-}2
:9→X
:If J={-}1 or J=1 or J=13
:10→X
:If J=8
:14→X
:If J=9
:8→X
:If J=12
:3→X
:End
:If K=7
:Then
:If J={-}12 or J={-}8 or J=10
:11→X
:If J={-}11 or J={-}10 or J=6 or J=7
:9→X
:If J={-}9 or J={-}5 or J={-}2 or J=4 or J=8
:10→X
:If J={-}7 or J=2 or J=11
:6→X
:If J={-}6 or J={-}3 or J=1 or J=5
:5→X
:If J={-}4 or J={-}1 or J=12 or J=13
:4→X
:If J=0 or J=9
:7→X
:If J=3
:3→X
:End
:If K=8
:Then
:If J={-}12
:3→X
:If J={-}11 or J={-}6
:9→X
:If J={-}10 or J=7
:12→X
:If J={-}9 or J={-}8 or J={-}1 or J=10 or J=13
:4→X
:If J={-}7 or J={-}3 or J=0 or J=2 or J=6 or J=11
:11→X
:If J={-}5 or J={-}2 or J=3 or J=12
:6→X
:If J={-}4
:7→X
:If J=1 or J=5 or J=9
:10→X
:If J=4 or J=8
:5→X
:End
:If K=9
:Then
:If J={-}12 or J=1 or J=11
:4→X
:If J={-}11 or J={-}4 or J=7 or J=12
:11→X
:If J={-}10 or J={-}6 or J=8
:9→X
:If J={-}9 or J={-}3 or J=9
:6→X
:If J={-}8 or J=10
:7→X
:If J={-}7 or J={-}1 or J=2 or J=5
:5→X
:If J={-}5
:12→X
:If J={-}2 or J=4
:13→X
:If J=0 or J=6 or J=13
:1→X
:If J=3
:10→X
:End
:If K=10
:Then
:If J={-}2
:1→X
:If J={-}12 or J=0 or J=7 or J=12 or J=13
:4→X
:If J={-}11 or J=1 or J=3
:5→X
:If J={-}4 or J=6 or J=11 or J=4
:6→X
:If J={-}9 or J={-}5
:8→X
:If J={-}10 or J={-}8 or J={-}7 or J={-}6
:9→X
:If J=2 or J=9
:10→X
:If J={-}3 or J=5 or J=10
:11→X
:If J={-}1
:13→X
:If J=8
:14→X
:End
:If K=11
:Then
:If J={-}12 or J=7 or J=10 or J=13
:4→X
:If J={-}11 or J={-}6
:14→X
:If J={-}10
:9→X
:If J={-}9 or J={-}5 or J={-}3 or J=2 or J=9 or J=12
:6→X
:If J={-}8 or J={-}4 or J=1 or J=3 or J=8 or J=11
:11→X
:If J={-}7 or J=4
:10→X
:If J={-}2
:7→X
:If J={-}1 or J=5
:5→X
:If J=0
:1→X
:If J=6
:12→X
:End
:If K=12
:Then
:If J={-}12 or J=7 or J=13
:4→X
:If J={-}11 or J={-}9 or J={-}1
:11→X
:If J={-}10 or J={-}5 or J={-}2 or J=6 or J=12
:10→X
:If J={-}8 or J=0
:6→X
:If J={-}7 or J={-}4 or J=1 or J=4 or J=8 or J=11
:5→X
:If J={-}6 or J=5 or J=9
:8→X
:If J={-}3 or J=2
:9→X
:If J=3 or J=10
:1→X
:End
:If K=13
:Then
:If J={-}12 or J={-}1
:3→X
:If J={-}11 or J={-}9 or J={-}6 or J={-}2 or J=3 or J=5 or J=9 or J=12
:6→X
:If J={-}10
:5→X
:If J={-}8 or J=8
:14→X
:If J={-}7 or J={-}3 or J=2
:9→X
:If J={-}5 or J=6 or J=7 or J=10 or J=13
:4→X
:If J={-}4 or J=1 or J=4 or J=11
:11→X
:If J=0
:10→X
:End
:If K=14
:Then
:If J={-}12 or J=10
:7→X
:If J={-}11 or J={-}9 or J={-}3 or J=3 or J=5 or J=8
:11→X
:If J={-}10 or J={-}6 or J={-}2 or J=9
:10→X
:If J={-}8
:8→X
:If J={-}7
:9→X
:If J={-}5 or J={-}4 or J={-}1 or J=0 or J=7 or J=13
:4→X
:If J=1
:5→X
:If J=2 or J=12
:12→X
:If J=4 or J=6
:6→X
:If J=11
:3→X
:End
:If K=15
:Then
:If J={-}12 or J={-}7 or J=6
:11→X
:If J={-}11 or J={-}6 or J=13
:6→X
:If J={-}10 or J={-}9 or J={-}8 or J={-}5 or J={-}2 or J=3 or J=5 or J=8
:4→X
:If J={-}4 or J=9 or J=11
:3→X
:If J={-}3 or J=7
:1→X
:If J={-}1
:7→X
:If J=0
:5→X
:If J=1 or J=12
:9→X
:If J=2
:10→X
:If J=4
:13→X
:If J=10
:12→X
:End
:If K=16
:Then
:If J={-}12 or J=7
:3→X
:If J={-}11 or J=0 or J=13
:10→X
:If J={-}10 or J={-}7 or J={-}2 or J=5
:5→X
:If J={-}9 or J={-}5 or J=2 or J=8 or J=11
:6→X
:If J={-}8 or J={-}4
:7→X
:If J={-}6 or J={-}1
:9→X
:If J={-}3 or J=3 or J=4 or J=9
:4→X
:If J=1 or J=10 or J=12
:11→X
:If J=6
:1→X
:End
:If K=17
:Then
:If J={-}12
:4→X
:If J={-}11
:3→X
:If J={-}10
:9→X
:If J={-}9
:9→X
:If J={-}8
:9→X
:If J={-}7
:10→X
:If J={-}6
:11→X
:If J={-}5
:12→X
:If J={-}4
:11→X
:If J={-}3
:6→X
:If J={-}2
:11→X
:If J={-}1
:9→X
:If J=0
:6→X
:If J=1
:5→X
:If J=2
:10→X
:If J=3
:5→X
:If J=4
:6→X
:If J=5
:11→X
:If J=6
:6→X
:If J=7
:4→X
:If J=8
:14→X
:If J=9
:6→X
:If J=10
:5→X
:If J=11
:10→X
:If J=12
:4→X
:If J=13
:4→X
:End
:If K=18
:Then
:If J={-}12
:4→X
:If J={-}11
:7→X
:If J={-}10
:11→X
:If J={-}9
:9→X
:If J={-}8
:10→X
:If J={-}7
:4→X
:If J={-}6
:4→X
:If J={-}5
:11→X
:If J={-}4
:1→X
:If J={-}3
:11→X
:If J={-}2
:6→X
:If J={-}1
:11→X
:If J=0
:9→X
:If J=1
:9→X
:If J=2
:6→X
:If J=3
:11→X
:If J=4
:12→X
:If J=5
:4→X
:If J=6
:11→X
:If J=7
:6→X
:If J=8
:11→X
:If J=9
:9→X
:If J=10
:10→X
:If J=11
:4→X
:If J=12
:4→X
:If J=13
:4→X
:End
:If K=19
:Then
:If J={-}12
:4→X
:If J={-}11
:11→X
:If J={-}10
:6→X
:If J={-}9
:11→X
:If J={-}8
:6→X
:If J={-}7
:4→X
:If J={-}6
:4→X
:If J={-}5
:4→X
:If J={-}4
:7→X
:If J={-}3
:5→X
:If J={-}2
:10→X
:If J={-}1
:5→X
:If J=0
:10→X
:If J=1
:11→X
:If J=2
:10→X
:If J=3
:5→X
:If J=4
:9→X
:If J=5
:6→X
:If J=6
:5→X
:If J=7
:9→X
:If J=8
:1→X
:If J=9
:11→X
:If J=10
:6→X
:If J=11
:3→X
:If J=12
:6→X
:If J=13
:4→X
:End
:If K=20
:Then
:If J={-}12
:4→X
:If J={-}11
:5→X
:If J={-}10
:10→X
:If J={-}9
:4→X
:If J={-}8
:11→X
:If J={-}7
:6→X
:If J={-}6
:5→X
:If J={-}5
:6→X
:If J={-}4
:11→X
:If J={-}3
:10→X
:If J={-}2
:3→X
:If J={-}1
:10→X
:If J=0
:7→X
:If J=1
:4→X
:If J=2
:4→X
:If J=3
:11→X
:If J=4
:10→X
:If J=5
:11→X
:If J=6
:8→X
:If J=7
:10→X
:If J=8
:7→X
:If J=9
:4→X
:If J=10
:13→X
:If J=11
:4→X
:If J=12
:11→X
:If J=13
:6→X
:End
:If K=21
:Then
:If J={-}12
:5→X
:If J={-}11
:10→X
:If J={-}10
:7→X
:If J={-}9
:4→X
:If J={-}8
:5→X
:If J={-}7
:9→X
:If J={-}6
:10→X
:If J={-}5
:11→X
:If J={-}4
:6→X
:If J={-}3
:4→X
:If J={-}2
:4→X
:If J={-}1
:5→X
:If J=0
:9→X
:If J=1
:6→X
:If J=2
:4→X
:If J=3
:4→X
:If J=4
:5→X
:If J=5
:1→X
:If J=6
:4→X
:If J=7
:4→X
:If J=8
:11→X
:If J=9
:6→X
:If J=10
:4→X
:If J=11
:4→X
:If J=12
:5→X
:If J=13
:10→X
:End
:If K=22
:Then
:If J={-}12
:13→X
:If J={-}11
:5→X
:If J={-}10
:9→X
:If J={-}9
:1→X
:If J={-}8
:11→X
:If J={-}7
:8→X
:If J={-}6
:1→X
:If J={-}5
:4→X
:If J={-}4
:11→X
:If J={-}3
:6→X
:If J={-}2
:5→X
:If J={-}1
:10→X
:If J=0
:11→X
:If J=1
:10→X
:If J=2
:4→X
:If J=3
:4→X
:If J=4
:14→X
:If J=5
:6→X
:If J=6
:4→X
:If J=7
:4→X
:If J=8
:4→X
:If J=9
:13→X
:If J=10
:3→X
:If J=11
:6→X
:If J=12
:11→X
:If J=13
:6→X
:End
:If K=23
:Then
:If J={-}12
:4→X
:If J={-}11
:11→X
:If J={-}10
:10→X
:If J={-}9
:7→X
:If J={-}8
:4→X
:If J={-}7
:7→X
:If J={-}6
:4→X
:If J={-}5
:4→X
:If J={-}4
:4→X
:If J={-}3
:14→X
:If J={-}2
:10→X
:If J={-}1
:5→X
:If J=0
:6→X
:If J=1
:4→X
:If J=2
:5→X
:If J=3
:6→X
:If J=4
:11→X
:If J=5
:10→X
:If J=6
:7→X
:If J=7
:5→X
:If J=8
:6→X
:If J=9
:5→X
:If J=10
:2→X
:If J=11
:9→X
:If J=12
:2→X
:If J=13
:10→X
:End
:If K=24
:Then
:If J={-}12
:5→X
:If J={-}11
:6→X
:If J={-}10
:5→X
:If J={-}9
:9→X
:If J={-}8
:1→X
:If J={-}7
:11→X
:If J={-}6
:6→X
:If J={-}5
:4→X
:If J={-}4
:3→X
:If J={-}3
:10→X
:If J={-}2
:5→X
:If J={-}1
:9→X
:If J=0
:9→X
:If J=1
:1→X
:If J=2
:11→X
:If J=3
:9→X
:If J=4
:6→X
:If J=5
:5→X
:If J=6
:10→X
:If J=7
:11→X
:If J=8 or J=9 or J=10 or J=11 or J=12
:9→X
:If J=13
:1→X
:End
:If K=25
:Then
:If J={-}12
:11→X
:If J={-}11
:12→X
:If J={-}10
:11→X
:If J={-}9
:10→X
:If J={-}8
:4→X
:If J={-}7
:4→X
:If J={-}6
:11→X
:If J={-}5
:6→X
:If J={-}4
:4→X
:If J={-}3
:4→X
:If J={-}2
:11→X
:If J={-}1
:9→X
:If J=0
:10→X
:If J=1
:7→X
:If J=2
:5→X
:If J=3
:9→X
:If J=4
:9→X
:If J=5
:10→X
:If J=6
:4→X
:If J=7
:5→X
:If J=8
:9→X
:If J=9
:10→X
:If J=10
:11→X
:If J=11
:9→X
:If J=12
:9→X
:If J=13
:1→X
:End
:If K=26
:Then
:If J={-}12
:3→X
:If J={-}11
:9→X
:If J={-}10
:6→X
:If J={-}9
:5→X
:If J={-}8
:6→X
:If J={-}7
:4→X
:If J={-}6
:4→X
:If J={-}5
:11→X
:If J={-}4
:6→X
:If J={-}3
:5→X
:If J={-}2
:6→X
:If J={-}1
:11→X
:If J=0
:6→X
:If J=1
:11→X
:If J=2
:10→X
:If J=3
:11→X
:If J=4
:10→X
:If J=5
:4→X
:If J=6
:5→X
:If J=7
:10→X
:If J=8
:13→X
:If J=9
:4→X
:If J=10
:4→X
:If J=11
:11→X
:If J=12
:9→X
:If J=13
:6→X
:End
:If K=27
:Then
:If J={-}12
:5→X
:If J={-}11
:8→X
:If J={-}10
:9→X
:If J={-}9
:9→X
:If J={-}8
:12→X
:If J={-}7
:5→X
:If J={-}6
:6→X
:If J={-}5
:5→X
:If J={-}4
:9→X
:If J={-}3
:9→X
:If J={-}2
:12→X
:If J={-}1
:5→X
:If J=0
:9→X
:If J=1
:6→X
:If J=2
:5→X
:If J=3
:6→X
:If J=4
:5→X
:If J=5
:6→X
:If J=6
:14→X
:If J=7
:6→X
:If J=8
:5→X
:If J=9
:6→X
:If J=10
:5→X
:If J=11
:2→X
:If J=12
:9→X
:If J=13
:12→X
:End
:If K=28 and J={-}11
:7→X
:If K=28
:0→X
:If Q-13=J and R=K
:S→X
:If Q=27 and X=R
:Then
:If S≠15
:S→X
:If S=15
:randInt(0,14)→X
:End
:X+Z→Z
:Goto 2
Austin Allman