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 - meishe91

Pages: 1 ... 8 9 [10] 11 12 ... 207
136
I just meant in general.

137
Miscellaneous / Re: Programming Tutorials, Help, Etc.
« on: March 03, 2011, 11:09:38 pm »
Thanks. Changed and added.

138
Art / Re: photoshop project critique
« on: March 03, 2011, 10:24:01 pm »
It looks pretty cool, though I think it might help if you get a image of a recycle symbol though and then overlay the pictures onto that instead of try to make one. Yours isn't bad, it just looks a little off since each arrow doesn't look the same. Also, it might look kind of cool if you like emphasize the line that turns the arrow (and make it look like the picture wraps around and comes out, if that makes any sense). Good luck on it though.

139
TI-BASIC / Re: Undo
« on: March 03, 2011, 06:30:50 pm »
So the code in question is this:

Code: [Select]
ZStandard
104→Xmax
72→Ymax
ZInteger
ClrDraw
For(A,0,31
Horizontal A
End
"L1(A→u
{100621062,301030,10059.1,20359.1,30759.1,110027.1,120327.1,130727.1,201059.1,201027.1,56.2,156.2,107252.3→L1
For(A,1,dim(L1
iPart(E2fPart(u/E2→Z
iPart(E2fPart(u/E4→X
fPart(u→C
If .1=Ans
Then
iPart(10fPart(u/E5→B
iPart(u/E5
If not(Ans
Pt-On(X,Z,B
If 1=Ans
Pt-Off(X,Z,B
If 2=Ans
Pt-Change(X,Z
End
If .2=C
Then
If X
Horizontal Z
If not(X
Vertical Z
End
If .3=C
Circle(X,Z,iPart(E2fPart(u/E6)),{i
If not(C
Line(iPart(E2fPart(u/E8)),iPart(E2fPart(u/E6)),X,Z,iPart(u/E8
End

First I'll go over the compression.

Each element is checked for it's decimal point via fPart() because the type of command that is graphed is dependant on it.

0=fPart(\Number\): The data is for a Line() command.
.1=fPart(\Number\): The data is for a Pt-On()/Pt-Off()/Pt-Change() command.
.2=fPart(\Number\): The data is for a Horizontal/Vertical command.
.3=fPart(\Number\): The data is for a Circle() command.

Code: (Line() Command Compression) [Select]
123456789
|||||||||These two numbers are the second y-coordinates for the command.
|||||||These two numbers are the second x-coordinates for the command.
|||||These two numbers are the first y-coordinates for the command.
|||These two number are the first x-coordinates for the command.
|This number dictates if the command is turning on the line or turning it off (one if it is turning it on, zero if it is turning it off).


Code: (Pt-On()/Pt-Off()/Pt-Change() Command Compression) [Select]
123456.1
|||||| |Tells the program that it is a Pt-On()/Pt-Off()/Pt-Change() command.
||||||These two numbers are the y-coordinate for the command.
||||These two numbers are the x-coordinate for the command.
||This number dictates if it is a dot, cross, or sqare point that is drawn (one for a dot,
||two for a square, three for a cross; doesn't matter what it is for Pt-Change() since
||it doesn't have a third argument).
|This number dictates if it is a Pt-On()/Pt-Off()/Pt-Change() (zero if it is Pt-On(), one if it is Pt-Off(), two if it is Pt-Change()).

Code: (Horizontal/Vertical Command Compression) [Select]
123.2
||| |This number tells the program that it is a Horizontal/Vertical command.
|||These two numbers are the coordinate number.
|This number dictates whether it is a Horizontal or Vertical command (one for Horizontal, zero for Vertical).

Code: (Circle() Command Compression) [Select]
123456.3
|||||| |This number tells the program that it is a Circle() command.
||||||These two numbers are the y-coordinate.
||||These two numbers are the x-coordinate.
||These two numbers are the radius.

Ok, not to start breaking down the code.

Code: [Select]
ZStandard
104→Xmax
72→Ymax
ZInteger

This just sets the window to Xmin=0,Xmax=94,Ymin=0, and Ymax=62.

Code: [Select]
ClrDraw
For(A,0,31
Horizontal A
End

Clears the graphscreen then fills the bottom half of the screen.

Code: [Select]
"L1(A→u
{100621062,301030,10059.1,20359.1,30759.1,110027.1,120327.1,130727.1,201059.1,201027.1,56.2,156.2,107252.3→L1

This stores the string "L1(A" to the equation variable u. Basically what it does is that each time that variable is called it will execute that "equation" each time. (Though now that I think about it that can probably be replaced with something else.)
The second line is just storing a test list to demonstrate what the program does.

Now we get into the belly of the code.

Code: [Select]
For(A,1,dim(L1
iPart(E2fPart(u/E2→Z
iPart(E2fPart(u/E4→X
fPart(u→C

This starts the loop that loops through the list. Then it stores the thousands and hundrends number to the X variable and the tens and ones numbers to the Z variable, because the Y variable can get erased. Then it stores the decimal point of the current list element to the C variable.

Code: [Select]
If .1=Ans
Then
iPart(10fPart(u/E5→B
iPart(u/E5
If not(Ans
Pt-On(X,Z,B
If 1=Ans
Pt-Off(X,Z,B
If 2=Ans
Pt-Change(X,Z
End

This is the code to display Pt-On()/Pt-Off()/Pt-Change() commands. First it stores what kind of point it is to the B variable then finds out which command it is. It then displays the correct command and type.

Code: [Select]
If .2=C
Then
If X
Horizontal Z
If not(X
Vertical Z
End

This is the code for displaying a Horizontal/Vertical command. Since only one coordinates is used we are able to use the X variable to determine which command it is and execute accordingly.

Code: [Select]
If .3=C
Circle(X,Z,iPart(E2fPart(u/E6)),{i

This code simply displays a circle. It uses the X and Z variables for the coordinates and then directly finds the the radius.

Code: [Select]
If not(C
Line(iPart(E2fPart(u/E8)),iPart(E2fPart(u/E6)),X,Z,iPart(u/E8
End

This code displays a line, or turns one off. It directly finds the first couple of coordinates and then uses the X and Y variables for the second set of coordinates. Then it just finds whether that first number was a one or zero and uses it to turn the line on or off.
The End is then the end of the For() loop.

That explain things better?

I'll also go over it all and try to optimize it some later.

140
Bump.
Any news on this?

141
TI-BASIC / Re: Extra Detail Suite
« on: March 03, 2011, 02:54:44 pm »
Dang it, I had just optimized it but you guys beat me...:P

142
TI-BASIC / Re: Undo
« on: March 03, 2011, 01:18:19 am »
He means my code that I posted here.

143
TI-BASIC / Re: Undo
« on: March 03, 2011, 01:14:05 am »
Ok, I'll explain it as best as I can. However I am really tired tonight so I will do it tomorrow after I've gotten some sleep.

144
TI-BASIC / Re: Undo
« on: March 03, 2011, 01:04:44 am »
Oh ya...that's right. I remember Hot_Dog saying something about that in the Correlation sub-forum somewhere.

145
TI-BASIC / Re: Undo
« on: March 03, 2011, 12:55:06 am »
Because TI sucks...um...wait...no...I mean...nevermind, that's what I mean :P Seriously though, I'm not sure. I'm sure someone does though. Would be nice if it was uniform or just a lot faster.

And do you mean my code here for my display routine? If so, do you first understand the compression method? Because that would be a huge part of explaining the code.

146
TI-BASIC / Re: Undo
« on: March 02, 2011, 10:45:50 pm »
Nope, lists are the same speed regardless where you are recalling from. However strings get slower and slower the further you get into them. So say you have a string with 5000 tokens in it, it will take significantly longer to recall tokens 4951-5000 as opposed to 1-50.

147
Humour and Jokes / Re: Experimental Updates
« on: March 02, 2011, 09:31:15 pm »
Dang it DJ, you jinxed me :P I moved it to the wrong place, but finally got it fixed...just need a Admin to delete the wrong one now...>.> :P

148
Site Feedback and Questions / MOVED: Experimental Updates
« on: March 02, 2011, 09:27:15 pm »
This topic has been moved to Randomness.

http://ourl.ca/9454

149
TI-BASIC / Re: Undo
« on: March 02, 2011, 08:33:05 pm »
That's the only way you're going to bypass the 999 undo limit, unless you store to a string but then it will get really slow the bigger the string gets.

150
Humour and Jokes / Re: Experimental Updates
« on: March 02, 2011, 08:31:53 pm »
Ooo ooo ooo! Can I move it? Will be my first thread move as a moderator ;) :P

Pages: 1 ... 8 9 [10] 11 12 ... 207