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 - Eeems
Pages: 1 ... 367 368 [369] 370
5521
« on: May 09, 2009, 02:33:38 pm »
thanks, I'll take a look, and maybe I'll find some optimizations  I haven't added in moving enemies, but I still haven't optimized my code, so mine is slower then it could be.
5522
« on: May 09, 2009, 01:55:35 pm »
I don't use Instring( yet because I am only testing for one right now, but I may add more ones later.  I wonder which one of ours is faster right now? (I'm using a TI-83+ ROM) oh yeah, those "..." tiles are monkey bars which my character is climbing across
5523
« on: May 09, 2009, 01:01:26 am »
unless of course you are trying for a very large string right?
5524
« on: May 09, 2009, 01:00:32 am »
Invasion of privacy/identity theft will always be illegal for regular citizens such as me, you and the other users of these forums.
but not for non regular citizens?! 0.o
5525
« on: May 09, 2009, 12:53:49 am »
and a cookie 
5526
« on: May 09, 2009, 12:51:17 am »
I think we are talking about chips not chili, though it has chili flavour...I've never had Chili in Arizona before...not even sure I've been there 
5527
« on: May 09, 2009, 12:43:05 am »
I figured it out, and I also figured out how to detect the way it is, I'll post my code in a bit.
:For(A,1,8)
:Text(‾1,8A-8,0,sub(Str1,15A-14,15
:StorePic 2
:Text(‾1,8A-8,0,sub(Str2,15A-14,15
:RecallPic 2
:End
:2→B:3→A
:DelVar J
:While 1
:A→C
:B→D
:Text(‾1,8A-8,6B-6,"Ω
:DelVar K
:getKey→K
:If K:Then
:B+(K=26)-(K=24→B
:If B≠D
:Then
:If ""=sub(Str1,15A-14+B-1,1
:D→B
:End
:End
:If ""≠sub(Str1,15(A+1)-14+B-1,1
:Then
:A+1→A
:If J:A-1→A
:Else
:J+L1(1)(K=21→J
:End
:If J:Then
:A-1→A
:J-1→J
:End
:If A≠C or B≠D
:Then
:Text(‾1,8A-8,6B-6,"Ω
:Text(‾1,8C-8,6D-6,"
:End:End
it runs pretty quickly on the 83+. this version also includes spikes and stuff.
5528
« on: May 09, 2009, 12:38:23 am »
isn't it the sweet chili heat up here?
5529
« on: May 08, 2009, 07:14:20 pm »
ah, well I could do the boarder thing but still make it so the maps don't need to be very large, but what about detecting a tile above your character? how did you do that?
5530
« on: May 08, 2009, 06:47:08 pm »
^^ nice
5531
« on: May 08, 2009, 06:12:16 pm »
sounds like a good idea, let me look at the rules to see if you can submit it, because you have already announced it, but you haven't entered it into any other contest yet. Participating in a Contest
* No Used Entries - You may NOT submit an entry that was previously submitted in another contest.
* No Teaming - Unless otherwise specified, you may not submit entries created through collaboration with other people.
* No Stealing - Obviously, do NOT submit someone else's work.
* Be Punctual Within Reason - When a contest ends, the thread will be locked with a final post saying the contest has ended. You may not submit your work beyond then. Any entry emails received afterwards will probably be discarded (unless the judges feel really nice). looks like you could
5532
« on: May 08, 2009, 04:41:24 pm »
hmm, interesting stuff, I just played around with your code trevmeister66
and I was able to cut four bytes from it and display the same amount.
For(A,2,9)
Text(-1,8A-16,0,sub(Str1,14A-12,12
StorePic 1
Text(-1,8A-16,0,sub(Str2,14A-12,12
RecallPic1
EndI also was testing it out and it loads at about teh same speed, but it might be a little faster, I can't really tell.
EDIT: oh yeah I modified it some more and made it 15*8 and I also made it so it doesn't waste memory by making the maps have extra characters that aren't displayed.
For(A,1,8)
Text(-1,8A-8,0,sub(Str1,15A-14,15
StorePic 1
Text(-1,8A-8,0,sub(Str2,15A-14,15
RecallPic 1
Endthis also cut's two more bytes. and that excludes the bytes saved on the maps.
EDIT2: ok, I also added a little bit of game play to it, but I'm having some trouble detecting tiles above your character... how did you do detection?
5533
« on: May 07, 2009, 06:36:32 pm »
so you use a string as a map, hmm, this is what I did, it's kind of slow
:ClrDraw
:For(A,0,60,7)
:For(B,0,94,5)
:If [B](A/7+1,B/5+1
:Then
:Text(-1,A,B,"O
:StorePic 2
:Text(-1,A,B,"X
:RecallPic 2
:End
:End
:End
5534
« on: May 07, 2009, 06:07:45 pm »
ah that's why, what code are you using to display the map? I've been playing around with dual-layer sprite maps but I can't get them to load quickly.
5535
« on: May 07, 2009, 05:30:57 pm »
What calc are you using to play it, because it seems to be loading the screens quite quickly compared to the best I can do with a TI-83+
Pages: 1 ... 367 368 [369] 370
|
Show Posts