I Finally got this program to work. It doesn't run very well, but it is working.

```
PROGRAM:CYCLONE
If Y=1:Then
Goto B:Else
Goto A:End
Lbl A
If Î¸=0:Goto 0
If Î¸=1:Goto 1
If Î¸=2:Goto 2
If Î¸=3:Goto 3
If Î¸=4:Goto 4
If Î¸=5:Goto 5
If Î¸=6:Goto 6
If Î¸=7:Goto 7
If Î¸=8:Goto 8
If Î¸=9:Goto 9
If Î¸=10:Goto 10
If Î¸=11:Goto 11
If Î¸=12:Goto 12
If Î¸=13:Goto 13
If Î¸=14:Goto 14
If Î¸=15:Goto 15
If Î¸=16:Goto 16
If Î¸=17:Goto 17
If Î¸=18:Goto 18
If Î¸=19:Goto 19
If Î¸=20:Goto 20
If Î¸=21:Goto 21
If Î¸=22:Goto 22
If Î¸=23:Goto 23
If Î¸=24:Goto 24
If Î¸=25:Goto 25
If Î¸=26:Goto 26
If Î¸=27:Goto 27
If Î¸=28:Goto 28
If Î¸=29:Goto 29
If Î¸=30:Goto 30
If Î¸=31:Goto 31
If Î¸=32:Goto 32
If Î¸=33:Goto 33
If Î¸=34:Goto 34
If Î¸=35:Goto 35
If Î¸=36:Goto 36
If Î¸=37:Goto 37
If Î¸=38:Goto 38
If Î¸=39:Goto 39
If Î¸=40:Goto 40
If Î¸=41:Goto 41
If Î¸=42:Goto 42
If Î¸=43:Goto 43
If Î¸=44:Goto 44
Lbl 0
ClrHome
Output(2,3,"-----^------
Output(3,2,"!
Output(4,2,"!
Output(5,2,"!
Output(6,2,"!
Output(3,15,"!
Output(4,15,"!
Output(5,15,"!
Output(6,15,"!
Output(7,3,"------------
0âX
Repeat X=105
Lbl 1:2âÎ¸:0âZ
Output(1,8,"
Output(1,9,"Â°
prgmÎ¸CHECK
Lbl 2:3âÎ¸
Output(1,9,"
Output(1,10,"Â°
prgmÎ¸CHECK
Lbl 3:4âÎ¸
Output(1,10,"
Output(1,11,"Â°
prgmÎ¸CHECK
Lbl 4:5âÎ¸
Output(1,11,"
Output(1,12,"Â°
prgmÎ¸CHECK
Lbl 5:6âÎ¸
Output(1,12,"
Output(1,13,"Â°
prgmÎ¸CHECK
Lbl 6:7âÎ¸
Output(1,13,"
Output(1,14,"Â°
prgmÎ¸CHECK
Lbl 7:8âÎ¸
Output(1,14,"
Output(1,15,"Â°
prgmÎ¸CHECK
Lbl 8:9âÎ¸
Output(1,15,"
Output(1,16,"Â°
prgmÎ¸CHECK
Lbl 9:10âÎ¸
Output(1,16,"
Output(2,16,"Â°
prgmÎ¸CHECK
Lbl 10:11âÎ¸
Output(2,16,"
Output(3,16,"Â°
prgmÎ¸CHECK
Lbl 11:12âÎ¸
Output(3,16,"
Output(4,16,"Â°
prgmÎ¸CHECK
Lbl 12:13âÎ¸
Output(4,16,"
Output(5,16,"Â°
prgmÎ¸CHECK
Lbl 13:14âÎ¸
Output(5,16,"
Output(6,16,"Â°
prgmÎ¸CHECK
Lbl 14:15âÎ¸
Output(6,16,"
Output(7,16,"Â°
prgmÎ¸CHECK
Lbl 15:16âÎ¸
Output(7,16,"
Output(8,16,"Â°
prgmÎ¸CHECK
Lbl 16:17âÎ¸
Output(8,16,"
Output(8,15,"Â°
prgmÎ¸CHECK
Lbl 17:18âÎ¸
Output(8,15,"
Output(8,14,"Â°
prgmÎ¸CHECK
Lbl 18:19âÎ¸
Output(8,14,"
Output(8,13,"Â°
prgmÎ¸CHECK
Lbl 19:20âÎ¸
Output(8,13,"
Output(8,12,"Â°
prgmÎ¸CHECK
Lbl 20:21âÎ¸
Output(8,12,"
Output(8,11,"Â°
prgmÎ¸CHECK
Lbl 21:22âÎ¸
Output(8,11,"
Output(8,10,"Â°
prgmÎ¸CHECK
Lbl 22:23âÎ¸
Output(8,10,"
Output(8,9,"Â°
prgmÎ¸CHECK
Lbl 23:24âÎ¸
Output(8,9,"
Output(8,8,"Â°
prgmÎ¸CHECK
Lbl 24:25âÎ¸
Output(8,8,"
Output(8,7,"Â°
prgmÎ¸CHECK
Lbl 25:26âÎ¸
Output(8,7,"
Output(8,6,"Â°
prgmÎ¸CHECK
Lbl 26:27âÎ¸
Output(8,6,"
Output(8,5,"Â°
prgmÎ¸CHECK
Lbl 27:28âÎ¸
Output(8,5,"
Output(8,4,"Â°
prgmÎ¸CHECK
Lbl 28:29âÎ¸
Output(8,4,"
Output(8,3,"Â°
prgmÎ¸CHECK
Lbl 29:30âÎ¸
Output(8,3,"
Output(8,2,"Â°
prgmÎ¸CHECK
Lbl 30:31âÎ¸
Output(8,2,"
Output(8,1,"Â°
prgmÎ¸CHECK
Lbl 31:32âÎ¸
Output(8,1,"
Output(7,1,"Â°
prgmÎ¸CHECK
Lbl 32:33âÎ¸
Output(7,1,"
Output(6,1,"Â°
prgmÎ¸CHECK
Lbl 33:34âÎ¸
Output(6,1,"
Output(5,1,"Â°
prgmÎ¸CHECK
Lbl 34:35âÎ¸
Output(5,1,"
Output(4,1,"Â°
prgmÎ¸CHECK
Lbl 35:36âÎ¸
Output(4,1,"
Output(3,1,"Â°
prgmÎ¸CHECK
Lbl 36:37âÎ¸
Output(3,1,"
Output(2,1,"Â°
prgmÎ¸CHECK
Lbl 37:38âÎ¸
Output(2,1,"
Output(1,1,"Â°
prgmÎ¸CHECK
Lbl 38:39âÎ¸
Output(1,1,"
Output(1,2,"Â°
prgmÎ¸CHECK
Lbl 39:40âÎ¸
Output(1,2,"
Output(1,3,"Â°
prgmÎ¸CHECK
Lbl 40:41âÎ¸
Output(1,3,"
Output(1,4,"Â°
prgmÎ¸CHECK
Lbl 41:42âÎ¸
Output(1,4,"
Output(1,5,"Â°
prgmÎ¸CHECK
Lbl 42:43âÎ¸
Output(1,5,"
Output(1,6,"Â°
prgmÎ¸CHECK
Lbl 43:44âÎ¸
Output(1,6,"
Output(1,7,"Â°
prgmÎ¸CHECK
Lbl 44:1âÎ¸:1âZ
Output(1,7,"
Output(1,8,"Â°
prgmÎ¸CHECK
End
Lbl B
0âX:0âÎ¸:0âY
If Z=1:Then
Output(4,6,"WINNER
Else
Output(4,6,"LOSER
End:Stop
```