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 ... 13 14 [15] 16 17 ... 183
211
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 26, 2012, 07:28:21 am »
So, I've partially gotten things fixed up with the Hyper Potion usage with. I need to move the name retrieval outside of the code I'm currently working with and put it before that all and drop it in a temp Str# variable. This should fix my biggest issue that I have right now.

The text box I'm creating is also way too large. I need to jump into there and get that changed around to the smaller sized box.

After that, we'll see what else is left in finishing off the Hyper Potion. At the very least, it does now actually increase the HP stat :)

212
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 14, 2012, 07:36:49 am »
It seems that the first segment of the code was partially causing my problems. I failed to add in the appropriate 'End' statement to finish off the first If Then. That has partially fixed my issues. I went from:



to where it now does this:



NOW it looks like the issues are within the second chunk of code.

213
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 13, 2012, 12:05:58 pm »
Maybe, I'll look into it later when I have a bit of time and test it.

214
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 13, 2012, 10:29:02 am »
Um, the second part is very correct. It has to dynamically build the string based on which of the 6 lists it will be using, then dump that into a temporary program in order to run. The way I have things set up, I have to have all closing quotes and as far as I know, parenthesis.

The sub(Str9,2,1) is a quotation mark stored in a string, to be dropped into a string.

215
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 13, 2012, 09:30:30 am »
Code: [Select]
If Tmin>0 and Z=1:Then:ClrDraw:RecallPic Pic1:If L1(1)=L1(2):Then:Text(47,4,"HYPER POTION"):Text(53,4,"INEFFECTIVE!"):prgmZWT:1->W:For(F,3,14):Line(3,F,90,F,0):End:End:If L1(1)<L1(2):Then:"rowSwap(ZPNA"->Str0:0->theta:L1(43):prgmZCE:Text(47,4,"USED HYPER POTION!"):L1(1)->X:L1(2)->V:If V-X<200:V-X->J:If V-X>=200:200->J:X+J->|N:While X!=|N:min(|N,X+5)->X:iPart((|E2(X/V)).25->K:Line(65,25,65+K,25):End:For(F,4,14):Line(4,F,90,F,0):End:Text(47,4,Str9," GAINED"):Text(53,4,J," HP!"):X->L1(1):prgmZWT:For(F,4,14):Line(4,F,90,F,0):End:StorePic Pic1:DelVar Pic2:1.5->W:End:


If (Tmin>0 and Z>1) or Tmin=0:Then:"|LP"+sub("123456",Z,1)->Str7:4->theta:"ZTMP3"->Str0:prgmZCE:3->theta:prgmZCE:expr(Str7+"(1)")->X:expr(Str7+"(2)")->V:For(F,0,17:Line(0,F,94,F,0:End:"0ZBD":prgmZRS:{94,0,3,27:prgmTEMP:prgmZC1:If X=V:Then:Text(47,4,"+sub(Str9,2,1)+"HYPER POTION"+sub(Str9,2,1)+":Text(53.4."+sub(Str9,2,1)+"INEFFECTIVE!"+sub(Str9,2,1)+":1.5"+sub(Str9,1,1)+"W:Return:End:If X<V:Then:If V-X<200:V-X"+sub(Str9,1,1)+"J:If V-X>=200:200"+sub(Str9,1,1)+"J:X+J"+sub(Str9,1,1)+"|N:Text(47,4,"+sub(Str9,2,1)+"USED HYPER POTION!"+sub(Str9,2,1)+":While X!=|N:min(|N,X+5)"+sub(Str9,1,1)+"X:Text(7+21(Z!=4 and Z>1)+21(Z=3 or Z=6),(2+52(Z>3))+4(2-int(log(X))),X:iPart((|E2(X/V)).25"+sub(Str9,1,1)+"K:68-21(Z-3(Z>3))"+sub(Str9,1,1)+"I:Line(2+52(Z>3),I,2+(52(Z>3))+K,I:End:X"+sub(Str9,1,1)+Str7+"(1):X"+sub(Str9,1,1)+Str7+"(1):For(F,4,14:Line(4,F,90,F,0:End:0"+sub(Str9,1,1)+"theta:"+sub(Str9,2,1)+"ZPNA"+sub(Str9,2,1)+sub(Str9,1,1)+"Str0:"+Str7+"(43):prgmZCE:Text(47,4,"+Str9+","+sub(Str9,2,1)+" 'S HP INCREASED BY"+sub(Str9,2,1)+":Text(53,4,J,"+sub(Str9,2,1)+" POINTS!"+sub(Str9,2,1)+":prgmZWT:1"+sub(Str9,1,1)+"W"->Str9:1->theta:"ZTMP3"->Str0:prgmZCE:prgmZTMP3:6-theta:prgmZCE:End

The second segment of the code is where I'm currently having my issues with. I'll get around to cutting through the code as I have time over the course of the next few days.

216
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 11, 2012, 07:55:25 am »
One of them I know for certain is Escape Rope. I'm doing them in alphabetical order, so.. Meh, can't remember what the other one is.

217
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 11, 2012, 07:18:43 am »
Thanks!

This is item #11 (Yes, I know I'm slow) and there are at least 2 other items that aren't even close to being finished because I need to figure out how to mod the map system to allow them to work.

218
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 11, 2012, 05:28:12 am »
Thanks DJ.

And ah. I wasn't aware, I got it from Iambian's site while it still existed, and I think I have 4 different copies floating around on my computer. I keep meaning to throw it at my archives just to keep the version I have safe.

219
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 10, 2012, 10:17:15 pm »
No, I use Celtic 2, which is no longer available to the public as far as I know.

220
Pokémon Purple / Re: Progress 2012 [PP]
« on: June 10, 2012, 10:02:48 pm »
I went on a bit of a trip yesterday, 4 hour drive time one way, so I took some time to work on the Hyper Potion item. Here's some screen shots.



The above screenshot was to show me the problem I was running into so I didn't keep getting distracted and forgetting and having to run it on the emulator. The problem ended up being a stray 'Then' command that was messing things up.

Then it popped up with this:



As you can see, messed up on the recalling of the name. I had typed in ZNA instead of ZPNA for the appvar for it to look at. Simple enough fix.

http://tifreakware.net/tifreak8x/pokemon/ss/battlehptestcase3.gif

This one was really long by mistake. Oops. Shows that I had forgotten to update the list with the new HP value. Silly me.



It works!



And to be sure it maxes out properly. Which it did.

221
Pokémon Purple / Re: Progress 2012 [PP]
« on: April 27, 2012, 09:16:37 pm »
I've not stopped working on it, I've just decided to post the smaller updates mostly to TIFW to help eliminate spamming people out and about in the community.

And thanks :) I've been trying to work on it as much as I can.

222
Pokémon Purple / Progress 2012 [PP]
« on: April 26, 2012, 01:45:48 pm »
Quote
So, here are a few screenshots:



These two screenshots above show, in a perfect world when the amount of HP_Gain is either increased by 1 or increased by 5, with the HP_Gain being 200.



Now the above two show what happens when you have an HP_Gain of a non divisible by 5 number, 74. Because everything is wrapped in a For( loop, it doesn't complete the loop properly.

I'm thinking about possible fixes right now, because doing it by +5 is an obvious need, because +1 just takes a long time with larger values. :/

Thoughts on the screenshots?

(following day):



The above screenshot is with Weregoose's code, with the restore value of 147. Now to make this all work in the appvar to be dumped in a program to run.


This is what I've been working on as I have a few seconds here and there to deal with things. So now I have a fully working HP bar increaser for the party, I'll see about getting the actual code to work with the potions soon.

223
Pokémon Purple / Re: [PP] Progress '11
« on: February 07, 2012, 08:08:46 am »
Thanks for the compliments, guys. Sadly, I've not had tons of time to mess with this. It's mostly been chicken scratches at the overall code. Since it's been so small on updates, I've only really posted those small updates on TI-Freakware forums. Once I get something substantial done, I'll make a new topic here.

224
Other Calculators / Re: Anti-Axe/BASIC mentality/debates
« on: November 15, 2011, 12:38:36 pm »
DJ, I wasn't attempting to start any fights. I was pointing out that it looked as if you were trying to say Cemetech and Kerm were bad for starting up a debate on the usefulness of Axe. That is what I was pointing out. Even if you didn't intend to make the post like that, it looks like an indirect bash at Cemetech, and that was rather unfair in my eyes. So long as you are not bashing, then there is no problem.

225
Computer Usage and Setup Help / Re: I might have I virus HELP!
« on: November 14, 2011, 09:27:15 pm »
I work on computers on the side and have recovered several computers with the 2 programs I mentioned. They are highly effective and I give them the highest of recommendations for use in removing viruses and keeping your machine clean in the first place.

Pages: 1 ... 13 14 [15] 16 17 ... 183