Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - tifreak

Pages: 1 ... 15 16 [17] 18 19 ... 183
243
http://tifreakware.net/tutorials/83p/axe/builderboysphysicslessons.htm

I've dropped Builderboy's 5 physics lessons into one file and have them posted there! :D

Let me know if something looks wrong or there is more that needs adding please.

Edit:

http://tifreakware.net/tutorials/83p/axe/builderboysfireanimation.htm

Went ahead and added the fire animation as well :D

244
Pokémon Purple / Re: [PP] Progress '11
« on: September 19, 2011, 07:38:12 am »
Yeah, these typically are. :<

I did find that there are 2 too many End commands in the section of code dealing with the party pokemon using Ether, and it is entirely possible this is causing the issue. I just have to split things up a bit and see.

245
Pokémon Purple / Re: [PP] Progress '11
« on: September 18, 2011, 10:35:48 pm »
Well, been almost a week, thought I'd post an update.

Ether now works for the battling pokemon to the point that it applies the stat increase. However, it merely shuts the game down right after, so I need to figure out where this problem is coming in from.

246
Miscellaneous / Re: Rating TiCalc files
« on: September 16, 2011, 08:43:07 pm »
Actually, a couple of years ago, I started up a group called the TIFW Rate and Review Team. Created an account there on ticalc and everything.

We each would play a game (I think there were 5 of us?) and using our individual accounts, would rate the program. With the TIFW account, we would send a review. We did this to the first 15 or so 89 asm games before people dropped off. It was sadness.

247
Pokémon Purple / Re: [PP] Progress '11
« on: September 12, 2011, 09:16:28 pm »
Nope, it wouldn't work for this project in the slightest. I plan on moving more data over to the appvars once I get battles working properly.

Sadly, Ether is giving me issues, hopefully it can be resolved soon.

248
Pokémon Purple / Re: [PP] Progress '11
« on: September 12, 2011, 05:28:10 am »
Ether = about 2% of the game (I'm guessing, based on the old gbc pokemon games)

3569 bytes * 50 = 178,450 bytes

Oh my holy crap.

This game is already sitting over 110kb, and I am no where near done ;)

249
Pokémon Purple / Re: [PP] Progress '11
« on: September 11, 2011, 10:39:19 pm »
This -is- its own subroutine :p

Don't worry, I'll be making changes to the code. I'll have to sacrifice a slight amount of speed so I can make it smaller. I'm going to drop the Text( commands that display which attacks a pokemon has into a For( loop, and hope that I don't lose too much in speed. Should knock down the size considerably though.

250
Pokémon Purple / Re: [PP] Progress '11
« on: September 11, 2011, 10:01:10 pm »
I come bearing gifts of headaches and suffering:

Code: [Select]
If Tmin>0 and Z=1:Then:ClrDraw:RecallPic Pic1:For(F,4,14:Line(4,F,90,F,0:End:For(F,15,30:Line(0,F,94,F,0:End:"0ZBD":prgmZRS:{94,0,3,27:prgmTEMP:prgmZC1:"rowSwap(ZAN"->Str0:0->theta:0->Tmax:35->A:If 0<L1(3:Then:L1(3:prgmZCE:35->Tmax:Text(35,9,Str9:Text(35,70+4(1-int(log(L1(19)))),L1(19:Text(35,78,"/",L1(23:End:If 0<L1(4:Then:L1(4:prgmZCE:41->Tmax:Text(41,9,Str9:Text(41,70+4(1-int(log(L1(20)))),L1(20:Text(41,78,"/",L1(24:End:If 0<L1(5:Then:L1(5:prgmZCE:47->Tmax:Text(47,9,Str9:Text(47,70+4(1-int(log(L1(21)))),L1(21:Text(47,78,"/",L1(25:End:If 0<L1(6:Then:L1(6:prgmZCE:53->Tmax:Text(53,9,Str9:Text(53,70+4(1-int(log(L1(22)))),L1(22:Text(53,78,"/",L1(26:End:5->W:While W=5:Text(A,5,">":getKey->K:If K:Text(A,5,"   ":A+6((K=34 and A<Tmax)-(K=25 and A>35->A:If K=31:Then:ClrDraw:1->W:End:If K=21:Then:For(F,4,14:Line(4,F,90,F,0:End:For(F,15,30:Line(0,F,94,F,0:End:RecallPic Pic1:If A=35:Then:If L1(19)>=L1(23:Then:Text(47,4,"ETHER INEFFECTIVE":prgmZWT:1->W:End:If L1(19)<L1(23:Then:Text(47,4,"USED ETHER!":10+L1(19->L1(19:If L1(19)>L1(23:L1(23->L1(19:prgmZWT:1.5->W:End:For(F,4,14:Line(4,F,90,F,0:End:End:If A=41:Then:If L1(20)>=L1(24:Then:Text(47,4,"ETHER INEFFECTIVE!":prgmZWT:1->W:End:If L1(20)<L1(24:Then:Text(47,4,"USED ETHER!":prgmZWT:10+L1(20->L1(20:If L1(20)>L1(24:L1(24->L1(20:1.5->W:End:For(F,4,14:Line(4,F,90,F,0:End:End:If A=47:Then:If L1(21)>=L1(25:Then:Text(47,4,"ETHER INEFFECTIVE!":prgmZWT:1->W:End:If L1(21)<L1(25:Then:Text(47,4,"USED ETHER!":10+L1(21->L1(21:If L1(21)>L1(25:L1(25->L1(21:prgmZWT:1.5->W:End:For(F,4,14:Line(4,F,90,F,0:End:End:If A=53:Then:If L1(22)>=L1(26:Then:Text(47,4,"ETHER INEFFECTIVE!":prgmZWT:1->W:End:If L1(22)<L1(26:Then:Text(47,4,"USED ETHER!":10+L1(22->L1(22:If L1(22)>L1(26:L1(26->L1(22:prgmZWT:1.5->W:End:For(F,4,14:Line(4,F,90,F,0:End:End:End:End:End:If iPart(W)=1:Return:If (Tmin>0 and Z>1) or Tmin=0:Then:For(F,0,30:Line(0,F,94,0:End:"0ZBD":prgmZRS:{94,0,3,27:prgmTEMP:prgmZC1:"|LP"+sub("123456",|LPRTY(Z),1)->Str7:35->A:0->Tmax:4->theta:"ZTMP2"->Str0:prgmZCE:3->theta:prgmZCE:"0"+sub(Str9,1,1)+"theta:"+sub(Str9,2,1)+"rowSwap(ZAN"+sub(Str9,2,1)+sub(Str9,1,1)+"Str0:If 0<"+Str7+"(3:Then:"+Str7+"(3:prgmZCE:35"+sub(Str9,1,1)+"Tmax:Text(35,9,Str9:Text(35,70+4(1-int(log("+Str7+"(19)))),"+Str7+"(19:Text(35,78,"+sub(Str9,2,1)+"/"+sub(Str9,2,1)+","+Str7+"(23:End:If 0<"+Str7+"(4:Then:"+Str7+"(4:prgmZCE:41"+sub(Str9,1,1)+"Tmax:Text(41,9,Str9:Text(41,70+4(1-int(log("+Str7+"(20)))),"+Str7+"(20:Text(41,78,"+sub(Str9,2,1)+"/"+sub(STr9,2,1)+","+Str7+"(24:End:If 0<"+Str7+"(5:Then:"+Str7+"(5:prgmZCE:47"+sub(Str9,1,1)+"Tmax:Text(47,9,Str9:Text(47,70+4(1-int(log("+Str7+"(21)))),"+Str7+"(21:Text(47,78,"+sub(Str9,2,1)+"/"+sub(Str9,2,1)+","+Str7+"(25:End:If 0<"+Str7+"(6:Then:"+Str7+"(6:prgmZCE:53"+sub(Str9,1,1)+"Tmax:Text(53,9,Str9:Text(53,70+4(1-int(log("+Str7+"(22)))),"+Str7+"(22:Text(53,78,"+sub(Str9,2,1)+"/"+sub(Str9,2,1)+","+Str7+"(26:End:5"+sub(Str9,1,1)+"W:While W=5:Text(A,5,"+sub(Str9,2,1)+">"+sub(Str9,2,1)+":getKey"+sub(Str9,1,1)+"K:If K:Text(A,5,"+sub(Str9,2,1)+"   "+sub(Str9,2,1)+:A+6((K=34 and A<Tmax)-(K=25 and A>35"+sub(Str9,1,1)+"A:If K=31:Then:ClrDraw:1"+sub(Str9,1,1)+"W:End:If K=21:Then:For(F,0,30:Line(0,F,94,F,0:End:RecallPic Pic2:For(F,0,17):Line(0,F,94,F,0):End:"+sub(Str9,2,1)+"0ZBD"+sub(Str9,2,1)+":prgmZRS:{94,0,3,15:prgmTEMP:prgmZC1:If A=35:Then:If "+Str7+"(19)>="+Str7+"(23:Then:Text(47,4,"+sub(Str9,2,1)+"ETHER INEFFECTIVE!"+sub(Str9,2,1)+":prgmZWT:1"+sub(Str9,1,1)+"W:End:If "+Str7+"(19)<"+Str7+"(23:Then:Text(47,4,"+sub(Str9,2,1)+"USED ETHER!"+sub(Str9,2,1)+":prgmZWT:10+"+Str7+"(19"+sub(Str9,1,1)+Str7+"(19:If "+Str7+"(19)>"+Str7+"(23:"+Str7+"(23"+sub(Str9,1,1)+Str7+"(19:1.5"+sub(Str9,1,1)+"W:End:End:If A=41:Then:If "+Str7+":(20)<"+Str7+"(24:Then:Text(47,4,"+sub(Str9,2,1)+"ETHER INEFFECTIVE!"+sub(Str9,2,1)+":prgmZWT:1"+sub(Str9,1,1)+"W:End:If "+Str7+"(20)<"+Str7+"(24:Then:Text(47,4,"+sub(Str9,2,1)+"USED ETHER!"+sub(Str9,2,1)+":prgmZWT:10+"+Str7+"(20"+sub(Str9,1,1)+Str7+"(20:If "+Str7+"(20)>"+Str7+"(24:"+Str7+"(24"+sub(Str9,1,1)+Str7+"(20:1.5"+sub(Str9,1,1)+"W:End:End:If A=47:Then:If "+Str7+"(21)<"+Str7+"(25:Then:Text(47,4,"+sub(Str9,2,1)+"ETHER INEFFECTIVE!"+sub(Str9,2,1)+":prgmZWT:1"+sub(Str9,1,1)+"W:End:If "+Str7+"(21)<"+Str7+"(25:Then:Text(47,4,"+sub(Str9,2,1)+"USED ETHER!"+sub(Str9,2,1)+":prgmZWT:10+"+Str7+"(21"+sub(Str9,1,1)+Str7+"(21:If "+Str7+"(21)>"+Str7+"(25:"+Str7+"(25"+sub(Str9,1,1)+Str7+"(21:1.5"+sub(Str9,1,1)+"W:End:End:If A=53:Then:If "+Str7+"(22)<"+Str7+"(26:Then:Text(47,4,"+sub(Str9,2,1)+"ETHER INEFFECTIVE!"+sub(Str9,2,1)+":prgmZWT:1"+sub(Str9,1,1)+"W:End:If "+Str7+"(22)<"+Str7+"(26:Then:Text(47,4,"+sub(Str9,2,1)+"USED ETHER!"+sub(Str9,2,1)+":prgmZWT:10+"+Str7+"(22"+sub(Str9,1,1)+Str7+"(22:If "+Str7+"(22)>"+Str7+"(26:"+Str7+"(26"+sub(Str9,1,1)+Str7+"(22:1.5"+sub(Str9,1,1)+"W:End:End:End:End:End"->Str9:1->theta:"ZTMP2"->Str0:1:prgmZCE:prgmZTMP2:6->theta:"ZTMP2"->Str0:prgmZCE:End
This is the code currently that deals with Ether. It alone is 3569 bytes in size.

251
Pokémon Purple / Re: [PP] Progress '11
« on: September 09, 2011, 07:40:02 pm »
I have. However, you lose the smoothness that the Line( command offers. Plus, I'd have to go through the whole game and make those changes since I want it all to be uniform, ya know? So that would eat much more time :p

Besides, using Line( is considerably more precise than guessing with the length of spaces needed to do the same thing.

252
Pokémon Purple / Re: [PP] Progress '11
« on: September 09, 2011, 10:23:34 am »
Heh, I really need to go looking through that national pokedex again..

253
Pokémon Purple / Re: [PP] Progress '11
« on: September 09, 2011, 09:48:26 am »
Rotom?
It's a 4th gen Pokémon.

ooooo~ That would be why, I don't really remember names past first gen too well.

@yeongJIN, what do you mean exactly? Nothing is changing forms :p I just used filler data on the pokemon for testing purposes.

254
Pokémon Purple / Re: [PP] Progress '11
« on: September 09, 2011, 08:49:49 am »
Rotom?

And the stats for each pokemon are stored in lists. 56 element lists.

255
Pokémon Purple / Re: [PP] Progress '11
« on: September 09, 2011, 08:35:39 am »


Just shows that the ether works successfully. The first time ;)

Now to write the code to use Ether on the party pokemon.

Pages: 1 ... 15 16 [17] 18 19 ... 183