Wheel of Fortune -- For TI-84+CE

You have not uploaded your program! Please edit the page to upload your program.

Author: a_bretherino Download: WHEEL-1-0-2.zipNo Download Available Version: 1.0.2 Compatibility: TI-84+ CE File Size: 26639 Bytes Genre: Arcade Graphics Platform Puzzle RPG Strategy Sports Casino Board Utility Misc Rating:
Completely TI BASIC Wheel of Fortune game show for 2-3 people with expansion pack and puzzle adder program! Independent game: no other software required! Requires TI-84+CE for 26x10 home screen display and RAM space.

What the community thinks:

Source Code

Myles_Zadok 11 Oct 2017 22:51

Here is the source code for the game. Credits to a_bretherino for making this game.

Lbl U
Menu("WHEEL OF FORTUNE","NEW",Z,"NO TOSS UPS",Y,"RESUME",D,"SETTINGS",S
Lbl S
Menu("XPANTION?","YES",W,"NO",V
Lbl W
1→⌊θWLS(1)
Goto U

Lbl V
0→⌊θWLS(1)
Goto U

Lbl Y
1→Z
Goto X

Lbl Z
0→Z
Goto X

Lbl X
ClrHome
Output(5,4,"IT'S AMERICA'S GAME"
For(A,1,1800
End
1→R
1→T
0→S
randInt(1,24)→D
{0,0,0,0,0,0,0}→⌊SCR
{0,0,0}→⌊OUT
{0,0,0,0,0}→⌊MISC
{500,900,700,600,800,500,700,4,600,550,500,900,­1,650,1,700,0,800,2,650,500,900,­1,3}→⌊WHL

"                                        ABC       DEFGH     IJKLM     NOPQR     STUVW     XYZ       "→Str5
" "→Str6
For(A,1,25
Str6+" "→Str6
End
ClrHome
"WHEEL"→Str1
For(A,1,length(Str1))
Output(3,A+10,sub(Str1,A,1))
For(B,1,25
End
End
For(A,1,25
Str6+" "→Str6
End
For(A,1,800
End
"OF"→Str1
For(A,1,length(Str1))
Output(6,A+12,sub(Str1,A,1))
For(B,1,25
End
End
For(A,1,25
Str6+" "→Str6
End
For(A,1,800
End
"FORTUNE!"→Str1
For(A,1,length(Str1))
Output(9,A+9,sub(Str1,A,1))
For(B,1,25
End
End
For(A,1,25
Str6+" "→Str6
End
For(A,1,800
Str6→Str9
ClrHome
Disp "WHEEL OF FORTUNE"
Input "PLAYER 1: ",Str1
Input "PLAYER 2: ",Str2
Input "PLAYER 3: ",Str3
ClrHome
Goto C
Lbl T
While 1
getKey→A
randInt(5,22)→⌊MISC(1)
randInt(1,4)→⌊MISC(2)
If [A](⌊MISC(2),⌊MISC(1))=0:Then
Goto T
End
For(B,1,10
getKey→A
If A=11 and ⌊OUT(1)≠1:Then
1→T
Disp Str1
Goto G
End
If A=15 and ⌊OUT(3)≠1:Then
3→T
Disp Str3
Goto G
End
If A=103 and ⌊OUT(2)≠1:Then
2→T
Disp Str2
Goto G
End
End
[A](⌊MISC(2),⌊MISC(1))→A

Output(⌊MISC(2),⌊MISC(1),sub(Str5,A,1))
End
Lbl G
Output(7,1,"                          "
Input Str7
If Str4=Str7:Then
If R=1 or R=9:Then
⌊SCR(T)+1000→⌊SCR(T)
Disp 1000
End
If R=2:Then
⌊SCR(T)+2000→⌊SCR(T)
Disp 2000
End
If R=3:Then
⌊SCR(T)+3000→⌊SCR(T)
Disp 3000
End
R+1→R
{0,0,0}→⌊OUT
Goto C
Else
1→⌊OUT(T)
Goto D
End
Lbl N
If T>3:Then
T-3→T
End
If T=1:Then
Output(5,1,Str1
If Str1="BRIAN":Then
Output(7,6,"4.GARBAGE"
1→⌊MISC(3)
Else
0→⌊MISC(3)
End
End
If T=2:Then
Output(5,1,Str2
If Str2="BRIAN":Then
Output(7,6,"4.GARBAGE"
1→⌊MISC(3)
Else
0→⌊MISC(3)
End
End
If T=3:Then
Output(5,1,Str3
If Str3="BRIAN":Then
Output(7,4,"4.GARBAGE"
1→⌊MISC(3)
Else
0→⌊MISC(3)
End
End
Output(6,1,"1.SPIN 2.SOLVE 3.VOWEL"
Output(8,1,⌊SCR(T)+⌊SCR(T+3))
While 1
getKey→A
While A
If A=82 and ⌊MISC(3)=1:Then
GarbageCollect
End
If A=92:Then
Lbl S
Output(6,1,"                                                    "
randInt(20,28)→C
For(B,1,C
D+1→D
If D>24:Then
1→D
End
Output(6,5,"                      "
⌊WHL(D)→S
0→E
If S=­1:Then
Output(6,5,"BANKRUPT"
1→E
End
If S=0:Then
Output(6,5,"LOSE A TURN"
1→E
End
If S=1:Then
Output(6,5,"FREE PLAY"
1→E
End
If S=2:Then
Output(6,5,"TRIP TO HAWAII"
13254→S
1→E
End
If S=3:Then
If R=3:Then
Output(6,5,"2500"
2500→S
End
If R=4:Then
Output(6,5,"3500"
3500→S
End
If R≥5:Then
Output(6,5,"5000"
5000→S
End
1→E
End
If S=4:Then
If randInt(1,3)=2 and ⌊SCR(7)=0:Then
Output(6,5,"MILLION"
Else
Output(6,5,"BANKRUPT"
­1→S
End
1→E
End
If E=0:Then
Output(6,5,S
End
For(E,1,15B)
End
End
If R=8:Then
S+1000→S
Goto L
End
0→E
If S=­1:Then
0→⌊SCR(T+3)
T+1→T
Goto D
End
If S=0:Then
T+1→T
Goto D
End
If S=1:Then
200→S
End

Lbl L
Output(6,1,"                          "
Output(7,1,S
If S=­1:Then
Output(7,1,"BANKRUPT"
End
If S=0:Then
Output(7,1,"LOSE A TURN"
End
If S=200:Then
Output(7,1,"FREE PLAY"
End
If S=13254:Then
Output(7,1,"TRIP TO HAWAII"
End
If S=4:Then
Output(7,1,"MILLION"
End
Output(5,1,"   "
If T=1:Then
Output(5,1,Str1
End
If T=2:Then
Output(5,1,Str2
End
If T=3:Then
Output(5,1,Str3
End
Output(6,1,"CHOOSE A LETTER"
While 1
getKey→A
While A
If A=41 or A=52 or A=61 or A=72 or A=83:Then
If S=200:Then
0→S
End
End

0→N
Lbl I
If sub(Str6,A,1)="^":Then
0→S
End
sub(Str6,1,A-1)+"^"+sub(Str6,A+1,100-A)→Str6
For(C,1,4
For(B,4,22
If [A](C,B)=A:Then
Output(C,B,sub(Str5,A,1))
sub(Str6,1,A-1)+"^"+sub(Str6,A+1,100-A)→Str6
N+1→N
End
End
End
If N>0:Then
0→E
If S=13254:Then
⌊SCR(T+3)+S→⌊SCR(T+3)
1→E
End
If S=4:Then
T→⌊SCR(7)
1→E
End
If A=41 or A=52 or A=61 or A=72 or A=83:Then
1→E
End
If E=0:Then
⌊SCR(T+3)+NS→⌊SCR(T+3)
End
Output(8,1,⌊SCR(T+3))
End
If R=8:Then
If N>0:Then
Output(6,1,"                                                    "
Input "GUESS: ",Str7
If Str7=Str4:Then
⌊SCR(T)+⌊SCR(T+3)→⌊SCR(T)
0→⌊SCR(T+3)
R+1→R
Goto C
End
End
T+1→T
1→⌊MISC(4)
Goto D
End
If N=0 and S≠200:Then
T+1→T
End
Goto D
End
End
End
If A=93:Then
Output(6,1,"                                                    "
Input "GUESS: ",Str7
If Str7=Str4:Then
For(E,1,3
⌊SCR(E)+⌊SCR(E+3)→⌊SCR(E)
End
⌊SCR(T)+1000→⌊SCR(T)
If R=5:Then
⌊SCR(T)+15078→⌊SCR(T)
End
R+1→R
Goto C
End
T+1→T
Goto D
End
If A=94:Then
If ⌊SCR(T+3)≥250:Then
⌊SCR(T+3)-250→⌊SCR(T+3)
Output(6,1,"                                                    "
Output(6,2,"1.A  2.E  3.I  4.O  5.U"
While 1
getKey→A
While A
If A=92:Then
41→A
End
If A=93:Then
52→A
End
If A=94:Then
61→A
End
If A=82:Then
72→A
End
If A=83:Then
83→A
End
0→S
Goto I
End
End
End
End
getKey→A
End
End
Lbl F
Output(5,1,"PAT"
Goto S
Lbl B
If T=1:Then
Output(5,1,Str1
End
If T=2:Then
Output(5,1,Str2
End
If T=3:Then
Output(5,1,Str3
End
{75,81,82,64,71,52}→⌊BON
Output(7,1,"RSTLNE"
For(E,1,6
For(C,1,4
For(D,5,20
If ⌊BON(E)=[A](C,D):Then
Output(C,D,sub(Str5,⌊BON(E),1))
End
End
End
End
{0,0,0,0}→⌊CHOS
Output(6,1,"CHOOSE A LETTER"
1→E
While E≤3
getKey→A
While A
A→⌊CHOS(E)
Output(8,E,sub(Str5,A,1))
E+1→E
getKey→A
End
End
1→E
While E
getKey→A
While A
If A=41 or A=52 or A=61 or A=72 or A=83:Then
Output(8,4,sub(Str5,A,1))
A→⌊CHOS(4)
End
getKey→A
0→E
End
End
For(E,1,4
For(C,1,4
For(D,5,20
If ⌊CHOS(E)=[A](C,D):Then
Output(C,D,sub(Str5,⌊CHOS(E),1))
End
End
End
End
For(B,1,4
Output(6,1,"                                                                              "
Input Str7
If Str7=Str4:Then
Goto W
End
End
Goto M
Lbl W
For(A,1,7
Disp " "
End
ClrHome
If T=1:Then
Output(3,8,Str1+","
End
If T=2:Then
Output(3,8,Str2+","
End
If T=3:Then
Output(3,8,Str3+","
End
Output(4,7,"YOU'VE WON"
0→E
randInt(1,20)→C
If C=1:Then
Output(5,9,"A CAR"
1→E
End
If C>1 and C<8:Then
Output(5,9,"40000"
Output(6,8,"DOLLARS"
S+40000→S
1→E
End
If randInt(1,50)=1:Then
Output(5,8,"100000"
If ⌊SCR(7)=T:Then
Output(5,14,"0"
S+900000
End
Output(6,8,"DOLLARS"
S+100000→S
1→E
End
If E=0:Then
Output(5,9,"32000"
Output(6,8,"DOLLARS"
S+32000→S
End
S+⌊SCR(1)→⌊SCR(1)
Goto E
Lbl M
Lbl E
Output(7,7,"YOU ENDED UP"
Output(8,7,"WITH"
Output(8,12,⌊SCR(T)
Stop
Lbl D
For(A,1,2)
If R=1 or R=2 or R=6 or R=9:Then
If Z=1:Then
R+1→R
End
End
End
If T>3:Then
T-3→T
End
If T=1 and Str1="OUT":Then
T+1→T
End
If T=2 and Str2="OUT":Then
T+1→T
End
If T=3 and Str3="OUT":Then
T+1→T
End
If T>3:Then
T-3→T
End
ClrHome
0→B
If R=1 or R=2 or R=6 or R=9:Then
Else
If T=1:Then
Output(2,4,Str1
End
If T=2:Then
Output(2,4,Str2
End
If T=3:Then
Output(2,4,Str3
End
End
If R=1 or R=9:Then
Output(3,8,"1000"
End
If R=2:Then
Output(3,8,"2000"
End
If R=6:Then
Output(3,8,"3000"
End
If R=1 or R=2 or R=6:Then
Output(4,7,"TOSS UP"
End
If R=3 or R=4 or R=7:Then
Output(4,6,"NORMAL ROUND"
End
If R=5:Then
Output(4,6,"PRIZE PUZZLE"
End
If R=10:Then
Output(4,6,"BONUS ROUND"
End
Output(5,7,"PRESS ANY KEY             TO CONTINUE"
If R≠8:Then
While B=0
getKey→A
If A≠0:Then
1→B
End
End
End
ClrHome
Disp " "
Disp " "
Disp " "
Disp " "
Disp " "
Output(1,1,"(((((                )))))((((                  ))))((((                  ))))(((((                )))))"

For(C,1,4
For(B,5,21
If [A](C,B)≠0:Then
Output(C,B,"-"
If sub(Str6,[A](C,B),1)="^":Then
Output(C,B,sub(Str5,[A](C,B),1))
End
End
End
End
Output(5,13,Str8
Output(9,1,sub(Str5,41,5
Output(10,1,sub(Str6,41,5
51→B
4→C
While B<86
Output(9,C,sub(Str5,B,5))
Output(10,C,sub(Str6,B,5))
B+10→B
C+5→C
End
Output(9,24,sub(Str5,91,3))
Output(10,24,sub(Str6,91,3))
If R=9:Then
If ⌊SCR(1)=⌊SCR(2) or ⌊SCR(2)=⌊SCR(3) or ⌊SCR(1)=⌊SCR(3):Then
Else
R+1→R
End
End
If R=1 or R=2 or R=6 or R=9:Then
Goto T
End
If R=3 or R=4 or R=5 or R=7:Then
Goto N
End
If R=8:Then
If ⌊MISC(4)=0:Then
Goto F
Else
Goto L
End
End
If R=10:Then
Goto B
End
End
Lbl C
If ⌊θWLS(1)=1:Then
prgmθWHEEL1
Goto D
End
0→C
0→D
Str9→Str6
If R=10:Then
⌊SCR→L₁
SortD(⌊SCR
For(A,1,3
If ⌊SCR(1)=L₁(A):Then
A→T
End
End
randInt(1,26)→D
Else
randInt(1,45)→C
End
If C=1:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,73,75,52,82,82,92,0,41,81,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,41,0,73,52,41,43,55,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"PRETTY AS A PEACH"→Str4
"PHRASE"→Str8
End
If C=2:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,71,52,85,0,92,72,75,63,0,0,0,0,A,0,0,0,0][0,0,0,0,0,0,0,0,0,0,92,41,71,63,52,52,81,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"NEW YORK YANKEES"→Str4
"AMERICANA"→Str8
End
If C=3:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,54,52,72,75,54,52,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,85,41,81,55,61,71,54,82,72,71,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,65,72,71,83,65,52,71,82,0,0,0,0,0,0,0,0,0]]→[A]
"GEORGE WASHINGTON MONUMENT"→Str4
"BEFORE/AFTER"→Str8
End
If C=4:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,41,71,0,41,91,52,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,82,72,0,54,75,61,71,51,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"AN AXE TO GRIND"→Str4
"PHRASE"→Str8
End
If C=5 or D=1:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,41,0,81,72,43,63,0,85,61,82,55,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,55,72,64,52,81,0,61,71,0,61,82,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"A SOCK WITH HOLES IN IT"→Str4
"AROUND/HOUSE"→Str8
End
If C=6 or D=2:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,41,71,82,61,74,83,52,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,42,41,82,55,82,83,42,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"ANTIQUE BATHTUB"→Str4
"AROUND/HOUSE"→Str8
End
If C=7:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,41,65,52,75,61,43,41,71,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,52,91,73,75,52,81,81,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,92,72,83,75,81,52,64,53,0,0,0,0,0,0,0,0,0,0]]→[A]
"AMERICAN EXPRESS YOURSELF"→Str4
"BEFORE/AFTER"→Str8
End
If C=8:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,54,55,72,81,82,42,83,81,82,52,75,81,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"GHOSTBUSTERS"→Str4
"MOVIE"→Str8
End
If C=9 or D=3:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,42,61,54,0,81,41,64,52,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"BIG SALE"→Str4
"EVENT"→Str8
End
If C=10 or D=4:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,52,91,43,61,82,61,71,54,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,52,91,73,52,51,61,82,61,72,71,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"EXCITING EXPEDITION"→Str4
"EVENT"→Str8
End
If C=11 or D=5:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,71,53,64,0,51,75,41,53,82,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"NFL DRAFT"→Str4
"EVENT"→Str8
End
If C=12:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,53,75,61,52,51,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,65,72,93,93,41,75,52,64,64,41,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,81,82,61,43,63,81,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"FRIED MOZZARELLA STICKS"→Str4
"FOOD/DRINK"→Str8
End
If C=13:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,55,72,71,52,92,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,65,83,81,82,41,75,51,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,51,75,52,81,81,61,71,54,0,0,0,0,0,0,0,0,0]]→[A]
"HONEY MUSTARD DRESSING"→Str4
"FOOD/DRINK"→Str8
End
If C=14:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,41,0,51,72,54,0,43,55,41,81,61,71,54,0,0,0,0,0,0][0,0,0,0,0,0,0,61,82,81,0,82,41,61,64,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"A DOG CHASING ITS TAIL"→Str4
"L THING"→Str8
End
If C=15 or D=6:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,53,61,52,64,51,0,65,72,83,81,52,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"FIELD MOUSE"→Str4
"L THING"→Str8
End
If C=16:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,41,64,42,83,74,83,52,75,74,83,52,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,71,52,85,0,65,52,91,61,43,72,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"ALBUQUERQUE NEW MEXICO"→Str4
"ON THE MAP"→Str8
End
If C=17 or D=7:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,65,61,71,71,52,41,73,72,64,61,81,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,65,61,71,71,52,81,72,82,41,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"MINNEAPOLIS MINNESOTA"→Str4
"ON THE MAP"→Str8
End
If C=18 or D=8:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,41,43,43,52,73,82,61,71,54,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,82,55,52,0,42,64,41,65,52,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"ACCEPTING THE BLAME"→Str4
"WHAT/DOING?"→Str8
End
If C=45 or D=9:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,43,55,52,43,63,61,71,54,0,65,92,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,52,65,41,61,64,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"CHECKING MY EMAIL"→Str4
"WHAT/DOING?"→Str8
End
If C=19:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,53,41,65,61,64,92,0,71,61,54,5,82,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"FAMILY NIGHT"→Str4
"EVENT"→Str8
End
If C=20:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,42,41,82,65,41,71,0,41,71,51,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,82,55,52,0,62,72,63,52,75,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"BATMAN AND THE JOKER"→Str4
"PEOPLE"→Str8
End
If C=21:Then
[[0,0,0,0,0,0,0,0,53,83,71,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,53,75,83,61,82,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,53,64,41,84,72,75,52,51,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,53,75,72,81,82,61,71,54,0,0,0,0,0,0,0,0,0,0]]→[A]
"FUN FRUIT FLAVORED FROSTING"→Str4
"SAME LETTER"→Str8
End
If C=22 or D=10:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,43,81,0,64,52,85,61,81,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"CS LEWIS"→Str4
"PERSON"→Str8
End
If C=23:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,64,61,63,52,0,41,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,43,55,75,61,81,82,65,41,81,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,82,75,52,52,0,81,82,41,71,51,0,0,0,0,0,0,0,0]]→[A]
"LIKE A CHRISTMAS TREE STAND"→Str4
"BEFORE/AFTER"→Str8
End
If C=24:Then
[[0,0,0,0,0,0,0,71,52,43,52,81,81,61,82,92,0,61,81,0,0,0,0,0,0,0][0,0,0,0,0,0,0,82,55,52,0,65,72,82,55,52,75,0,72,53,0,0,0,0,0,0][0,0,0,0,0,0,0,61,71,84,52,71,82,61,72,71,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"NECESSITY IS THE MOTHER OF INVENTION"→Str4
"PHRASE"→Str8
End
If C=25:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,41,81,0,41,65,52,75,61,43,41,71,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,41,81,0,41,73,73,64,52,0,73,61,52,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"AS AMERICAN AS APPLE PIE"→Str4
"PHRASE"→Str8
End
If D=11:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,81,83,65,65,72,75,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,42,75,52,41,63,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"SUMMER BREAK"→Str4
"EVENT"→Str8
End
If C=26:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,41,0,81,55,52,64,53,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,53,83,64,64,0,72,53,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,63,71,61,43,63,63,71,41,43,63,81,0,0,0,0,0,0,0,0]]→[A]
"A SHELF FULL OF KNICKKNACKS"→Str4
"AROUND/HOUSE"→Str8
End
If C=27 or D=12:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,42,41,82,55,75,72,72,65,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,43,64,52,41,71,52,75,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"BATHROOM CLEANER"→Str4
"AROUND/HOUSE"→Str8
End
If C=28 or D=13:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,43,72,64,72,75,53,83,64,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,51,52,43,72,75,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"COLORFUL DECOR"→Str4
"AROUND/HOUSE"→Str8
End
If C=29 or D=14:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,73,41,82,43,55,85,72,75,63,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,74,83,61,64,82,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"PATCHWORK QUILT"→Str4
"AROUND/HOUSE"→Str8
End
If C=30:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,82,55,83,71,51,52,75,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,81,55,72,85,52,75,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"THUNDER SHOWER"→Str4
"EVENT"→Str8
End
If C=44 or D=15:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,65,41,64,64,0,72,53,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,41,65,52,75,61,43,41,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"MALL OF AMERICA"→Str4
"PLACE"→Str8
End
If C=31 or D=16:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,82,41,93,0,64,61,64,41,0,41,71,51,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,43,72,64,64,52,82,82,52,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"TAZ LILA AND COLLETTE"→Str4
"PEOPLE"→Str8
End
If C=32 or D=17:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,41,42,75,41,55,41,64,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,64,61,71,43,72,64,71,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"ABRAHAM LINCOLN"→Str4
"PERSON"→Str8
End
If C=33 or D=18:Then
[[0,0,0,0,0,0,0,0,82,52,52,71,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,65,61,81,81,61,72,71,81,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,61,71,82,52,75,71,41,82,61,72,71,41,64,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"TEEN MISSIONS INTERNATIONAL"→Str4
"PLACE"→Str8
End
If C=34 or C=19:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,72,75,64,41,71,51,72,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,53,64,72,75,61,51,41,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"ORLANDO FLORIDA"→Str4
"PLACE"→Str8
End
If C=35 or D=20:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,64,72,71,54,0,43,41,75,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,75,61,51,52,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"LONG CAR RIDE"→Str4
"EVENT"→Str8
End
If C=36 or D=21:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,54,52,72,75,54,52,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,85,41,81,55,61,72,54,82,72,71,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"GEORGE WASHINGTON"→Str4
"PERSON"→Str8
End
If C=37 or D=22:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,52,64,84,61,81,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,73,75,52,81,64,52,92,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"ELVIS PRESLEY"→Str4
"PERSON"→Str8
End
If C=38 or D=23:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,81,72,51,41,73,41,64,72,72,93,41,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"SODAPALOOZA"→Str4
"EVENT"→Str8
End
If C=39:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,81,61,91,0,53,64,41,54,81,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,72,84,52,75,0,82,52,91,41,81,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"SIX FLAGS OVER TEXAS"→Str4
"PLACE"→Str8
End
If C=40 or D=24:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,85,41,64,82,0,51,61,81,71,52,92,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,85,72,75,64,51,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"WALT DISNEY WORLD"→Str4
"PLACE"→Str8
End
If C=41 or D=25:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,81,52,41,0,85,72,75,64,51,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"SEA WORLD"→Str4
"PLACE"→Str8
End
If C=42 or D=26:Then
[[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,81,41,71,0,41,71,82,72,71,61,72,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0][0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]]→[A]
"SAN ANTONIO"→Str4
"PLACE"→Str8
End
Goto D

die

WhitehandWeasel 14 Jan 2018 00:43

it needs to be in .8xp format.

Re: die

jonbush 14 Jan 2018 05:05

If you use TI Connect CE to transfer the group (WOFF.8xg) to your calculator, it will automatically send the individual files. If you use an earlier version, or TiLP, you will need to ungroup it manually on the calculator. To do this, press [2ND][+][8][right] then select the group from the list.