Here is the first game I've ever made in programming. Let's see how much optimization can be made…

```
:ClrHome
:Lbl 0
:Menu("Equation Game!","Level 1",1,"Level 2",2,"Level 3",3,"Level 4",4,"Level 5",5,"Extreme",6,"Ultimate",7)
:Lbl 1
:int(10rand)→A
:int(10rand)→B
:int(10rand)→C
:Disp "Numbers"
:Disp A
:Disp B
:Disp "Answer"
:Disp C
:Disp "Equation?"
:Prompt E
:If E=C
:Disp "You Win!"
:If E≠C
:Disp "You Lose"
:Pause
:Menu("Select","Again",1,"Menu",0,"Quit",Q)
:Lbl 2
:int(20rand)→A
:int(20rand)→B
:int(20rand)→C
:Disp "Numbers"
:Disp A
:Disp B
:Disp "Answer"
:Disp C
:Disp "Equation?"
:Prompt E
:If E=C
:Disp "You Win!"
:If E≠C
:Disp "You Lose"
:Pause
:Menu("Select","Again",2,"Menu",0,"Quit",Q)
:Lbl 3
:int(10rand)→A
:int(10rand)→B
:int(10rand)→C
:int(20rand)→D
:Disp "Numbers"
:Disp A
:Disp B
:Disp C
:Disp "Answer"
:Disp D
:Disp "Equation?"
:Prompt E
:If E=D
:Disp "You Win!"
:If E≠D
:Disp "You Lose"
:Pause
:Menu("Select","Again",3,"Menu",0,"Quit",Q)
:Lbl 4
:10+int(‾20rand)→A
:10+int(‾20rand)→B
:10+int(‾20rand)→C
:Disp "Numbers"
:Disp A
:Disp B
:Disp "Answer"
:Disp C
:Disp "Equation?"
:Prompt E
:If E=C
:Disp "You Win!"
:If E≠C
:Disp "You Lose"
:Pause
:Menu("Select","Again",4,"Menu",0,"Quit",Q)
:Lbl 5
:int(20rand)→A
:int(20rand)→B
:int(500rand)→C
:Disp "Numbers"
:Disp A
:Disp B
:Disp "Answer"
:Disp C
:Disp "Equation?"
:Prompt E
:If E=C
:Disp "You Win!"
:If E≠C
:Disp "You Lose"
:Pause
:Menu("Select","Again",5,"Menu",0,"Quit",Q)
:Lbl 6
:int(2rand)→A
:int(10rand)→B
:int(10rand)→C
:int(10rand)→D
:If A=1
:Disp "Use Only +-*/^"
:If A=0
:Disp "Use Only +-()√("
:Disp "Numbers"
:Disp A
:Disp B
:Disp "Answer"
:Disp C
:Disp "Equation?"
:Prompt E
:If E=C
:Disp "You Win!"
:If E≠C
:Disp "You Lose"
:Pause
:Menu("Select","Again",6,"Menu",0,"Quit",Q)
:Lbl 7
:int(10rand)→A
:int(10rand)→B
:int(10rand)→C
:int(10rand)→D
:int(10rand)→F
:int(10rand)→G
:Disp "Numbers"
:Disp A+Bi
:Disp C+Di
:Disp 2
:Disp "Answer"
:Disp F+Gi
:Disp "Equation?"
:Prompt E
:If real(E)=F and imag(E)=G
:Disp "You Win!"
:If real(E)≠F and imag(E)≠G
:Disp "You Lose"
:Pause
:Menu("Select","Again",7,"Menu",0,"Quit",Q)
:Lbl Q
:Clrhome
```

Ugly or what?

Timothy Foster - @tfAuroratide

Auroratide.com - Go here if you're nerdy like me