- 03 Aug 2006 09:43:39 am
- Last edited by calc84maniac on 24 Aug 2006 03:30:26 pm; edited 1 time in total
i dont think so...
Have you tried textsprites?
Have you tried textsprites?
if you are talking about Text(0,0,"X. than yes but if you are talking about overlapping symbols to do it than no because they are to complicated
- 03 Aug 2006 09:49:19 am
- Last edited by calc84maniac on 24 Aug 2006 03:30:36 pm; edited 1 time in total
Actually they are quite easy if done properly
To draw a Diamond:
Code:
See that new 83 optimization guide on ticalc. It tells you how to use them
To draw a Diamond:
Code:
:"<:>
:For(X,1,length(Ans
:Text(0,X,sub(Ans,X,1
:End
See that new 83 optimization guide on ticalc. It tells you how to use them
i have read it but i will read over it again. i also tried using the scatter plot but it blinked to much so i might just go back to using pxl-on( if i cant figure out the other things.
I'd say stick with the stat sprites. The flicker can't be helped but hopefully you can make up for it with good gameplay and graphics. Plus, stat sprites update themselves if you store a string to the list.
i might use statplots but i think i figured out a way to make it not flicker as much. plus i also need to figure out how to make the 0 not appear on the end of the list because when i move around it follows the sprite around
You should make the 0 match one of the previous elements. One location will be plotted twice but at least the dot won't follow the sprite around.
i will do that sounds like a good enough solution. my solution to stopping it from flickering worked now it only flickers when you move.
alright i am creating a routine that allows a user to input their initials by pushing the up and down arrows but i am running into a problem. here is the code:
Code:
the problem i am having is getting the initials to go into a string at the end(didnt include that part in code). it is happening because if i try to store ans into str2 ans==105 and numbers cant go into strings. so how could i fix the problem. i am running out of ideas.
Code:
:ClrHome
:1→A
:1→B
:"ABCDEFGHIJKLMNOPQRSTUVWXYZ→Str1
:Repeat K=105
:Output(1,A,sub(Str1,B,1
:getKey→K
:If max(K=25,34
:Then
:B+(K=34)(B<26)-(K=25)(B>1→B
:End
:If K=26
:Then
:1→B
:A+(K=26)(A<3→A
:Endthe problem i am having is getting the initials to go into a string at the end(didnt include that part in code). it is happening because if i try to store ans into str2 ans==105 and numbers cant go into strings. so how could i fix the problem. i am running out of ideas.
You are usually supposed to include the part of the code you are having trouble with...
However, it sounds simple enough. After each letter is entered, do the substr() of Str1. The same way you are currently displaying it
(so ""[sto>]Str2 and then Str2 + sub(Str1, B, 1) [sto>] Str2 for each character) 
lafferjm wrote:
the problem i am having is getting the initials to go into a string at the end(didnt include that part in code).
/burr calls up Chuck Norris so he can give lafferjm a karate chop for his forgetfulness
burr wrote:
/burr calls up Chuck Norris so he can give lafferjm a karate chop for his forgetfulness
Dude, its a ROUNDHOUSE KICK - Chuck Norris isn't some whimpy Ninja or something
(And I believe you meant "/me", not "/burr" 
) Kllrnohj wrote:
burr wrote:
/burr calls up Chuck Norris so he can give lafferjm a karate chop for his forgetfulness
Dude, its a ROUNDHOUSE KICK - Chuck Norris isn't some whimpy Ninja or something
(And I believe you meant "/me", not "/burr" )Is Chuck Norris not awesome enough to kick butt whichever way he prefers?
He was a pupil of Bruce Lee's, so if he feels like doing a karate chop, he can do a karate chop 
ANYWAY. Lafferjm, can you please post that missing segment of code that sets the initials that these two are karate chopping and roundhouse kicking over?
well before i read it i found a way to fix the problem. i edited the main code a bit and stored numbers into a list and than created another program that decoded the list
lafferjm wrote:
well before i read it i found a way to fix the problem. i edited the main code a bit and stored numbers into a list and than created another program that decoded the list
Uh... why? What was wrong with what I posted? Much faster and more efficient that what you are describing there...
there is no actual problem with this code but when i run it it makes my screen a little bit lighter. and i have no idea why. it is a spread sheet program that i am working on because i was inspired by office de. anyways here is the code:
Code:
Code:
:0→Xmin
:94→Xmax
:‾62→Ymin
:0→YMax
:AxesOff
:PlotsOff
:FnOff
:ClrHome
:ClrDraw
:Text(9,20,"SPREAD SHEET V1.0
:Text(18,42,"BY
:Text(27,30,"LAFFERJM
:Text(55,5,"C
:Circle(6,‾58,4
:Text(55,12,"LAFFERJM
:Pause
:Lbl 1
:ClrDraw
:DelVar [A]
:8,7→dim([A]
:Fill 0,[A]
:Text(0,20,"NEW
:Text(0,60,"QUIT
:Horizontal(‾6
:Line(0,‾6,0,‾62
:Line(94,‾6,94,‾62
:For(A,‾6,‾62,‾7
:Horizontal(A
:End
:For(A,13,78,13
:Line(A,‾6,A,‾62
:End
:1→B
:2→D
:Repeat B=8
:8→A
:7→C
:Repeat A=0
:Text(C,D,[A](1,1
:C+7→C
:A-1→A
:End
:B+1→B
:D+13→D
:End
:Repeat K=14
:getKey→K
:If K=12
:Then
:1→C
:14→K
:End
:End
:If C=1:Goto 1
:ClrDraw
:ClrHome
:ZStandard
:AxesOn
:DelVar [A]DelVar ADelVar BDelVar CDelVar DDelVar EDelVar KDelVar YDisp "THANKS FOR
:Pause "USING.
:ClrHome
:Output(1,1,"
:ReturnRegister to Join the Conversation
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
Advertisement