### Author Topic: What's wrong with this code ?  (Read 6637 times)

0 Members and 1 Guest are viewing this topic.

#### Xeda112358

• they/them
• Moderator
• LV12 Extreme Poster (Next: 5000)
• Posts: 4629
• Rating: +717/-6
• Calc-u-lator, do doo doo do do do.
##### Re: What's wrong with this code ?
« Reply #15 on: February 18, 2013, 07:57:55 am »
Yep, if Grammer isn't installed and you try to run the program, it will be run as a BASIC program, so it exits. If it is run as a Grammer program, the first "." tells it that it is a label, so it skips the line.

And here is the code:
Code: [Select]
:.0:Return:31→Y:47→X:0→L:30→M:1→P:ClrDraw:While Y=abs(Y:Line(0,59,5,96,1:randInt(0,86:Line(,59,5,12,2:1→F:For(A,1,M:getKey→K:If K=10:Full:If K=11:Full0:K=3:-K=2:+Ans+X:If <86: and !Line(Ans,Y,6,6,15:→X:If Y<52: and !Line(X,Y+6,1,6,14:IS>(Y:Repeat 1:Return→Z:Line(X,Y+1,4,6,2:Line(X+1,Y,6,4,2:End:DispGraph:prgmZ:If P xor 1→P:Tangent(1,8:Y-!!Line(X,Y,7,6,15→Y:End:If L+1→L=5: and M>14:Then:0→L:M-1→M/30:If θ': and P>0:P-1→P:End:End:Stop

#### blg_flg

• LV0 Newcomer (Next: 5)
• Posts: 3
• Rating: +0/-0
##### Re: What's wrong with this code ?
« Reply #16 on: February 18, 2013, 10:36:14 am »
Ok. Thank you very much! But what's the prgmZ?

Edit: Ah ok the hooks were not activated... --'
« Last Edit: February 18, 2013, 11:26:58 am by blg_flg »
I'm French! Don't hesitate to correct my spelling mistakes; I would be pretty happy!

#### persalteas

• Posts: 231
• Rating: +44/-4
• z80 poweeer
##### Re: What's wrong with this code ?
« Reply #17 on: February 18, 2013, 11:14:34 am »
Xeda has not activated his hooks.

"prgm" is "call", so, it means "call Z"

Spoiler For Take a look at the wonderful humor of Adriweb:
(17:17:08) Adriweb: Yes, Xeda is not a hooker.
« Last Edit: February 18, 2013, 11:21:06 am by persalteas »

#### Xeda112358

• they/them
• Moderator
• LV12 Extreme Poster (Next: 5000)
• Posts: 4629
• Rating: +717/-6
• Calc-u-lator, do doo doo do do do.
##### Re: What's wrong with this code ?
« Reply #18 on: February 18, 2013, 12:47:52 pm »
Yes, sorry, I always forget to activate the token hook 'prgm' turns into 'call '

#### persalteas

• Posts: 231
• Rating: +44/-4
• z80 poweeer
##### Re: What's wrong with this code ?
« Reply #19 on: February 19, 2013, 12:10:08 pm »
Quote
:If <86: and !Line(Ans,Y,6,6,15

By this, do you mean "If Ans=/=0 and Ans<86:Line(Ans,etc..." ?

#### Xeda112358

• they/them
• Moderator
• LV12 Extreme Poster (Next: 5000)
• Posts: 4629
• Rating: +717/-6
• Calc-u-lator, do doo doo do do do.
##### Re: What's wrong with this code ?
« Reply #20 on: February 19, 2013, 01:01:32 pm »
Quote
:If <86: and !Line(Ans,Y,6,6,15

By this, do you mean "If Ans=/=0 and Ans<86:Line(Ans,etc..." ?
The "If <86" part would translate to TI-BASIC as:
Code: [Select]
If Ans<86 and Ans≥0Then Line(Ans,Y,6,6,15 is used to pixel-test the rectangular region, so !Line(Ans,Y,6,6,15 means in TI-BASIC:
Code: [Select]
not(Line(Ans,Y,6,6,15    ;pretend this still pixel tests the regionRemember that ':' can be used in an If statement to separate different parts. So the line translates to:
Code: [Select]
:If (Ans<86 and Ans≥0) and not(Line(Ans,Y,6,6,15

#### persalteas

• Posts: 231
• Rating: +44/-4
• z80 poweeer
##### Re: What's wrong with this code ?
« Reply #21 on: February 19, 2013, 01:16:06 pm »
Oh. yes.

I have forgotten that Line could have a pixel-test role. (cf my question in Grammer 3 ideas).

Thanks.

#### DJ Omnimaga

• Former TI programmer
• CoT Emeritus
• LV15 Omnimagician (Next: --)
• Posts: 55828
• Rating: +3151/-232
• CodeWalrus founder & retired Omnimaga founder
##### Re: What's wrong with this code ?
« Reply #22 on: February 20, 2013, 04:48:40 pm »
I still would like to at some point, but I don't know when I would do that .__. Also, welcome blg_flg The code wasn't that bad. At least it worked when the bugs were fixed
It probably depends of how large grammer is in terms of flash app page memory taken. If it fills an entire page (16 KB), then it might be fine (leaving 11 KB to the user), but if it takes 2 pages, the 82 Stats/83 only has 27 KB of memory.
In case you are wondering where I went, I left Omni back in 2015 to form CodeWalrus due to various reasons explained back then, but I stopped calc dev in 2016 and am now mostly active on the CW Discord server at https://discord.gg/cuZcfcF

#### Xeda112358

• they/them
• Moderator
• LV12 Extreme Poster (Next: 5000)
• Posts: 4629
• Rating: +717/-6
• Calc-u-lator, do doo doo do do do.
##### Re: What's wrong with this code ?
« Reply #23 on: February 20, 2013, 08:39:50 pm »
I was thinking about it this morning and I would probably make a version that didn't have as many features. It would still have many more features than Grammer 1, but it would probably be about 6000 bytes and use more OS routines. Currently, Grammer uses mostly custom routines to make things faster, so if I used OS routines, I could probably save about 1000 bytes of code Also, I have optimised many routines to be even faster than the Grammer 1 routines (and smaller) so that should help.

#### persalteas

• Posts: 231
• Rating: +44/-4
• z80 poweeer
##### Re: What's wrong with this code ?
« Reply #24 on: February 21, 2013, 04:47:10 am »
That's a very good news
even if it has less features, it will be very appreciated, for now, there is no intermediary between Basic and Asm on TI-83s...

#### DJ Omnimaga

• Former TI programmer
• CoT Emeritus
• LV15 Omnimagician (Next: --)
• Posts: 55828
• Rating: +3151/-232
• CodeWalrus founder & retired Omnimaga founder
##### Re: What's wrong with this code ?
« Reply #25 on: February 21, 2013, 09:15:16 am »
Cool to hear. Just make sure that the most used features are still there and it should be fine. And I agree Persalteas. Also if someone make Grammer programs for the TI-83 maybe he could read them on a 83+ too, since you can send 83p files to them as well.
In case you are wondering where I went, I left Omni back in 2015 to form CodeWalrus due to various reasons explained back then, but I stopped calc dev in 2016 and am now mostly active on the CW Discord server at https://discord.gg/cuZcfcF