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
« 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
« 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
« 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
« 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
« on: June 13, 2012, 09:30:30 am »
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
« 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
« 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
« 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
« 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
« 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.gifThis 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
« 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
« on: April 26, 2012, 01:45:48 pm »
223
« 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
« 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
« 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
|