Bunny Gotchi ~ By James Kanjo

Forum Attachments

Summary:

At last, I have a computer-calculator cable, and I am able to transfer my programs!

Bunny Gotchi ~ By James Kanjo

GoVegan 03 Apr 2008 05:43

Here is my Bunny Gotchi program. In my release version, I have removed the unneccessary comments. I would really appreciate some feedback, and/or ideas for improvement/refactoring, that would be great. I have tried pretty hard to do so on my own, but keep in mind I made this program on the calculator, and it was hard to see ways of improving the program from an 8 by 16 character screen (while in programming mode, it is actually 7 by 16, even worse).

+ show block

ClrHome
0üG
ú1üU
SetUpEditor áBUNNY
20üdim(áBUNNY
SetUpEditor 

Output(1,4,"WELCOME TO
Output(3,3,"BUNNYGOTCHI!
Output(5,3,"VERSION: 1.0
Output(8,2,"BY JAMES KANJO
Pause 
ClrHome
Lbl ST
ClrHome
Menu("LOAD BUNNY","LOAD",LD,"CREATE NEW",N,"",ST,"HELP",HP,"QUIT",QT

Lbl LD
áBUNNY(19üÁ
If Á=1/3*ð(Ä
Goto 5B
Pause "NO FILE TO LOAD!
Goto ST

Lbl 5B
getKeyüÁ
áBUNNY(16üY
áBUNNY(14üW
If Á=43:Then
For(B,1,8
For(A,1,16
Output(B,A,"Ä
End:End:End
If Á=43
Goto 3B
Goto D

Lbl N
{100,100,0,0,1,1,0,5,0,0,100,0,0,1,0,0,1,0,0,0üáBUNNY
1/3*ð(ÄüáBUNNY(19
100üU
Lbl GS
Menu("CALCULATOR SPEED","TI-83,    FAST",83,"",GS,"TI-83 PLUS,MED",3P,"",GS,"TI-84,    SLOW",4P
Lbl 83
6üáBUNNY(16
6üY
Goto 5A
Lbl 3P
10üáBUNNY(16
10üY
Goto 5A
Lbl 4P
20üáBUNNY(16
20üY
Lbl 5A
If Uø100
Goto MF
1üU
Goto AF

Lbl D
Output(01,001,"MENU:PRESS ENTER                                                                                            ()()BUNNY'S MOOD

áBUNNY(14üÁ
If Á=0
"(++)üStr0
If Á=1
"(÷ù)üStr0
If Á=2
"(..)üStr0
If Á=3
"(^^)üStr0
If Á=4
"(,,)üStr0
If Á=5
"(--)üStr0
Output(8,13,Str0

áBUNNY(4üÁ
If Á=1
Output(03,014,")))             (((             MMM

áBUNNY(13üÁ
If Á=1
0üX
If Á=1
Goto D4
If Á=2
Goto D3

áBUNNY(12üÁ
If Á=1
0üX
If Á=1
Goto D2
Goto D1

Lbl D1
áBUNNY(11üX
For(Á,3,6
Output(Á,5,"()()
End
If X>40
Output(4,6,"..
If X÷40
Output(4,6,",,
rand(Y
getKeyüZ
If Z=105
Goto MF
For(Á,3,6
Output(Á,1,"()()     
End
If X>40
Output(4,2,"..
If X÷40
Output(4,2,",,
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
Output(4,2,"--
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
If X>40
Output(4,2,"..
If X÷40
Output(4,2,",,
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
For(Á,3,6
Output(Á,1,"    ()()
End
If X>40
Output(4,6,"..
If X÷40
Output(4,6,",,
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
For(Á,3,6
Output(Á,5,"    ()()
End
If X>40
Output(4,10,"..
If X÷40
Output(4,10,",,
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
If X>40
Output(4,10,"^^
If X÷40
Output(4,10,"--
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
If X>40
Output(4,10,"..
If X÷40
Output(4,10,",,
Goto AF

Lbl D2
Output(2,10,"Z
For(Á,3,5
Output(Á,5,"()()
End
Output(3,9,"Ü
Output(4,6,"--
For(Á,5,6
Output(Á,4,"[
Output(Á,9,"]
End
Output(6,5,"++++
0üZ
rand(2Y
getKeyüZ
If Z=105
Goto MF
Output(2,10,"Ü
Output(3,9," 
0üZ
rand(2Y
getKeyüZ
If Z=105
Goto MF
X+1üX

If X=8
Then
0üáBUNNY(12
100üáBUNNY(11
End
If Xø8
Goto D2
0üX
Goto AF

Lbl D3
For(Á,3,6
Output(Á,5,"()()
End
Output(4,6,"++
Pause 
Goto MF

Lbl D4
For(Á,3,5
Output(Á,5,"()()
End
Output(4,6,"<>
For(Á,5,6
Output(Á,4,"[
Output(Á,9,"]
End
Output(6,5,"++++
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
Output(4,6,"÷ù
0üZ
rand(Y
getKeyüZ
If Z=105
Goto MF
X+1üX

If Xø4
Goto D4
0üX
Goto AF

Lbl AF
"AGEING BYPASS
If U=1:Then
áBUNNY(13üÁ
If Á=1:Then
áBUNNY(18üÁ
If Áø0
Á-1üÁ
ÁüáBUNNY(18
End:End
úUüU
If U=ú1
Goto BP
úUüU

"HUNGER REDUCTION
áBUNNY(1üÁ
Á-5üÁ
If Á<0
0üÁ
ÁüáBUNNY(1

"THIRST REDUCTION
áBUNNY(2üÁ
Á-10üÁ
If Á<0
0üÁ
ÁüáBUNNY(2

"HYGIENE REDUCTION
áBUNNY(3üÁ
Á-5üÁ
If Á<0
0üÁ
ÁüáBUNNY(3

"MONTH COUNTER
áBUNNY(17üÁ
Á+1üáBUNNY(17
If Á=9:Then
1üáBUNNY(17
áBUNNY(5üÁ
Á+1üáBUNNY(5
End
áBUNNY(17üÁ
áBUNNY(5

Lbl G6
áBUNNY(5üÁ
áBUNNY(17
If Ans=1 and Á=5:Then
ClrHome
Output(1,1,"THANKS FOR ALL  OF THE GOOD LOVEAND CARE YOU    TOOK TO KEEP ME ALIVE! I'M ALL  GROWN UP NOW, SOI CAN LOOK AFTERMYSELF!
Pause :Pause 
End

"POO CONTROL
áBUNNY(17üÁ
If Á=4 or Á=8:Then
áBUNNY(18üÁ
If Áø3:Then
1üáBUNNY(4
0üáBUNNY(3
End:End

"WEIGHT REDUCTION
áBUNNY(6üÁ
Á-1üÁ
If Á<1
1üÁ
ÁüáBUNNY(6

"CONSCIOUSNESSREDUCTION
áBUNNY(11üÁ
Á-20üÁ
If Á<0
0üÁ
ÁüáBUNNY(11

"STRENGTH REDUCTION
áBUNNY(15üÁ
Á-2.5üÁ
If Á<0
0üÁ
ÁüáBUNNY(15

"GROWN-UP BUNNY
áBUNNY(5üÁ
If Á<5
Goto BP
ÄüG
áBUNNY(4üÁ
If Á=1
Goto 4B
Lbl G1
áBUNNY(3üÁ
If Á÷50
Goto 4A
Lbl G2
áBUNNY(2üÁ
If Á÷50
Goto 2B
Lbl G3
áBUNNY(8üÁ
áBUNNY(5üW
Á/3üÁ
If Á<W
Goto 3A
Lbl G4
áBUNNY(1üÁ
If Á÷50
Goto 2A
áBUNNY(5üÁ
If Á>20
20üÁ
áBUNNY(6üW
Á*5üV
Á*2.8üÁ
If W<Á
Goto 2A
If W>V
Goto 3A
áBUNNY(11üÁ
If Á÷20
Goto 3D
0üG

Lbl BP
"WEIGHT HEALTH PERCENTAGE
áBUNNY(5üÁ
If Á>20
20üÁ
áBUNNY(6üW
W/ÁüÁ
If Á>3.25:Then
If Á>6.5:Then
0üW
Else
Á-3.25üW
3.25-WüW
W/3.25*100üW
End
Else
If Á<2.5
Then
0üW
Else
Á/3.25*100üW
End
End
WüáBUNNY(7

"FITNESS LEVEL
áBUNNY(7üÁ
If Á>40
30üW
áBUNNY(8üÁ
Á/3üÁ
áBUNNY(5üV
If Á<V
Then
100-(Á/V*100)üÁ
W-ÁüW
If W<0
0üW
Else
Á/V*100üÁ
W+ÁüW
If W>100
100üW
End
WüáBUNNY(9
áBUNNY(7üÁ
If Á÷40
Then
áBUNNY(9üÁ
Á-30üÁ
ÁüáBUNNY(9
End
áBUNNY(9üÁ
If Á<0
0üÁ
If Á>100
100üÁ
ÁüáBUNNY(9

"ESTEEM
0üW
áBUNNY(9üÁ
If Áù40
15üW
If Áù60
W+5üW
If Áù80
W+5üW
áBUNNY(1üÁ
If Á=0
W-30üW
If Áù40
W+15üW
If Áù60
W+5üW
If Áù80
W+5üW
áBUNNY(2üÁ
If Á=0
W-30üW
If Áù40
W+15üW
If Áù60
W+5üW
If Áù80
W+5üW
áBUNNY(3üÁ
If Á=0
W-30üW
If Áù40
W+15üW
If Áù60
W+5üW
If Áù80
W+5üW
If W<0
0üW
If W>100
100üW
WüáBUNNY(10
áBUNNY(7üÁ
If Á÷40
Then
áBUNNY(10üÁ
Á-100üÁ
If Á<0
0üÁ
ÁüáBUNNY(10
End

"DEATH CLOCK
áBUNNY(13üV
0üáBUNNY(13
áBUNNY(1üÁ
If Á=0
1üW
áBUNNY(2üÁ
If Á=0
1üW
áBUNNY(3üÁ
If Á=0
1üW
áBUNNY(10üÁ
If Á=0
1üW
If W=0:Then
0üáBUNNY(13
0üáBUNNY(18
End
If W=1:Then
1üáBUNNY(13
If V=1:Then
áBUNNY(18üÁ
If Á=3:Then
ú1üáBUNNY(18
2üáBUNNY(13
End
áBUNNY(18üÁ
Á+1üÁ
ÁüáBUNNY(18
Else
1üáBUNNY(18
End:End

"MOOD
áBUNNY(10üÁ
If Áù0:1üW
If Áù50:2üW
If Áù90:3üW
áBUNNY(11üÁ
If Á÷40:4üW
áBUNNY(12üÁ
If Á=1:5üW
áBUNNY(13üÁ
If Á=1:1üW
If Á=2:0üW
WüáBUNNY(14
Goto D

Lbl MF
"MENU INTERFACE
0üV
1üW
ClrHome
Output(1,1,"PRESS TOP BUTTON
Output(5,1,"+--+--+--+--+--+!ST!FD!HG!FT!OP!úúúúúúúúúúúúúúúúBUNNY'S MOOD
Output(8,13,Str0

"WAIT ON INPUT AND FLASH
Lbl MW
Output(4,5,"        
0üV
rand(2Y
getKeyüV

Output(4,5,"-PAUSED-
rand(Y
If V=0
getKeyüV

"GO TO MENU
áBUNNY(13üL
áBUNNY(12üÁ
If V=105
Goto D
If V=11
Goto M1
If V=15
Goto M5
If L=2 or Á=1
Goto MW
If V=12
Goto M2
If V=14
Goto M3
If V=13
Goto M4
Goto MW

"STATUS
Lbl M1
ClrHome
Output(01,001,"AGE     :    YRSWEIGHT  :    KGS
Output(3,1,"HUNGER  :
Output(4,1,"THIRST  :
Output(5,1,"HYGIENE :
Output(6,1,"FITNESS :
Output(7,1,"ESTEEM  :
Output(8,1,"STRENGTH:
For(Á,3,8
Output(Á,14,"ô/Ð
End
Fix 0
áBUNNY(1üÁ
Output(3,11,Á
áBUNNY(2üÁ
Output(4,11,Á
áBUNNY(3üÁ
Output(5,11,Á
áBUNNY(5üÁ
Output(1,11,Á
áBUNNY(6üÁ
Output(2,11,Á
áBUNNY(9üÁ
Output(6,11,Á
áBUNNY(10üÁ
Output(7,11,Á
áBUNNY(15üÁ
Output(8,11,Á
Float
Pause 
Goto MF

"FOOD
Lbl M2
Menu("FOOD + DRINK","CARROT",2A,"WATER",2B,"BACK",MF
Lbl 2A
ClrHome
Output(1,1,"EATING CARROTS
For(Á,3,6
Output(Á,6,"()()
End
Output(4,7,"..
Output(4,2,"!!!
rand(3Y
Output(4,2," 
rand(2Y
Output(4,3," 
rand(2Y
Output(4,4," 
Output(4,7,"^^
rand(2Y
áBUNNY(1üÁ
Á+20üÁ
If Á>100
100üÁ
ÁüáBUNNY(1
áBUNNY(6üÁ
Á+2üÁ
ÁüáBUNNY(6
1üU
If G=Ä
Goto G4
1üU
Goto AF

Lbl 2B
ClrHome
Output(1,1,"DRINKING WATER
For(Á,3,6
Output(Á,7,"()()
End
Output(4,8,"..)/-
For(Á,2,4
Output(Á,13,"[
Output(Á,16,"]
End
Output(2,14,"--
rand(3Y
Output(2,14,"  
Output(3,14,"--
rand(2Y
Output(3,14,"  
Output(4,14,"--
rand(2Y
Output(4,14,"  
Output(4,8,"^^
rand(2Y
áBUNNY(2üÁ
Á+30üÁ
If Á>100
100üÁ
ÁüáBUNNY(2
1üU
If G=Ä
Goto G2
1üU
Goto AF

"SOCIAL AND FITNESS
Lbl M3
Menu("FITNESS + SOCIAL","EXERCIZE",3A,"SLEEP IN BED",3D,"CONNECT BUNNYS",3C,"BACK",MF
Lbl 3A
ClrHome
Output(1,1,"EXERCIZING
For(Á,3,6
Output(Á,6,"()()
End
Output(4,7,"..
rand(2Y
Output(5,5,"()  ()
rand(2Y
Output(5,5," ()() 
rand(2Y
Output(6,5,"()  ()
rand(2Y
Output(3,1,"                     ()()            (..)          ()()()()
rand(2Y
Output(3,1,"     ()()            (..)            ()()           ()  () 
rand(2Y
Output(6,5," ()() 
Output(4,7,"^^
áBUNNY(6üÁ
Á-1üÁ
If Á<1
1üÁ
ÁüáBUNNY(6
áBUNNY(8üÁ
Á+1üÁ
ÁüáBUNNY(8
áBUNNY(15üÁ
Á+5üÁ
If Á>100
100üÁ
ÁüáBUNNY(15
1üU
If G=Ä
Goto G3
1üU
Goto AF

Lbl 3B
áBUNNY(5üÁ
If Á<22
4Á+1üÁ
If Á>21
89üÁ
ÁüáBUNNY(6
100üáBUNNY(1
100üáBUNNY(2
100üáBUNNY(3
0üáBUNNY(4
áBUNNY(20üÁ
If Á:Goto 3E
Goto G6

"HYGIENE
Lbl M4
Menu("HYGIENE","HAVE A WASH",4A,"DISPOSE POO",4B,"BACK",MF
Lbl 4A
ClrHome
Output(1,1,"HAVING A WASH
For(Á,3,6
Output(Á,7,"()()
End
Output(4,8,"..
8üV
0üÁ
rand(Y
Repeat not(V
Output(V,1,"O O O O O O O O
V-1üV
rand(.5Y
Output(V,1," O O O O O O O O
V-1üV
rand(.5Y
End
Output(1,1,"ALL CLEAN! 
Output(2,6,"+----+ O O  O O !()()!O O OO O O!(^^)! O O  O O !()()!O O OO O O!()()! O O  O O +----+
0üÁ
Repeat Á=4Y
Á+1üÁ
End
100üáBUNNY(3
1üU
If G=Ä
Goto G2
1üU
Goto AF

Lbl 4B
áBUNNY(4üÁ
If not(Á:1üU
If not(Á
Goto AF

ClrHome
Output(1,1,"DISPOSING POO
For(Á,3,6
Output(Á,1,"()()
End
Output(4,2,"ÒÒ
Output(3,14,"))(
Output(4,14,"(()
Output(5,14,"MMM
rand(4Y
Output(5,14," 
rand(2Y
Output(4,14," 
Output(5,15," 
rand(2Y
Output(3,14," 
Output(4,15," 
Output(5,16," 
rand(2Y
Output(3,15," 
Output(4,16," 
rand(2Y
Output(3,16," 
Output(4,2,"^^
0üáBUNNY(4
1üU
If G=Ä
Goto G1
1üU
Goto AF

"BED
Lbl 3D
1üU
0üG
áBUNNY(11üÁ
If Á÷40
1üáBUNNY(12
Goto AF

Lbl M5
áBUNNY(13üÁ
If Á=2
Menu("OPTIONS","BACK",MF,"GAME SPEED",GS,"SAVE AND QUIT",QT,"RESTART BUNNY",N
Menu("OPTIONS","BACK",MF,"GAME SPEED",GS,"SAVE AND QUIT",QT

Lbl 3C
ClrHome
0üR
0üM
0üÁ
rand(6randInt(1,6
GetCalc(R
If R=Ä:Then
0üR
1üM
Else
ÄüR
0üM
End

ClrHome
Output(1,1,"PRESS 'ENTER' ATTHE SAME TIME...
Pause 
If M:Goto RB
Lbl SB
ClrHome
Output(1,1,"WAITING...      PRESS 'ENTER' TOQUIT
Repeat M or Á=105
GetCalc(M
getKeyüÁ
End
If Á=105
Goto MF
0üM
Output(7,1,"READY!
Pause 
ClrHome
1üáBUNNY(20
Goto 3B
Lbl 3E
0üáBUNNY(20
For(Á,3,6
Output(Á,5,"()()
End
Output(4,6,"..
rand(2Y
ClrHome
For(Á,3,6
Output(Á,1,"()()
End
Output(4,2,"..
rand(2Y
ClrHome
Disp " GONE TO FRIEND"
For(Á,1,85
rand(Y
End
ClrHome
Disp "BACK!
For(Á,3,6
Output(Á,1,"()()
End
Output(4,2,"..
rand(2Y
Output(4,2,"^^
rand(3Y
Goto AF

Lbl RB
Menu("START WHEN READY","START",R1
Lbl R1
ClrHome
For(Á,3,6
Output(Á,1,"()()
End
Output(4,2,"..
rand(3Y
For(Á,3,6
Output(Á,13,"()()
End
Output(4,14,"..
rand(3Y
Output(4,2,"^^
Output(4,14,"^^
rand(3Y
Output(1,1,"HI!
rand(3Y
Output(1,1,"   
Output(1,11,"HELLO!
rand(3Y
Output(1,11,"      
For(Á,3,6
Output(Á,9,"()()    
End
Output(4,2,"..
Output(4,10,"..
rand(3Y
Output(1,1,"LET ME HEAL YOU!
rand(5Y
Output(1,1,"                
rand(3Y
Output(1,13,"OKAY
rand(3Y
Output(1,13,"    
For(Á,3,6
Output(Á,1,"    ()()
End
Output(4,6,"..
rand(3Y
For(Á,3,6
For(A,9,12
Output(Á,A,"Ä
rand(iPart(.5Y
End:End
rand(3Y
For(Á,3,6
For(A,9,12
If A=9
Output(Á,A,"(
If A=10 and Áø4
Output(Á,A,")
If A=10 and Á=4
Output(Á,A,".
If A=11 and Áø4
Output(Á,A,"(
If A=11 and Á=4
Output(4,11,".
If A=12
Output(Á,A,")
End:End
rand(3Y
Output(4,10,"^^
rand(3Y
Output(1,13,"WOW!
rand(3Y
Output(1,5,"I FEEL GREAT
rand(3Y
Output(4,6,"^^
Output(1,5,"     THANKS!
rand(3Y
Output(1,10,"       
Output(1,1,"ANYTIME!
rand(3Y
Output(1,1,"        
rand(3Y
Output(1,1,"BYE!
rand(3Y
Output(1,1,"    
Output(1,9,"GOODBYE!
rand(3Y
Output(1,9,"        
rand(3Y
For(For(,3,6
Output(Á,9,"    ()()
End
Output(4,14,"^^
rand(3Y
For(Á,3,6
Output(Á,13,"    
End
rand(3Y
Output(4,6,"..
rand(4Y
Goto D

Lbl HP
ClrHome
Output(1,1,"BUNNY GOTCHI IS A VIRTUAL PET ONYOUR CALCULATOR.
Output(5,2,"PRESS  [ENTER]
Pause 
ClrHome
Output(1,1,"[ENTER], IS THE MOST IMPORTANT  BUTTON IN THIS  GAME. PRESS IT  WHEN YOU DON'T  KNOW WHAT TO DO.
Pause :Pause 
ClrHome
Output(01,001,"YOU'LL ENCOUNTERA MENU SCREEN   WHILE PLAYING   THE GAME:       +--+--+--+--+--+!ST!FD!HG!FT!OP!úúúúúúúúúúúúúúúú
Pause 
ClrHome
Output(01,001,"THE BOX-LIKE    FIGURES RELATE  DIRECTLY WITH   THE TOP BUTTONS EXACTLY BELOW   THE SCREEN      I.E.
Output(8,1,"[Y=],[ZOOM],ETC.
Pause 
ClrHome
Output(1,1,"BUNNY GOTCHI'S  LIFE DEPENDS ON A FEW THINGS....
Output(5,1,"FD, FOOD        HG, HYGIENE     FT, FITNESS
Pause 
ClrHome
Output(0001,1,"+--+--+--+--+--+!  !FD!  !  !  !úúúúúúúúúúúúúúúúFOOD            THIS MENU GIVES BUNNY GOTCHI    FOOD AND WATER.
Pause 
Output(2,5,"  !HG
Output(4,1,"HYGIENE
Output(6,14,"THEABILITY TO BATH AND DISPOSE POO.
Pause 
Output(2,8,"  !FT
Output(4,1,"FITNESS
Output(5,11,"LETS 
Output(6,13,"    EXERCIZE,SLEEP +SEE OTHER BUNNYS
Pause 
Output(2,11,"  !OP
Output(4,1,"OPTIONS
Output(5,11,"GIVES
Output(6,1,"YOU THE ABILITY TO CHANGE THE   GAMESPEED + QUIT
Pause 
Output(2,2,"ST
Output(2,14,"  
Output(4,1,"STATUS 
Output(7,4,"VIEW BUNNY   GOTCHI'S NEEDS. 
Pause 
ClrHome
Output(01,001,"IF BUNNY GOTCHI CRIES, IT NEEDS SOMETHING QUICK
For(Á,5,7
Output(Á,7,"()()
End
For(Á,7,8
Output(Á,6,"[
Output(Á,11,"]
End
Output(8,7,"++++
Repeat Á=105
getKeyüÁ
Output(6,8,"÷ù
rand(20
If Áø105
getKeyüÁ
Output(6,8,"<>
rand(20
If Áø105
getKeyüÁ
End
ClrHome
Output(1,1,"IF YOU CHECK THESTATUS AND FIND NOTHING WRONG,  BUNNY GOTCHI MAYBE OVERWEIGHT ORUNDERWEIGHT, OR NEED EXCERCISE.
Pause 
ClrHome
Output(4,1,"  HAVE FUN AND     GOOD LUCK!
Pause 
ClrHome
Goto ST

Lbl QT
ClrHome
Output(1,1,"BUNNY GOTCHI    PROGRAM
"    -JAMES KANJOüStr0
Output(8,1,Str0
rand(50
ClrHome:Output(1,1,"

Notice that I have not included the first colon on each line. This is because it makes it easier to compile the code when using the TI-GRAPH LINK software.

I hope you guys enjoy this…I think it is a unique game of its kind!

Cheers ~ James Kanjo

EDIT: I made the scary code in a collapsible text box thingy.

Last edited on 19 Apr 2008 09:33 by GoVegan Show more

Re: Bunny Gotchi ~ By James Kanjo

burr 03 Apr 2008 05:56

When posting a program, please remember to change all of the TI-Basic tokens that don't display correctly to Unicode or something recognizable (see characters for a list of characters). This helps us see what the program is doing, without having to guess what all of the symbols are supposed to represent.

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 Apr 2008 06:23

I considered that, but then it would have been difficult for one to even compile the program. Unless there is some other way…

Re: Bunny Gotchi ~ By James Kanjo

builderboy 06 Aug 2008 01:25

I use a special token reader to translate my Basic programs into text. Its really usefull!

Last edited on 06 Aug 2008 01:26 by DarkerLine Show more

Re: Bunny Gotchi ~ By James Kanjo

DarkerLine 06 Aug 2008 01:40

You should really try to link to URLs better… The syntax is [http://www.example.com link text] or [*http://www.example.com link text], not [[[http://www.example.com|link text]]] as you've been doing.

Anyway, the token reader you link to doesn't seem very good to me… it misrepresents many uncommon characters, or presents them in a bizarre form (such as the ►Abc command, DT, or ROOT) — basically, the author copied the names straight from ti83plus.inc with no fact-checking. One could probably recompile it with an improved token table. Otherwise, SourceCoder is a good alternative.

Last edited on 06 Aug 2008 01:41 by DarkerLine Show more

Re: Bunny Gotchi ~ By James Kanjo

builderboy 06 Aug 2008 02:26

Don't balme me! I was using the page link wizard.

And thanks for the better program! :)
EDIT: OH wow! It even has a program optimiser. (Mind you it doesn't work 100% correctly)

Last edited on 06 Aug 2008 02:38 by builderboy Show more

Re: Bunny Gotchi ~ By James Kanjo

RandomProductions 06 Aug 2008 02:49

You've been pushing the wrong button. The page link wizard is a wizard to help you to link to other pages in the wiki. You want the URL link wizard.

Re: Bunny Gotchi ~ By James Kanjo

builderboy 06 Aug 2008 02:51

ahhh.. I see now!

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 Apr 2008 10:02

I have actually been trying to post this reply since the second of my last one, however; my computer repeatedly failed and froze (lagged to extremely painful usage), so I've resorted to Mozilla Firefox to see if it makes a difference in posting. Obviously it has, as this has actually posted.

+ show block

ClrHome
0→G
‾1→U
SetUpEditor ∟BUNNY
20→dim(∟BUNNY
SetUpEditor 

Output(1,4,"WELCOME TO
Output(3,3,"BUNNY GOTCHI
Output(5,3,"VERSION: 1.0
Output(8,2,"BY JAMES KANJO
Pause 
ClrHome
Lbl ST
ClrHome
Menu("LOAD BUNNY","LOAD",LD,"CREATE NEW",N,"",ST,"HELP",HP,"QUIT",QT

Lbl LD
∟BUNNY(19→θ
If θ=1/3*√(π
Goto 5B
Pause "NO FILE TO LOAD!
Goto ST

Lbl 5B
getKey→θ
∟BUNNY(16→Y
∟BUNNY(14→W
If θ=43:Then
For(B,1,8
For(A,1,16
Output(B,A,"π
End:End:End
If θ=43
Goto 3B
Goto D

Lbl N
{100,100,0,0,1,1,0,5,0,0,100,0,0,1,0,0,1,0,0,0→∟BUNNY
1/3*√(π→∟BUNNY(19
100→U
Lbl GS
Menu("CALCULATOR SPEED","TI-83,    FAST",83,"",GS,"TI-83 PLUS,MED",3P,"",GS,"TI-84,    SLOW",4P
Lbl 83
6→∟BUNNY(16
6→Y
Goto 5A
Lbl 3P
10→∟BUNNY(16
10→Y
Goto 5A
Lbl 4P
20→∟BUNNY(16
20→Y
Lbl 5A
If U≠100
Goto MF
1→U
Goto AF

Lbl D
Output(1,1,"MENU:PRESS ENTER                                                                                            ()()BUNNY'S MOOD

∟BUNNY(14→θ
If θ=0
"(++)→Str0
If θ=1
"(≤≥)→Str0
If θ=2
"(..)→Str0
If θ=3
"(^^)→Str0
If θ=4
"(,,)→Str0
If θ=5
"(--)→Str0
Output(8,13,Str0

∟BUNNY(4→θ
If θ=1
Output(3,14,")))             (((             MMM

∟BUNNY(13→θ
If θ=1
0→X
If θ=1
Goto D4
If θ=2
Goto D3

∟BUNNY(12→θ
If θ=1
0→X
If θ=1
Goto D2
Goto D1

Lbl D1
∟BUNNY(11→X
For(θ,3,6
Output(θ,5,"()()
End
If X>40
Output(4,6,"..
If X≤40
Output(4,6,",,
rand(Y
getKey→Z
If Z=105
Goto MF
For(θ,3,6
Output(θ,1,"()()     
End
If X>40
Output(4,2,"..
If X≤40
Output(4,2,",,
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
Output(4,2,"--
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
If X>40
Output(4,2,"..
If X≤40
Output(4,2,",,
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
For(θ,3,6
Output(θ,1,"    ()()
End
If X>40
Output(4,6,"..
If X≤40
Output(4,6,",,
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
For(θ,3,6
Output(θ,5,"    ()()
End
If X>40
Output(4,10,"..
If X≤40
Output(4,10,",,
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
If X>40
Output(4,10,"^^
If X≤40
Output(4,10,"--
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
If X>40
Output(4,10,"..
If X≤40
Output(4,10,",,
Goto AF

Lbl D2
Output(2,10,"Z
For(θ,3,5
Output(θ,5,"()()
End
Output(3,9,"→
Output(4,6,"--
For(θ,5,6
Output(θ,4,"[
Output(θ,9,"]
End
Output(6,5,"++++
0→Z
rand(2Y
getKey→Z
If Z=105
Goto MF
Output(2,10,"→
Output(3,9," 
0→Z
rand(2Y
getKey→Z
If Z=105
Goto MF
X+1→X

If X=8
Then
0→∟BUNNY(12
100→∟BUNNY(11
End
If X≠8
Goto D2
0→X
Goto AF

Lbl D3
For(θ,3,6
Output(θ,5,"()()
End
Output(4,6,"++
Pause 
Goto MF

Lbl D4
For(θ,3,5
Output(θ,5,"()()
End
Output(4,6,"<>
For(θ,5,6
Output(θ,4,"[
Output(θ,9,"]
End
Output(6,5,"++++
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
Output(4,6,"≤≥
0→Z
rand(Y
getKey→Z
If Z=105
Goto MF
X+1→X

If X≠4
Goto D4
0→X
Goto AF

Lbl AF
"AGEING BYPASS
If U=1:Then
∟BUNNY(13→θ
If θ=1:Then
∟BUNNY(18→θ
If θ≠0
θ-1→θ
θ→∟BUNNY(18
End:End
‾U→U
If U=‾1
Goto BP
‾U→U

"HUNGER REDUCTION
∟BUNNY(1→θ
θ-5→θ
If θ<0
0→θ
θ→∟BUNNY(1

"THIRST REDUCTION
∟BUNNY(2→θ
θ-10→θ
If θ<0
0→θ
θ→∟BUNNY(2

"HYGIENE REDUCTION
∟BUNNY(3→θ
θ-5→θ
If θ<0
0→θ
θ→∟BUNNY(3

"MONTH COUNTER
∟BUNNY(17→θ
θ+1→∟BUNNY(17
If θ=9:Then
1→∟BUNNY(17
∟BUNNY(5→θ
θ+1→∟BUNNY(5
End
∟BUNNY(17→θ
∟BUNNY(5

Lbl G6
∟BUNNY(5→θ
∟BUNNY(17
If Ans=1 and θ=5:Then
ClrHome
Output(1,1,"THANKS FOR ALL  OF THE GOOD LOVEAND CARE YOU    TOOK TO KEEP ME ALIVE! I'M ALL  GROWN UP NOW, SOI CAN LOOK AFTERMYSELF!
Pause :Pause 
End

"POO CONTROL
∟BUNNY(17→θ
If θ=4 or θ=8:Then
∟BUNNY(18→θ
If θ≠3:Then
1→∟BUNNY(4
0→∟BUNNY(3
End:End

"WEIGHT REDUCTION
∟BUNNY(6→θ
θ-1→θ
If θ<1
1→θ
θ→∟BUNNY(6

"CONSCIOUSNESSREDUCTION
∟BUNNY(11→θ
θ-20→θ
If θ<0
0→θ
θ→∟BUNNY(11

"STRENGTH REDUCTION
∟BUNNY(15→θ
θ-2.5→θ
If θ<0
0→θ
θ→∟BUNNY(15

"GROWN-UP BUNNY
∟BUNNY(5→θ
If θ<5
Goto BP
π→G
∟BUNNY(4→θ
If θ=1
Goto 4B
Lbl G1
∟BUNNY(3→θ
If θ≤50
Goto 4A
Lbl G2
∟BUNNY(2→θ
If θ≤50
Goto 2B
Lbl G3
∟BUNNY(8→θ
∟BUNNY(5→W
θ/3→θ
If θ<W
Goto 3A
Lbl G4
∟BUNNY(1→θ
If θ≤50
Goto 2A
∟BUNNY(5→θ
If θ>20
20→θ
∟BUNNY(6→W
θ*5→V
θ*2.8→θ
If W<θ
Goto 2A
If W>V
Goto 3A
∟BUNNY(11→θ
If θ≤20
Goto 3D
0→G

Lbl BP
"WEIGHT HEALTH PERCENTAGE
∟BUNNY(5→θ
If θ>20
20→θ
∟BUNNY(6→W
W/θ→θ
If θ>3.25:Then
If θ>6.5:Then
0→W
Else
θ-3.25→W
3.25-W→W
W/3.25*100→W
End
Else
If θ<2.5
Then
0→W
Else
θ/3.25*100→W
End
End
W→∟BUNNY(7

"FITNESS LEVEL
∟BUNNY(7→θ
If θ>40
30→W
∟BUNNY(8→θ
θ/3→θ
∟BUNNY(5→V
If θ<V
Then
100-(θ/V*100)→θ
W-θ→W
If W<0
0→W
Else
θ/V*100→θ
W+θ→W
If W>100
100→W
End
W→∟BUNNY(9
∟BUNNY(7→θ
If θ≤40
Then
∟BUNNY(9→θ
θ-30→θ
θ→∟BUNNY(9
End
∟BUNNY(9→θ
If θ<0
0→θ
If θ>100
100→θ
θ→∟BUNNY(9

"ESTEEM
0→W
∟BUNNY(9→θ
If θ≥40
15→W
If θ≥60
W+5→W
If θ≥80
W+5→W
∟BUNNY(1→θ
If θ=0
W-30→W
If θ≥40
W+15→W
If θ≥60
W+5→W
If θ≥80
W+5→W
∟BUNNY(2→θ
If θ=0
W-30→W
If θ≥40
W+15→W
If θ≥60
W+5→W
If θ≥80
W+5→W
∟BUNNY(3→θ
If θ=0
W-30→W
If θ≥40
W+15→W
If θ≥60
W+5→W
If θ≥80
W+5→W
If W<0
0→W
If W>100
100→W
W→∟BUNNY(10
∟BUNNY(7→θ
If θ≤40
Then
∟BUNNY(10→θ
θ-100→θ
If θ<0
0→θ
θ→∟BUNNY(10
End

"DEATH CLOCK
∟BUNNY(13→V
0→∟BUNNY(13
∟BUNNY(1→θ
If θ=0
1→W
∟BUNNY(2→θ
If θ=0
1→W
∟BUNNY(3→θ
If θ=0
1→W
∟BUNNY(10→θ
If θ=0
1→W
If W=0:Then
0→∟BUNNY(13
0→∟BUNNY(18
End
If W=1:Then
1→∟BUNNY(13
If V=1:Then
∟BUNNY(18→θ
If θ=3:Then
‾1→∟BUNNY(18
2→∟BUNNY(13
End
∟BUNNY(18→θ
θ+1→θ
θ→∟BUNNY(18
Else
1→∟BUNNY(18
End:End

"MOOD
∟BUNNY(10→θ
If θ≥0:1→W
If θ≥50:2→W
If θ≥90:3→W
∟BUNNY(11→θ
If θ≤40:4→W
∟BUNNY(12→θ
If θ=1:5→W
∟BUNNY(13→θ
If θ=1:1→W
If θ=2:0→W
W→∟BUNNY(14
Goto D

Lbl MF
"MENU INTERFACE
0→V
1→W
ClrHome
Output(1,1,"PRESS TOP BUTTON
Output(5,1,"+--+--+--+--+--+!ST!FD!HG!FT!OP!‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾BUNNY'S MOOD
Output(8,13,Str0

"WAIT ON INPUT AND FLASH
Lbl MW
Output(4,5,"        
0→V
rand(2Y
getKey→V

Output(4,5,"-PAUSED-
rand(Y
If V=0
getKey→V

"GO TO MENU
∟BUNNY(13→L
∟BUNNY(12→θ
If V=105
Goto D
If V=11
Goto M1
If V=15
Goto M5
If L=2 or θ=1
Goto MW
If V=12
Goto M2
If V=14
Goto M3
If V=13
Goto M4
Goto MW

"STATUS
Lbl M1
ClrHome
Output(1,1,"AGE     :    YRSWEIGHT  :    KGS
Output(3,1,"HUNGER  :
Output(4,1,"THIRST  :
Output(5,1,"HYGIENE :
Output(6,1,"FITNESS :
Output(7,1,"ESTEEM  :
Output(8,1,"STRENGTH:
For(θ,3,8
Output(θ,14,"ô/√
End
Fix 0
∟BUNNY(1→θ
Output(3,11,θ
∟BUNNY(2→θ
Output(4,11,θ
∟BUNNY(3→θ
Output(5,11,θ
∟BUNNY(5→θ
Output(1,11,θ
∟BUNNY(6→θ
Output(2,11,θ
∟BUNNY(9→θ
Output(6,11,θ
∟BUNNY(10→θ
Output(7,11,θ
∟BUNNY(15→θ
Output(8,11,θ
Float
Pause 
Goto MF

"FOOD
Lbl M2
Menu("FOOD + DRINK","CARROT",2A,"WATER",2B,"BACK",MF
Lbl 2A
ClrHome
Output(1,1,"EATING CARROTS
For(θ,3,6
Output(θ,6,"()()
End
Output(4,7,"..
Output(4,2,"!!!
rand(3Y
Output(4,2," 
rand(2Y
Output(4,3," 
rand(2Y
Output(4,4," 
Output(4,7,"^^
rand(2Y
∟BUNNY(1→θ
θ+20→θ
If θ>100
100→θ
θ→∟BUNNY(1
∟BUNNY(6→θ
θ+2→θ
θ→∟BUNNY(6
1→U
If G=π
Goto G4
1→U
Goto AF

Lbl 2B
ClrHome
Output(1,1,"DRINKING WATER
For(θ,3,6
Output(θ,7,"()()
End
Output(4,8,"..)/-
For(θ,2,4
Output(θ,13,"[
Output(θ,16,"]
End
Output(2,14,"--
rand(3Y
Output(2,14,"  
Output(3,14,"--
rand(2Y
Output(3,14,"  
Output(4,14,"--
rand(2Y
Output(4,14,"  
Output(4,8,"^^
rand(2Y
∟BUNNY(2→θ
θ+30→θ
If θ>100
100→θ
θ→∟BUNNY(2
1→U
If G=π
Goto G2
1→U
Goto AF

"SOCIAL AND FITNESS
Lbl M3
Menu("FITNESS + SOCIAL","EXERCIZE",3A,"SLEEP IN BED",3D,"CONNECT BUNNYS",3C,"BACK",MF
Lbl 3A
ClrHome
Output(1,1,"EXERCIZING
For(θ,3,6
Output(θ,6,"()()
End
Output(4,7,"..
rand(2Y
Output(5,5,"()  ()
rand(2Y
Output(5,5," ()() 
rand(2Y
Output(6,5,"()  ()
rand(2Y
Output(3,1,"                     ()()            (..)          ()()()()
rand(2Y
Output(3,1,"     ()()            (..)            ()()           ()  () 
rand(2Y
Output(6,5," ()() 
Output(4,7,"^^
∟BUNNY(6→θ
θ-1→θ
If θ<1
1→θ
θ→∟BUNNY(6
∟BUNNY(8→θ
θ+1→θ
θ→∟BUNNY(8
∟BUNNY(15→θ
θ+5→θ
If θ>100
100→θ
θ→∟BUNNY(15
1→U
If G=π
Goto G3
1→U
Goto AF

Lbl 3B
∟BUNNY(5→θ
If θ<22
4θ+1→θ
If θ>21
89→θ
θ→∟BUNNY(6
100→∟BUNNY(1
100→∟BUNNY(2
100→∟BUNNY(3
0→∟BUNNY(4
∟BUNNY(20→θ
If θ:Goto 3E
Goto G6

"HYGIENE
Lbl M4
Menu("HYGIENE","HAVE A WASH",4A,"DISPOSE POO",4B,"BACK",MF
Lbl 4A
ClrHome
Output(1,1,"HAVING A WASH
For(θ,3,6
Output(θ,7,"()()
End
Output(4,8,"..
8→V
0→θ
rand(Y
Repeat not(V
Output(V,1,"O O O O O O O O
V-1→V
rand(.5Y
Output(V,1," O O O O O O O O
V-1→V
rand(.5Y
End
Output(1,1,"ALL CLEAN! 
Output(2,6,"+----+ O O  O O !()()!O O OO O O!(^^)! O O  O O !()()!O O OO O O!()()! O O  O O +----+
0→θ
Repeat θ=4Y
θ+1→θ
End
100→∟BUNNY(3
1→U
If G=π
Goto G2
1→U
Goto AF

Lbl 4B
∟BUNNY(4→θ
If not(θ:1→U
If not(θ
Goto AF

ClrHome
Output(1,1,"DISPOSING POO
For(θ,3,6
Output(θ,1,"()()
End
Output(4,2,"ÒÒ
Output(3,14,"))(
Output(4,14,"(()
Output(5,14,"MMM
rand(4Y
Output(5,14," 
rand(2Y
Output(4,14," 
Output(5,15," 
rand(2Y
Output(3,14," 
Output(4,15," 
Output(5,16," 
rand(2Y
Output(3,15," 
Output(4,16," 
rand(2Y
Output(3,16," 
Output(4,2,"^^
0→∟BUNNY(4
1→U
If G=π
Goto G1
1→U
Goto AF

"BED
Lbl 3D
1→U
0→G
∟BUNNY(11→θ
If θ≤40
1→∟BUNNY(12
Goto AF

Lbl M5
∟BUNNY(13→θ
If θ=2
Menu("OPTIONS","BACK",MF,"GAME SPEED",GS,"SAVE AND QUIT",QT,"RESTART BUNNY",N
Menu("OPTIONS","BACK",MF,"GAME SPEED",GS,"SAVE AND QUIT",QT

Lbl 3C
ClrHome
0→R
0→M
0→θ
rand(6randInt(1,6
GetCalc(R
If R=π:Then
0→R
1→M
Else
π→R
0→M
End

ClrHome
Output(1,1,"PRESS 'ENTER' ATTHE SAME TIME...
Pause 
If M:Goto RB
Lbl SB
ClrHome
Output(1,1,"WAITING...      PRESS 'ENTER' TOQUIT
Repeat M or θ=105
GetCalc(M
getKey→θ
End
If θ=105
Goto MF
0→M
Output(7,1,"READY!
Pause 
ClrHome
1→∟BUNNY(20
Goto 3B
Lbl 3E
0→∟BUNNY(20
For(θ,3,6
Output(θ,5,"()()
End
Output(4,6,"..
rand(2Y
ClrHome
For(θ,3,6
Output(θ,1,"()()
End
Output(4,2,"..
rand(2Y
ClrHome
Disp " GONE TO FRIEND"
For(θ,1,85
rand(Y
End
ClrHome
Disp "BACK!
For(θ,3,6
Output(θ,1,"()()
End
Output(4,2,"..
rand(2Y
Output(4,2,"^^
rand(3Y
Goto AF

Lbl RB
Menu("START WHEN READY","START",R1
Lbl R1
ClrHome
For(θ,3,6
Output(θ,1,"()()
End
Output(4,2,"..
rand(3Y
For(θ,3,6
Output(θ,13,"()()
End
Output(4,14,"..
rand(3Y
Output(4,2,"^^
Output(4,14,"^^
rand(3Y
Output(1,1,"HI!
rand(3Y
Output(1,1,"   
Output(1,11,"HELLO!
rand(3Y
Output(1,11,"      
For(θ,3,6
Output(θ,9,"()()    
End
Output(4,2,"..
Output(4,10,"..
rand(3Y
Output(1,1,"LET ME HEAL YOU!
rand(5Y
Output(1,1,"                
rand(3Y
Output(1,13,"OKAY
rand(3Y
Output(1,13,"    
For(θ,3,6
Output(θ,1,"    ()()
End
Output(4,6,"..
rand(3Y
For(θ,3,6
For(A,9,12
Output(θ,A,"π
rand(iPart(.5Y
End:End
rand(3Y
For(θ,3,6
For(A,9,12
If A=9
Output(θ,A,"(
If A=10 and θ≠4
Output(θ,A,")
If A=10 and θ=4
Output(θ,A,".
If A=11 and θ≠4
Output(θ,A,"(
If A=11 and θ=4
Output(4,11,".
If A=12
Output(θ,A,")
End:End
rand(3Y
Output(4,10,"^^
rand(3Y
Output(1,13,"WOW!
rand(3Y
Output(1,5,"I FEEL GREAT
rand(3Y
Output(4,6,"^^
Output(1,5,"     THANKS!
rand(3Y
Output(1,10,"       
Output(1,1,"ANYTIME!
rand(3Y
Output(1,1,"        
rand(3Y
Output(1,1,"BYE!
rand(3Y
Output(1,1,"    
Output(1,9,"GOODBYE!
rand(3Y
Output(1,9,"        
rand(3Y
For(For(,3,6
Output(θ,9,"    ()()
End
Output(4,14,"^^
rand(3Y
For(θ,3,6
Output(θ,13,"    
End
rand(3Y
Output(4,6,"..
rand(4Y
Goto D

Lbl HP
ClrHome
Output(1,1,"BUNNY GOTCHI IS A VIRTUAL PET ONYOUR CALCULATOR.
Output(5,2,"PRESS  [ENTER]
Pause 
ClrHome
Output(1,1,"[ENTER], IS THE MOST IMPORTANT  BUTTON IN THIS  GAME. PRESS IT  WHEN YOU DON'T  KNOW WHAT TO DO.
Pause :Pause 
ClrHome
Output(1,1,"YOU'LL ENCOUNTERA MENU SCREEN   WHILE PLAYING   THE GAME:       +--+--+--+--+--+!ST!FD!HG!FT!OP!‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾
Pause 
ClrHome
Output(1,1,"THE BOX-LIKE    FIGURES RELATE  DIRECTLY WITH   THE TOP BUTTONS EXACTLY BELOW   THE SCREEN      I.E.
Output(8,1,"[Y=],[ZOOM],ETC.
Pause 
ClrHome
Output(1,1,"BUNNY GOTCHI'S  LIFE DEPENDS ON A FEW THINGS....
Output(5,1,"FD, FOOD        HG, HYGIENE     FT, FITNESS
Pause 
ClrHome
Output(1,1,"+--+--+--+--+--+!  !FD!  !  !  !‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾FOOD            THIS MENU GIVES BUNNY GOTCHI    FOOD AND WATER.
Pause 
Output(2,5,"  !HG
Output(4,1,"HYGIENE
Output(6,14,"THEABILITY TO BATH AND DISPOSE POO.
Pause 
Output(2,8,"  !FT
Output(4,1,"FITNESS
Output(5,11,"LETS 
Output(6,13,"    EXERCIZE,SLEEP +SEE OTHER BUNNYS
Pause 
Output(2,11,"  !OP
Output(4,1,"OPTIONS
Output(5,11,"GIVES
Output(6,1,"YOU THE ABILITY TO CHANGE THE   GAMESPEED + QUIT
Pause 
Output(2,2,"ST
Output(2,14,"  
Output(4,1,"STATUS 
Output(7,4,"VIEW BUNNY   GOTCHI'S NEEDS. 
Pause 
ClrHome
Output(1,1,"IF BUNNY GOTCHI CRIES, IT NEEDS SOMETHING QUICK
For(θ,5,7
Output(θ,7,"()()
End
For(θ,7,8
Output(θ,6,"[
Output(θ,11,"]
End
Output(8,7,"++++
Repeat θ=105
getKey→θ
Output(6,8,"≤≥
rand(20
If θ≠105
getKey→θ
Output(6,8,"<>
rand(20
If θ≠105
getKey→θ
End
ClrHome
Output(1,1,"IF YOU CHECK THESTATUS AND FIND NOTHING WRONG,  BUNNY GOTCHI MAYBE OVERWEIGHT ORUNDERWEIGHT, OR NEED EXCERCISE.
Pause 
ClrHome
Output(4,1,"  HAVE FUN AND     GOOD LUCK!
Pause 
ClrHome
Goto ST

Lbl QT
ClrHome
Output(1,1,"BUNNY GOTCHI    PROGRAM
"    -JAMES KANJO→Str0
Output(8,1,Str0
rand(50
ClrHome:Output(1,1,"

I hope that makes things easier for you burr, and everybody else for that matter.

Cheers ~ James Kanjo

EDIT: I made another collapsible text box thingy.

Last edited on 19 Apr 2008 09:35 by GoVegan Show more

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 Apr 2008 10:08

I have just had an epiphany! I thought it was rather strange how you guys were up at these strange hours! You guys are in America, aren't you? Hehe, I'm from the land down under, Australia! Right now it is 9:07pm for me…What time is it for you guys?

EDIT: It is still daylight savings for me, however; so it would be 8:07pm if it wasn't for that…

Last edited on 03 Apr 2008 10:11 by GoVegan Show more

Re: Bunny Gotchi ~ By James Kanjo

burr 10 Apr 2008 05:29

Most of us are from America, but there are a few people from Europe.

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 28 Apr 2008 04:30

Hoorah! Thank goodness for UnitedTI!!! They are much much faster when it comes to uploading and updating files than TICalcs.

At last I can properly release my program. I would like to politely ask you to give it a try, and would cherish any feedback at all (bad, good, constuctive, anything please). The web address is http://www.unitedti.org/index.php?showtopic=7888

I have documented the source code, commented it, included documentation on the variables and most of how the program works (I haven't documented the secret, which is likely to be discovered now that I have mentioned it through people looking at the source code). If you have any questions, I'd be happy to answer them too.

Cheers ~ James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

krazyness 28 Apr 2008 19:58

Lol very nice animations =D. for some reason, tho, the menu didn't work for me…i pressed the eky and nothing happened…

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 28 Apr 2008 21:30

Hmmmm, the [ENTER] key didn't bring up the menu? What do you mean "eky"?

You have me extremely worried at the moment that I have a major bug…

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 28 Apr 2008 21:33

I suppose that also meant that your Bunny died aswell, right? We will all take a moment of silence to remember krazyness' poor Bunny…..

Re: Bunny Gotchi ~ By James Kanjo

krazyness 28 Apr 2008 22:56

Lol~I mean that I pressed enter, then I pressed the keys (not eky sry bout that) and then nothing happened…I pressed [y=], [zoom], and those keys up there, and no other menu came up. U know y?

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 29 Apr 2008 02:13

So the menu came up, and when you went to press buttons, it didn't work?

_______________
|ST|FD|HG|FT|OP|
--------------------------
BUNNY'S MOOD:(^^)

Did a screen similar to that come up?

What calculator are you using?

Cheers ~ James Kanjo

Last edited on 29 Apr 2008 02:38 by GoVegan Show more

Re: Bunny Gotchi ~ By James Kanjo

krazyness 29 Apr 2008 02:54

I am using an 84+ SE and yes, that screen came up yet the buttons to navigate from there had no effect…-.-

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 29 Apr 2008 06:09

Aaahahahahahaha! It's so funny! I know why now! It's because your poor Bunny IS dead! I think…
Does your screen look like this?

( ) ( )
(+ +)
( ) ( )
( ) ( )

If so, it means your Bunny Gotchi is dead!!! If Bunny Gotchi is dead, you can not access certain menu functions, such as FD, HG and FT. This is no bug or error, it is intentional. I don't allow you to feed dead Bunny Gotchi's. Why? Because they're dead.

What you should be able to do, is access the "ST" menu (by pressing [Y=] when paused) which brings up the statistics (or status, whatever) of Bunny Gotchi, and you should be able to see why Bunny Gotchi died. The other menu option you should be able to access is the "OP" menu (by pressing [GRAPH] when paused) which brings up the options, and should give you an option to "RESTART BUNNY" which will create you a brand new baby Bunny Gotchi. Or alternatively, you could perhaps revive Bunny Gotchi by using a cheat, but I can't remember whether or not I integrated a feature to cheat in the game…So if I did program a way to cheat, I wouldn't be able to tell you how to use it because I have forgotten…

Perhaps I should mention that in the instructions somewhere.

Did that, by the way, solve your problem?

Cheers ~ James Kanjo

Last edited on 29 Apr 2008 10:24 by GoVegan Show more

Re: Bunny Gotchi ~ By James Kanjo

krazyness 29 Apr 2008 11:42

Ahahahahahahahaha yes u got it that's what it is… lol that's hilarious I though he waslike constipated lol!

fold Re: Bunny Gotchi ~ By James Kanjo
James Kanjo 29 Apr 2008, 02:09 -0-400
Aaahahahahahaha! It's so funny! I know why now! It's because your poor Bunny IS dead! I think…
Does your screen look like this?

( ) ( )
(+ +) <—Looks like he's taking a dumb lol
( ) ( )
( ) ( )

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 29 Apr 2008 21:31

Hehehe, true! It does!

I'm glad we solved that issue, I'm going to update the ReadMe file now =D

Cheers ~ James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

krazyness 29 Apr 2008 22:21

lol k. I hope you don't mind, but I erased the program since it took up a lot, and I am currently dealing with big, annoying, retarded matrices for maps….lol. Anyway, there wasn't enough mem for them to all fit snuggly on my RAM. lol

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 30 Apr 2008 00:22

Not at all ~ I wouldn't blame you but myself.

I could shrink the program massively by removing the instructions at the end, but I'm not sure if I should…

The inbuilt instructions may be usefull for people you transfer the program to… maybe that's the risk I'll have to take?

I think I have optimised it a lot, and I'm not sure how much more I could possibly optimise it (if you see anything, just tell me please!)

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 02 May 2008 22:54

Version 1.2 of Bunny Gotchi is now available!

It features a whole new "quick buttons" functionality allowing you to do things more quickly. I have removed all previous bugs and glitches, and improved some sections of code. You can download it here at http://www.unitedti.org/index.php?showtopic=7888

Unfortunately, I really can't think of anything else to do to improve Bunny Gotchi. Therefore I am open to suggestions for improvements, and, as always, am open to ANY sort of feedback (good or bad).

I do have a question, however. Bunny Gotchi is a large program, 9146 bytes. If I completely remove the instructions/inbuilt help, then the program would be reduced to 7698 bytes. Should I?

Cheers ~ James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

krazyness 03 May 2008 00:10

Yeah!!!!!! Dude, readmes are there for a reason…lol. Also, don't put spaces betwwen the various options in the Menu( function. It takes up memory, and is quite pointless.

That's all =D

~kRaZiNeSs

Re: Bunny Gotchi ~ By James Kanjo

burr 03 May 2008 03:34

Besides removing the instructions / help, I bet there's probably still some optimization that you can do. I would go through the program code again.

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 May 2008 10:12

Actually, yes, there is. I could rework the framework of my program to be ridden of GoTo commands and wire the whole thing into a special repeat loop. Logically thinking, however, this would improve the performance of the game, not so much the memory it takes up (replacing Lbl and GoTo commands with loops, hence no memory saved). Having said that, the performance of a game is just as important as the size it takes up, so I will get to work on reworking the program for the next version.

Cheers ~ James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 04 May 2008 02:04

Okay, it took me a very long time, but I did it. By making my program a loop program rather than a Lbl Goto program, I increased the file size to 7836 bytes. It also turned into an inferior program (very, very slow), the whole process being very ineffective.

However, in the process I was able to find some other small optimisations, and reduced program Version 1.2 to 7404 bytes. I might release it as version 1.3.

Cheers ~ James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 May 2008 13:22

Golly, you're right!

I just found some things in the wash animation and the exercise animation that I reduced dramatically (using a 'lossy' method of animation, changing only what I needed to change). I also found a ridiculous number of spaces on the first Output( of the basic animation sequence.

I have reduced the program from 7679 bytes to 7421 bytes (saving 258 bytes), thankyou for the suggestion. I am now quite confident that there is little more I can do to reduce the size. I'm just going to work on restructuring the program without GoTo commands now.

Cheers ~ James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

krazyness 03 May 2008 14:00

Check to see if the closing parenthesis and " marks are gone.

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 May 2008 22:17

Thanks, but I did that in version 1.1 ;)
(Oh, if you're referring to the string at the end of the program that says "Gone To Bunny," then yes, I discovered that last night)

Re: Bunny Gotchi ~ By James Kanjo

GoVegan 03 May 2008 10:07

Yeah, okay. But I did have a point for the gaps between menu options, and that was to make a distinctive separation to avoid accidental incorrect selection. However, you have implied that it is unnecessary, therefore:

Redundant instructions…GONE!
Gaps between menus…GONE!

New file size…7679 bytes. Thankyou for your feedback krazyness! You have helped me to improve the quality of my game, and overall enjoyability for everybody else =D

Cheers ~James Kanjo

Re: Bunny Gotchi ~ By James Kanjo

krazyness 03 May 2008 12:55

No problemo. Also, the gaps in the menus just got me confused when I used it, because I had no idea as to why they ere there (I thought maybe my calc's Menu( command was like broken). Anyway, congratz on the size =p.

Bunny Gotchi ~ By James Kanjo

GoVegan 08 Jun 2008 02:31

Hey everybody, Bunny Gotchi Version 1.5 is now available for download!

Over the last month I've been finding more and more optimisations and have been fixing a few glitches I found on the way. For a week, I've been analysing the code and have been finding nothing else to do, so I decided to release it. Bunny Gotchi is now a much smaller program; 7164 bytes. It's really amazing how one can make something smaller and smaller, yet better and better — much like technology today.

burr, I like the way you tell people there are optimisations out there, but leave it up to person to find them. It is a great way to teach the programmer what to look for when optimising. I reckon I've optimised it a ton now, but if you see anything…

You can download it here at http://www.unitedti.org/index.php?showtopic=7888

Like last time, I'm open to all sorts of criticism, comments and ideas for improvement!

Cheers ~ James Kanjo

Last edited on 08 Jun 2008 11:06 by GoVegan Show more