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 - cooliojazz
Pages: 1 ... 23 24 [25] 26 27 ... 41
361
« on: April 10, 2010, 02:39:50 am »
Well, I'm not sure how the heck yours works, and i got lots of syntax errors and stuffs, but after "fixing" it i think this runs faster:
:Input "?x? ",θ
:{θ,θ→dim([A]
:0→C
:For(A,1,θ
:For(B,1,θ
:C→[A](A,B
:C+1→C
:End
:End
:Disp [A]
:1→X:1→Y
:For(A,1,θ2
:randInt(1,4→B
:X→W:Y→Z
:Repeat X≠W or Y≠Z
:randInt(1,4→B
:X+(B=3)-(B=1→X
:Y+(B=4)-(B=2→Y
:X+(X=0)-(X=θ+1→X
:Y+(Y=0)-(Y=θ+1→Y
:End
:[A](Z,W→C
:[A](Y,X→[A](Z,W
:C→[A](Y,X
:End
:Disp [A]
thats what you want right? It just shuffles it? This does it only as many times as there are peices, cause past that it's a bit pointless... and i changed the first tile to "0" to represent the blank tile...
362
« on: April 08, 2010, 10:33:28 pm »
o wait, sorry, thats what i meant, wasnt thinking and just decided to put a 1 byte # for some reason =P
363
« on: April 08, 2010, 10:27:37 pm »
If by Tilesets you mean a single picture, then its inly 256, but because of the fact that xlib is awesome, the 257th tile is the first tile from the next picture # eg. pic 10 to pic 11, so thats how the constraint is just memory. Just wanted to make sure that was explained. =P
364
« on: April 05, 2010, 11:47:14 pm »
Yay! I havent gotten to test it yet 
365
« on: April 05, 2010, 09:33:42 pm »
Wow, thats awesome! And I like that coin counter as it is!
366
« on: April 05, 2010, 12:17:39 am »
Well, I ran into it again with this:
For(A,0,2*{L1+X}) //Does not work
For(A,0,{L1+X}*2) //Does work
I also ran into it in another program, gut I could never actually completely fix that one...
367
« on: April 04, 2010, 10:48:10 pm »
Hopefully so  And Quigibo, did you ever find this?
368
« on: April 02, 2010, 12:19:45 am »
:.MUSICAL
:[0000000038444438040404043C444438040404043C7C7C38040605043C7C7C38040605063D7C7C380000000000000000]→Pic1
:
:
:DiagnosticOff
:ClrHome
:Repeat getKey
:For(X,0,11
:For(Y,0,7
:Pt-Off(X*8,Y*8,8*(rand/13107)+Pic1
:End
:End
:DispGraph
:Output(2,0,"Unreal Music
:Output(4,1,"Notator
:End
:
:
:Lbl MN
:ClrDraw
:Pt-Off(0,0,Pic1 if this is here, it crashes/doesnt work. otherwise life is good.
:DispGraph
:While 1
:
:ReturnIf getKey(15)
:End
:
:
:Lbl PS
:0→X
:While {L1+X}≠50
:For(A,0,{L1+X+1}
:{L1+X}→B
:SinRegB2/4+(B*14)+269,10000
:End
:X+2→X
:ReturnIf getKey(15)
:End
there ya go
369
« on: April 02, 2010, 12:05:30 am »
Well, I retyped it all on another real calc, a virtual one, makes no difference. They all crash on that second Pt-Off statement, or ignore it in my calculators case. Dj, mine and my sisters, the two real ones i tried it on, are both 5.23. The virtual was 2.41. So, i have ruled out a corrupted file for reason of failage, tho i do still think my calculator corrupts them...
370
« on: April 01, 2010, 10:40:28 pm »
Yay, a fan of the title screen! And basically, i uploaded it to source coder, verified it showed the right code then saved it. It seemed to work. Sadly not so much. I tried compiling it and rerunning it using that version, and it just wouldnt go on on screen press... so i think my calculator is screwed up. So, i think i'm going to try completely rewriting it on my sisters calc and see if i get the same set of errors that are popping up...
371
« on: April 01, 2010, 10:11:54 pm »
No, it compiles just fine. It just doesnt run as suppossed to. i put it all in the code as comments in the first post...
Also, this version i was actually able to open in an emulator. (the last i couldnt either)...
372
« on: April 01, 2010, 01:37:28 pm »
What main loop? It goes down there after it finishes the intro, no need to be called. And it's there because future code would call that point. But i didnt put in that code yet. And builderboy, since it shows the text, and it would show a horizontal line routine i made as well, i really don't think it's erasing it. =p And i don't know why you guys are getting errors, i can load it back on as well... Maybe my OS got screwed up or something...
373
« on: March 31, 2010, 11:13:35 pm »
No, that was directly transfered from my calculator. And the other one i manually typed up
374
« on: March 31, 2010, 11:01:23 pm »
Umm, sure...
375
« on: March 31, 2010, 10:48:02 pm »
Hey, i need a bit of help, considering this is baffling me to the point my head exploding. .MUSICAL
[0000000038444438 //These are all the different sprites. They are actually on one line, i just
040404043C444438 //spread them out so you can see them
040404043C7C7C38
040605043C7C7C38
040605063D7C7C38
0000000000000000]→Pic1
4→{L1} //Initializes stuff not really important to this part of the program.
2→{L1+1} //Well, it was. Then i deleted the part that used it in frustration
5→{L1+2}
2→{L1+3}
50→{L1+4}
DiagnosticOff //This is the happy little intro screen that works perfectly fine
Repeat getKey //It just displays random notes with a title. I like it :)
For(X,0,11
For(Y,0,7
Pt-Off(X*8,Y*88*(rand/13107)+Pic1
End
End
DispGraph
Output(2,0,"Unreal Music"
Output(4,1,"Notator"
End
Lbl MN
ClrDraw
Pt-Off(0,0,Pic1 //This is a remanant I left for example. No matter what i put, it will not draw any of the sprites
DispGraph //(I have tried all the ones I defined above) Nor will any of the other sprite routines work.
Output(0,1,"O" //This is just to show, this still works. So does the horizontal line drawing routine which used to be here...
While 1
0→K
Repeat K //Yes, i know this is a lot of pointless code. Remember that deleting i mentioned above? this is what remains
getKey→K
ReturnIf K=15
End
End
.....(There's more, but the rest doesnt matter)
So can any body tell me what i'm doing wrong, i f i'm doing anything wrong, cause i really dont think i am... 
Pages: 1 ... 23 24 [25] 26 27 ... 41
|
Show Posts