source code

doodledill21 01 Nov 2019 19:52

I don't know how to put source code onto the site so I just put it here instead:p

```
ClrHome
0->A
.3->B
.7->F
Lbl 6
Disp "BUZZ FOR?-(0 NOT"
Input "T0 BUZZ):",C
Disp "FIZZ FOR?-(0 NOT"
Input "TO FIZZ):",D
If (C<0)+(C>9)+(D<0)+(D>9)>0
Goto 6
ClrHome
If C!=0
Disp "B FOR BUZZ"
If D!=0
Disp "F FOR FIZZ"
Disp "START COUNTING","GO!"
Lbl 1
A+1->A
Input E
0->G
If C=0
Goto 3
If A/C=int((A/C)
B->G
A/10->H
Lbl 2
If fPart(H=C/10
B->G
iPart(H->I
If I=0
Goto 3
I/10->H
Goto 2
Lbl 3
0->H
If D=0
Goto 5
If A/D=int((A/D)
F->H
A/10->I
Lbl 4
If fPart(I=D/10
F->H
iPart(I->J
If J=0
Goto 5
J/10->I
Goto 4
Lbl 5
A->I
If G=B
G->I
If H=F
H->I
If GH=BF
GH->I
If I=E
Goto 1
Disp "WRONG!","YOU LOSE!"
Stop
```

DoodleDill21