Author Topic: Side Project #2: DUNGEON  (Read 26379 times)

0 Members and 3 Guests are viewing this topic.

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #45 on: May 09, 2009, 05:16:07 pm »
ok, I was going to use the list so that anybody could use this engine, but maybe I'll just load everything into the list afterwords, and from the list before
/e

Offline trevmeister66

  • LV9 Veteran (Next: 1337)
  • *********
  • Posts: 1009
  • Rating: +14/-5
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #46 on: May 09, 2009, 05:19:00 pm »
Here's how fast my game is now:


Here's how fast it would be if I didn't slow it down:


It's too fast to be playable if I go without making it slower
« Last Edit: May 09, 2009, 05:22:40 pm by trevmeister66 »
Projects:    nameless RPG: 1.0%  |  Reverse Snake v1.5: 100%  |  Secret Project: 5%  |  DUNGEON: 70%

My MW2 Blog <-- Please visit :)

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #47 on: May 09, 2009, 05:28:17 pm »
of course that's on the TI-84+ SE. mines on the TI-83+ and it's just a tad slow, but fast enough to be fun If I made levels and such
/e

Offline trevmeister66

  • LV9 Veteran (Next: 1337)
  • *********
  • Posts: 1009
  • Rating: +14/-5
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #48 on: May 09, 2009, 05:30:25 pm »
Hmm can I see all your code so I can run it with my ROM/mess with the code a little to see if I can optimize some things?
Projects:    nameless RPG: 1.0%  |  Reverse Snake v1.5: 100%  |  Secret Project: 5%  |  DUNGEON: 70%

My MW2 Blog <-- Please visit :)

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #49 on: May 09, 2009, 05:37:11 pm »
sure, how 'bout I upload the code and programs
wait for the edit
EDIT: ok, here is the programs so far, in a bit, I'll get you the code for prgmB (it's the game handler)
EDIT2:
Code: [Select]
:ClrDraw:ClrHome
:{2,9,0,2,2→L1
:Lbl 1
:"map data→Str1
:"map data→Str2
:prgmBB
:If not(L1(2
:Then
:ClrHome:ClrDraw:Output(1,4,"YOU HAVE DIED
:Return
:End
:"map data→Str1
:"map data→Str2
:{L1(1),L1(2),0,2,7,2→L1
:prgmBB
:If not(L1(2
:Then
:ClrHome
:Output(1,4,"YOU HAVE DIED
:Return
:End
:If L1(5)=15 and 7=L1(4
:Then
:ClrHome
:Output(1,4,"YOU HAVE WON
:Return
:End
:{L1(1),L1(2),0,14,7→L1
:Goto 1
« Last Edit: May 09, 2009, 05:41:08 pm by Eeems »
/e

Offline trevmeister66

  • LV9 Veteran (Next: 1337)
  • *********
  • Posts: 1009
  • Rating: +14/-5
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #50 on: May 09, 2009, 05:44:13 pm »
Hmm that is pretty good. I would just make it so you don't fall down when you're on the monkey bars.

Also, it forces you to go to the next room when you get to the edge instead of when you go passed the edge.. that's the main difference between yours and mine
Projects:    nameless RPG: 1.0%  |  Reverse Snake v1.5: 100%  |  Secret Project: 5%  |  DUNGEON: 70%

My MW2 Blog <-- Please visit :)

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #51 on: May 09, 2009, 05:47:47 pm »
yeah I know, but that's easy to fix, and I was going to get around to fixing the monkeybars
/e

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #52 on: May 09, 2009, 08:50:25 pm »
well I got them fixed, here it is:
Code: [Select]
:For(A,2,9)
:Text(-1,8A-2(8),0,sub(Str1,15A-(14+15),15
:StorePic 2
:Text(-1,8A-2(8),0,sub(Str2,15A-(14+15),15
:RecallPic 2
:End
:L1(3→B:L1(4→A
:L1(1→G
:L1(2→H
:DelVar M
:DelVar JText(-1,0,90,H
:While A≠0 and A≠10 and B≠0 and B≠16 and H
:If E
:Then
:E-1→E
:If not(E
:Then
:Text(-1,8,90,"
:End:End
:A→C
:B→D
:Text(-1,8A-8,6B-6,"Ω
:If M
:Then
:2→M
:Text(-1,8A-8,6B-6,"Î
:End
:getKey→K
:If K:Then
:B+(K=26)-(K=24→B
:If B≠D
:Then
:If B and B≠16 and ""=sub(Str1,15A-14+B-1,1
:D→B
:End
:End
:If not(J) and ""≠sub(Str1,15(A+1)-14+B-1,1) and ""≠sub(Str1,15(A-1)-14+B-1,1
:Then
:A+1→A
:Else
:J+G(K=21→J
:End
:If J:Then
:If ""≠sub(Str1,15(A-1)-14+B-1,1
:Then
:A-1→A
:End
:J-1→J
:End
:If (A≠C or B≠D) and B
:Then
:Text(-1,8A-8,6B-6,"Ω
:Text(-1,8C-8,6D-6,"
:If ""=sub(Str1,15C-14+B-1,1
:Text(-1,8C-8,6D-6,"
:If 2=M
:Then
:Text(-1,8C-8,6D-6,"Î
:DelVar M
:End
:End
:If inString("Î*Δ",sub(Str1,15A-14+B-1,1
:Then
:If "Δ"=sub(Str1,15A-14+B-1,1
:Then
:H+3→H
:If 9<H
:Then
:9→H
:End
:sub(Str1,15A-14+B,length(Str1)-15A-14+B→Str3
:sub(Str1,1,15A-14+B-2→Str1
:Str1+" "+Str3→Str1
:Text(-1,0,90,H
:Text(-1,8,90,"+
:3→E
:End
:If "~"=sub(Str1,15A-14+B-1,1
:Then
:Text(-1,16,90,"
:sub(Str1,15A-14+B,length(Str1)-15A-14+B→Str3
:sub(Str1,1,15A-14+B-2→Str1
:Str1+" "+Str3→Str1
:3→G
:End
:If "Î"=sub(Str1,15A-14+B-1,1
:Then
:Text(-1,0,90,H
:H-1→H
:1→M
:End
:End
:End
:If B=16
:Text(-1,8A-8,6B-6,"
:G→L1(1
:H→L1(2
:A→L1(3
:B→L1(4
again ~ is that little square 0
/e

Offline simplethinker

  • LV7 Elite (Next: 700)
  • *******
  • Posts: 695
  • Rating: +16/-5
  • snjwffl
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #53 on: May 09, 2009, 09:05:20 pm »
You might be able to get a pretty good speed boost if you hard-code in the Text( commands to draw the map instead of looping over and having to use StorePic/RecallPic so many times.  i.e.
Code: [Select]
:Text(-1,0,0,sub(Str1...
:Text(-1,8,0,sub(Str1...
...
:StorePic 2
:Text(-1,0,0,sub(Str2...
:Text(-1,8,0,sub(Str2...
...
:RecallPic 2
It would add to the program size, but you would be eliminating 16 calculations of 8A-16 and 15A-29; seven StorePics and RecallPics; and the overhead for running a For( loop.  Plus, StorePic and RecallPic are pretty darn slow and StorePic automatically displays the screen so you could be getting some flicker.
"We've all heard that a million monkeys banging on a million typewriters will eventually reproduce the entire works of Shakespeare. Now, thanks to the Internet, we know this is not true." -- Professor Robert Silensky



Chip's Challenge: ħ%

Offline trevmeister66

  • LV9 Veteran (Next: 1337)
  • *********
  • Posts: 1009
  • Rating: +14/-5
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #54 on: May 09, 2009, 09:20:37 pm »
You might be able to get a pretty good speed boost if you hard-code in the Text( commands to draw the map instead of looping over and having to use StorePic/RecallPic so many times.  i.e.
Code: [Select]
:Text(-1,0,0,sub(Str1...
:Text(-1,8,0,sub(Str1...
...
:StorePic 2
:Text(-1,0,0,sub(Str2...
:Text(-1,8,0,sub(Str2...
...
:RecallPic 2
It would add to the program size, but you would be eliminating 16 calculations of 8A-16 and 15A-29; seven StorePics and RecallPics; and the overhead for running a For( loop.  Plus, StorePic and RecallPic are pretty darn slow and StorePic automatically displays the screen so you could be getting some flicker.
Hmm that's a good idea. I think I'm gonna go with that, or at least try it out
« Last Edit: May 09, 2009, 09:39:52 pm by trevmeister66 »
Projects:    nameless RPG: 1.0%  |  Reverse Snake v1.5: 100%  |  Secret Project: 5%  |  DUNGEON: 70%

My MW2 Blog <-- Please visit :)

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #55 on: May 09, 2009, 09:46:52 pm »
the flickers not that bad, but it is a little slow. hmm, I wonder how big it will be. maybe I'll make it so that you can choose which one you want to use, the big one or the slower one
/e

Offline trevmeister66

  • LV9 Veteran (Next: 1337)
  • *********
  • Posts: 1009
  • Rating: +14/-5
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #56 on: May 09, 2009, 09:48:16 pm »
the flickers not that bad, but it is a little slow. hmm, I wonder how big it will be. maybe I'll make it so that you can choose which one you want to use, the big one or the slower one
Its actually not that big. It's only about 16 or so lines, and it is faster. I'll post a screenie soon comparing both methods

Projects:    nameless RPG: 1.0%  |  Reverse Snake v1.5: 100%  |  Secret Project: 5%  |  DUNGEON: 70%

My MW2 Blog <-- Please visit :)

Offline Eeems

  • Mr. Dictator
  • Administrator
  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6268
  • Rating: +318/-36
  • little oof
    • View Profile
    • Eeems
Re: Side Project #2: DUNGEON
« Reply #57 on: May 09, 2009, 09:52:51 pm »
sounds good, I'm going to test it out too
/e

Offline trevmeister66

  • LV9 Veteran (Next: 1337)
  • *********
  • Posts: 1009
  • Rating: +14/-5
    • View Profile
Re: Side Project #2: DUNGEON
« Reply #58 on: May 09, 2009, 09:53:48 pm »
Original map engine:


New map engine:


(there's a syntax error because those rooms haven't been designed yet)

EDIT: WOOT 300th POST!!!
« Last Edit: May 09, 2009, 09:58:00 pm by trevmeister66 »
Projects:    nameless RPG: 1.0%  |  Reverse Snake v1.5: 100%  |  Secret Project: 5%  |  DUNGEON: 70%

My MW2 Blog <-- Please visit :)

Offline noahbaby94

  • LV7 Elite (Next: 700)
  • *******
  • Posts: 585
  • Rating: +29/-24
    • View Profile
    • My blog
Re: Side Project #2: DUNGEON
« Reply #59 on: May 09, 2009, 09:54:54 pm »
Nice looking.
That's what she said!!!