Author Topic: Bomberman  (Read 24595 times)

0 Members and 2 Guests are viewing this topic.

Offline yunhua98

  • You won't this read sentence right.
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2718
  • Rating: +214/-12
  • Go take a dive in the River Lethe.
    • View Profile
Bomberman
« on: October 16, 2010, 06:01:00 pm »
As many of you know, I stopped working on this due to a memory loss.  Well, yesterday, I was looking through my backups and found Bomberman again, I thought, maybe I should revive this?  I was a bit less busy, and all were doing in my Science and Math classes were review, so I decided to pick it up again.  heres what I have so far:


I don't really understand why my enemy never faces the right direction though, and I would be glad if anyone could find some more bugs.
all, it does so far is drop bombs, explode stuff, including you but not the enemy yet, and the light blocks are explodable, the "grey" ones aren't

code:

Spoiler For code:
Quote from: BASIC Code
:.BOMBRMAN AXE BomberMan! v1.0 by: Yunhua Z
:.CLEAR SPRITE
:[2288228822882288→Pic0C
:.BOMB SPRITE
:[0C103C4E5E7E7E3C→Pic1
:.BLANK SPACE
:[0000000000000000→Pic2A
:.DOTTED BLOCK
:[7EABD5ABD5ABD57E→Pic2
:.BREAKABLE BLOCK
:[7E81BDA1A1A1817E→Pic3
:.GUY LEFT
:[1C7E1222142A1436→Pic4
:.GUY RIGHT
:[387E48442854286C→Pic5
:.GUY FRONT/BACK
:[1C3E22143E081436→Pic6
:.EXPLODE Horizontal(
:[00FF55AAAA55FF00→Pic7
:.EXPLODE Vertical
:[5A665A665A665A66→Pic8
:.ENEMY FORWARD
:[3C4281A58181A55A→Pic9
:.ENEMY LEFT
:[1C2241514141552A→Pic0
:.ENEMY RIGHT
:[3844828A8282AA54→Pic10
:.ENEMY BACK
:[3C4281818181A55A→Pic11
:.CHERRIES
:[08182464B6FB6F06→Pic12
:.COIN
:[184218A5A5184218→Pic13
:.EXPLODE CENTER
:[5AE75AA5A55AE75A→Pic0E
:"GAME OVER→Str1
:"YOU WIN→Str2
:DiagnosticOff
:ClrDraw
:0→X→Y→A→B→C→E
:16→Z→L
:88→G
:56→D
:For(L,0,11
:L*8→N
:For(M,0,7
:M*8→O
:Pt-On(N,O,Pic0C
:End
:End
:sub(BK
:Pt-Off(8,0,Pic0C
:Pt-Off(0,8,Pic0C
:0→θ
:Repeat K=15 or (L=0
:sub(DG
:.AI
:E+1→E
:If E^20=0
:Pt-Off(G,D,Pic0C
:rand^2→I
:If I=1
:If G>0 and (pxl-Test(G-7,D+6)=0
:G-(8*(rand^2))→G
:8→θ
:End
:If G<87 and (pxl-Test(G+9,D+6)=0
:G+(8*(rand^2))→G
:16→θ
:End
:End
:If I=0
:If D>0=(pxl-Test(G+1,D-2)=0
: D-(8*(rand^2))→D
:24→θ
:End
:If D<55 and (pxl-Test(G+1,D+14)=0
: D+(8*(rand^2))→D
:0→θ
:End
:End
:Pt-Off(G,D,Pic9+θ
:End
:If G=X and (D=Y
:0→L
:End
:
:
:
:
:
:.BOMB CHECK AND EXPLODE
:!If B=0
:A+1→A
:End
:If A=200
:Pt-Off(P,Q,Pic0E
:If pxl-Test(P+9,Q+2)=0
:Pt-Off(P+8,Q,Pic7
:If pxl-Test(P+17,Q+2)=0
:Pt-Off(P+16,Q,Pic7
:End
:End
:If pxl-Test(P-7,Q+2)=0
:Pt-Off(P-8,Q,Pic7
:If pxl-Test(P-15,Q+2)=0
:Pt-Off(P-16,Q,Pic7
:End
:End
:If pxl-Test(P+1,Q+10)=0
:Pt-Off(P,Q+8,Pic8
:If pxl-Test(P+1,Q+18)=0
:Pt-Off(P,Q+16,Pic8
:End
:End
:If pxl-Test(P+1,Q-6)=0
:Pt-Off(P,Q-8,Pic8
:If pxl-Test(P+1,Q-14)=0
:Pt-Off(P,Q-16,Pic8
:End
:End
:DispGraph
:Pause 100
:If (X-P≤16 or (P-X≤16)) and (Y=Q
:0→L
:End
:If (Y-Q≤16 or (Q-Y≤16)) and (X=P
:0→L
:End
:End
:If A=250
:Pt-Off(P,Q,Pic0C
:Pt-Off(P-8,Q,Pic0C
:Pt-Off(P-16,Q,Pic0C
:Pt-Off(P,Q-8,Pic0C
:Pt-Off(P,Q-16,Pic0C
:Pt-Off(P+8,Q,Pic0C
:Pt-Off(P+16,Q,Pic0C
:Pt-Off(P,Q+8,Pic0C
:Pt-Off(P,Q+16,Pic0C
:.DispGraph
:0→A→B
:End
:.END BOMB SECTION
:!If L=0
:.KEYCHECK SERIES
:getKey→K
:If K=48 and (B=1
:199→A
:End
:If K=54 and (B=0
:8→C
:1→B
:X→P
:Y→Q
:Pt-On(P,Q,Pic1
:Pt-On(P,Q,Pic0C
:.DispGraph
:End
:If K=3 and (X<87 and (pxl-Test(X+10,Y+5)=0
:8→Z
:sub(CS
:X+8→X
:End
:If K=2 and (X>0 and (pxl-Test(X-6,Y+5)=0
:0→Z
:sub(CS
:X-8→X
:End
:If K=4 and (Y>0 and (pxl-Test(X+2,Y-3)=0
:16→Z
:sub(CS
:Y-8→Y
:End
:If K=1 and (Y<55 and (pxl-Test(X+2,Y+13)=0
:16→Z
:sub(CS
:Y+8→Y
:End
:Pt-Off(X,Y,Pic4+Z
:.DispGraph
:End
:End
:.DIE ROUTINE
:!If L
:Output(0,0,Str1
:Pause 1000
:End
:Lbl CS
:.CLEAR ROUTINE
:Pt-Off(X,Y,Pic0C+C
:0→C
:.DispGraph
:Return
:.MAP
:Lbl BK
:For(O,1,7
:O*8→T
:O+1→O
:For(N,0,11
:8*N→V
:If rand^5≠0
:Pt-Off(V,T,Pic3
:End
:End
:End
:For(N,0,11
:8*N→V
:N+1→N
:For(O,1,7
:O*8→T
:If rand^5≠0
:Pt-Off(T,V,Pic3
:End
:End
:End
:Return
:Lbl DG
:For(N,1,10
:N+1→N
:N*8→R
:For(O,1,6
:O+1→O
:O*8→S
:Pt-Off(R,S,Pic2
:End
:End
:DispGraph
:Return
:.Lbl BK
:.For(M,1,11
:.M*8→T
:.M+1→M
:.For(U,1,7
:.U*8→V
:.U+1→U
:.Pt-On(T,V,Pic3
:.End
:.End
:.StorePic
:.DispGraph
:.Return
Generated by SourceCoder, © 2005-2010 Cemetech

Bomberman is the executable, no-stub
Axebomb is the source

also, if you can spot any optimizations, please point them out to me.  ;)

EDIT:
Credits list so far:
Omnimaga Community
DJ Omnimaga for inspiring this game with Axe Contest
Aichi for helping me figure out a bug that I was stuck on
« Last Edit: October 29, 2010, 05:42:05 pm by yunhua98 »

Spoiler For =====My Projects=====:
Minor setback due to code messing up.  On hold for Contest.
<hr>
On hold for Contest.


Spoiler For ===Staff Memberships===:






Have you seen any good news-worthy programs/events?  If so, PM me with an article to be included in the next issue of CGPN!
The Game is only a demo, the code that allows one to win hasn't been done.
To paraphrase Oedipus, Hamlet, Lear, and all those guys, "I wish I had known this some time ago."
Signature Last Updated: 12/26/11
<hr>

Offline matthias1992

  • LV6 Super Member (Next: 500)
  • ******
  • Posts: 408
  • Rating: +33/-5
    • View Profile
Re: Bomberman
« Reply #1 on: October 16, 2010, 06:09:23 pm »
THERE IS SMILIES IN THE SOURCE :D

Looks great yunhua!
MASM xxxxxxxxxx aborted | SADce ====:::::: 40% -Halted until further notice| XAOS =====::::: 50% -Units done| SKYBOX2D engine ========== 100% -Pre-alpha done. Need to  document it and extend |

~Those who dream by day are cognizant of much more than those who dream by night only. -Sir Edgar Allen Poe-

Offline yunhua98

  • You won't this read sentence right.
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2718
  • Rating: +214/-12
  • Go take a dive in the River Lethe.
    • View Profile
Re: Bomberman
« Reply #2 on: October 16, 2010, 06:10:31 pm »
lol  :P
* yunhua98 goes to change

Spoiler For =====My Projects=====:
Minor setback due to code messing up.  On hold for Contest.
<hr>
On hold for Contest.


Spoiler For ===Staff Memberships===:






Have you seen any good news-worthy programs/events?  If so, PM me with an article to be included in the next issue of CGPN!
The Game is only a demo, the code that allows one to win hasn't been done.
To paraphrase Oedipus, Hamlet, Lear, and all those guys, "I wish I had known this some time ago."
Signature Last Updated: 12/26/11
<hr>

Offline MRide

  • LV8 Addict (Next: 1000)
  • ********
  • Posts: 711
  • Rating: +14/-0
  • You can't see this.
    • View Profile
Re: Bomberman
« Reply #3 on: October 16, 2010, 06:11:36 pm »
code:

Spoiler For code:
Quote from: BASIC Code
:.BOMBRMAN AXE BomberMan! v1.0 by: Yunhua Z
:.CLEAR SPRITE
:[2288228822882288→Pic0C
:.BOMB SPRITE
:[0C103C4E5E7E7E3C→Pic1
:.BLANK SPACE
:[0000000000000000→Pic2A
:.DOTTED BLOCK
:[7EABD5ABD5ABD57E→Pic2
:.BREAKABLE BLOCK
:[7E81BDA1A1A1817E→Pic3
:.GUY LEFT
:[1C7E1222142A1436→Pic4
:.GUY RIGHT
:[387E48442854286C→Pic5
:.GUY FRONT/BACK
:[1C3E22143E081436→Pic6
:.EXPLODE Horizontal(
:[00FF55AAAA55FF00→Pic7
:.EXPLODE Vertical
:[5A665A665A665A66→Pic8
:.ENEMY FORWARD
:[3C4281A58181A55A→Pic9
:.ENEMY LEFT
:[1C2241514141552A→Pic0
:.ENEMY RIGHT
:[3844828A8282AA54→Pic10
:.ENEMY BACK
:[3C4281818181A55A→Pic11
:.CHERRIES
:[08182464B6FB6F06→Pic12
:.COIN
:[184218A5A5184218→Pic13
:.EXPLODE CENTER
:[5AE75AA5A55AE75A→Pic0E
:"GAME OVER→Str1
:"YOU WIN→Str2
:DiagnosticOff
:ClrDraw
:0→X→Y→A→B→C→E
:16→Z→L
:88→G
:56→D
:For(L,0,11
:L*8→N
:For(M,0,7
:M*8→O
:Pt-On(N,O,Pic0C
:End
:End
:sub(BK
:Pt-Off(8,0,Pic0C
:Pt-Off(0,8,Pic0C
:0→θ
:Repeat K=15 or (L=0
:sub(DG
:.AI
:E+1→E
:If E^20=0
:Pt-Off(G,D,Pic0C
:rand^2→I
:If I=1
:If G>0 and (pxl-Test(G-7,D+6)=0
:G-(8*(rand^2))→G
:8→θ
:End
:If G<87 and (pxl-Test(G+9,D+6)=0
:G+(8*(rand^2))→G
:16→θ
:End
:End
:If I=0
:If D>0=(pxl-Test(G+1,D-2)=0
:D-(8*(rand^2))→D
:24→θ
:End
:If D<55 and (pxl-Test(G+1,D+14)=0
:D+(8*(rand^2))→D
:0→θ
:End
:End
:Pt-Off(G,D,Pic9+θ
:End
:If G=X and (D=Y
:0→L
:End
:
:
:
:
:
:.BOMB CHECK AND EXPLODE
:!If B=0
:A+1→A
:End
:If A=200
:Pt-Off(P,Q,Pic0E
:If pxl-Test(P+9,Q+2)=0
:Pt-Off(P+8,Q,Pic7
:If pxl-Test(P+17,Q+2)=0
:Pt-Off(P+16,Q,Pic7
:End
:End
:If pxl-Test(P-7,Q+2)=0
:Pt-Off(P-8,Q,Pic7
:If pxl-Test(P-15,Q+2)=0
:Pt-Off(P-16,Q,Pic7
:End
:End
:If pxl-Test(P+1,Q+10)=0
:Pt-Off(P,Q+8,Pic8
:If pxl-Test(P+1,Q+18)=0
:Pt-Off(P,Q+16,Pic8
:End
:End
:If pxl-Test(P+1,Q-6)=0
:Pt-Off(P,Q-8,Pic8
:If pxl-Test(P+1,Q-14)=0
:Pt-Off(P,Q-16,Pic8
:End
:End
:DispGraph
:Pause 100
:If (X-P≤16 or (P-X≤16)) and (Y=Q
:0→L
:End
:If (Y-Q≤16 or (Q-Y≤16)) and (X=P
:0→L
:End
:End
:If A=250
:Pt-Off(P,Q,Pic0C
:Pt-Off(P-8,Q,Pic0C
:Pt-Off(P-16,Q,Pic0C
:Pt-Off(P,Q-8,Pic0C
:Pt-Off(P,Q-16,Pic0C
:Pt-Off(P+8,Q,Pic0C
:Pt-Off(P+16,Q,Pic0C
:Pt-Off(P,Q+8,Pic0C
:Pt-Off(P,Q+16,Pic0C
:.DispGraph
:0→A→B
:End
:.END BOMB SECTION
:!If L=0
:.KEYCHECK SERIES
:getKey→K
:If K=48 and (B=1
:199→A
:End
:If K=54 and (B=0
:8→C
:1→B
:X→P
:Y→Q
:Pt-On(P,Q,Pic1
:Pt-On(P,Q,Pic0C
:.DispGraph
:End
:If K=3 and (X<87 and (pxl-Test(X+10,Y+5)=0
:8→Z
:sub(CS
:X+8→X
:End
:If K=2 and (X>0 and (pxl-Test(X-6,Y+5)=0
:0→Z
:sub(CS
:X-8→X
:End
:If K=4 and (Y>0 and (pxl-Test(X+2,Y-3)=0
:16→Z
:sub(CS
:Y-8→Y
:End
:If K=1 and (Y<55 and (pxl-Test(X+2,Y+13)=0
:16→Z
:sub(CS
:Y+8→Y
:End
:Pt-Off(X,Y,Pic4+Z
:.DispGraph
:End
:End
:.DIE ROUTINE
:!If L
:Output(0,0,Str1
:Pause 1000
:End
:Lbl CS
:.CLEAR ROUTINE
:Pt-Off(X,Y,Pic0C+C
:0→C
:.DispGraph
:Return
:.MAP
:Lbl BK
:For(O,1,7
:O*8→T
:O+1→O
:For(N,0,11
:8*N→V
:If rand^5≠0
:Pt-Off(V,T,Pic3
:End
:End
:End
:For(N,0,11
:8*N→V
:N+1→N
:For(O,1,7
:O*8→T
:If rand^5≠0
:Pt-Off(T,V,Pic3
:End
:End
:End
:Return
:Lbl DG
:For(N,1,10
:N+1→N
:N*8→R
:For(O,1,6
:O+1→O
:O*8→S
:Pt-Off(R,S,Pic2
:End
:End
:DispGraph
:Return
:.Lbl BK
:.For(M,1,11
:.M*8→T
:.M+1→M
:.For(U,1,7
:.U*8→V
:.U+1→U
:.Pt-On(T,V,Pic3
:.End
:.End
:.StorePic
:.DispGraph
:.Return
Generated by SourceCoder, © 2005-2010 Cemetech

Bomberman is the executable, no-stub
Axebomb is the source

also, if you can spot any optimizations, please point them out to me.  ;)
I didn't know you could have smilies in code. :P

EDIT: Ninja'd
« Last Edit: October 16, 2010, 07:47:56 pm by MRide »

Offline kindermoumoute

  • LV8 Addict (Next: 1000)
  • ********
  • Posts: 836
  • Rating: +54/-3
    • View Profile
Re: Bomberman
« Reply #4 on: October 16, 2010, 06:19:10 pm »
I like this game, nice project ;)
Projects :

Worms armageddon z80 :
- smoothscrolling Pixelmapping : 100%
- Map editor : 80%
- Game System : 0%

Tutoriel français sur l'Axe Parser
- 1ère partie : en ligne.
- 2ème partie : en ligne.
- 3ème partie : en ligne.
- 4ème partie : 10%
- Annexe : 100%

Offline yunhua98

  • You won't this read sentence right.
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2718
  • Rating: +214/-12
  • Go take a dive in the River Lethe.
    • View Profile
Re: Bomberman
« Reply #5 on: October 16, 2010, 06:38:19 pm »
thanks for the encouragement guys!  although I might not post screenies very often, I will work on it a bit everyday.  All I've got to worry about are like 2 tests on monday.  :P

Spoiler For =====My Projects=====:
Minor setback due to code messing up.  On hold for Contest.
<hr>
On hold for Contest.


Spoiler For ===Staff Memberships===:






Have you seen any good news-worthy programs/events?  If so, PM me with an article to be included in the next issue of CGPN!
The Game is only a demo, the code that allows one to win hasn't been done.
To paraphrase Oedipus, Hamlet, Lear, and all those guys, "I wish I had known this some time ago."
Signature Last Updated: 12/26/11
<hr>

Offline Ranman

  • LV10 31337 u53r (Next: 2000)
  • **********
  • Posts: 1354
  • Rating: +83/-0
    • View Profile
Re: Bomberman
« Reply #6 on: October 16, 2010, 06:46:50 pm »
Wow... Lookin' good!
Ranman
Bringing Randy Glover's Jumpman to the TI-89 calculator. Download available at Ticalc.

Offline shmibs

  • しらす丼
  • Administrator
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2132
  • Rating: +281/-3
  • try to be ok, ok?
    • View Profile
    • shmibbles.me
Re: Bomberman
« Reply #7 on: October 16, 2010, 06:53:40 pm »
this is how i would write the same code that you have here(although i probably screwed something up because i'm running a massive fever right now and just got back from work.) personally, though, i would use a matrix for the map data instead of a massive list of pixel-tests. bomberman is the greatest; good luck on implementing it!

Code: [Select]
:.BOMBRMAN AXE BomberMan! v1.0 by: Yunhua Z
:.CLEAR SPRITE
:[2288228822882288→Pic0C
:.BOMB SPRITE
:[0C103C4E5E7E7E3C→Pic1
:.BLANK SPACE
:[0000000000000000→Pic2A
:.DOTTED BLOCK
:[7EABD5ABD5ABD57E→Pic2
:.BREAKABLE BLOCK
:[7E81BDA1A1A1817E→Pic3
:.GUY LEFT
:[1C7E1222142A1436→Pic4
:.GUY RIGHT
:[387E48442854286C→Pic5
:.GUY FRONT/BACK
:[1C3E22143E081436→Pic6
:.EXPLODE Horizontal(
:[00FF55AAAA55FF00→Pic7
:.EXPLODE Vertical
:[5A665A665A665A66→Pic8
:.ENEMY FORWARD
:[3C4281A58181A55A→Pic9
:.ENEMY LEFT
:[1C2241514141552A→Pic0
:.ENEMY RIGHT
:[3844828A8282AA54→Pic10
:.ENEMY BACK
:[3C4281818181A55A→Pic11
:.CHERRIES
:[08182464B6FB6F06→Pic12
:.COIN
:[184218A5A5184218→Pic13
:.EXPLODE CENTER
:[5AE75AA5A55AE75A→Pic0E
:"GAME OVER→Str1
:"YOU WIN→Str2
:DiagnosticOff
:ClrDraw
:0→X→Y→A→B→C→E+16→Z→L+40→D+32→GFor(L,0,11
:For(M,0,7
:Pt-On(L*8,M*8,Pic0C
:End:End
:sub(BK
:Pt-Off(8,0,Pic0C
:Pt-Off(0,8,Pic0C
:0→θWhile K^15+L
:sub(DG
:.AI
:E+1→E
:!If E^20
:Pt-Off(G,D,Pic0C
:rand^2→IIf I
:!If pxl-Test(G-7,D+6)*G
:G-(rand^2*8)→G
:8→θEnd
:If G<87 and (pxl-Test(G+9,D+6)=0
:G+(8*(rand^2))→G
:16→θ
:End
:Else
:!If pxl-Test(G+1,D-2)*D
:D-(rand^2*8)→D24→θEnd
:!If D>54*pxl-Test(G+1,D+14)
:D+(rand^2*8)→D-D→θ
:End
:End:End
:Pt-Off(G,D,Pic9+θ
:End
:If G=X and (D=Y
:0→LEnd
:
:
:
:
:
:.BOMB CHECK AND EXPLODE
:If B
:A+1→AEnd
:If A=200
:Pt-Off(P,Q,Pic0E
:!If pxl-Test(P+9,Q+2)
:Pt-Off(P+8,Q,Pic7
:!If pxl-Test(P+17,Q+2)
:Pt-Off(P+16,Q,Pic7
:End
:End
:!If pxl-Test(P-7,Q+2)
:Pt-Off(P-8,Q,Pic7
:!If pxl-Test(P-15,Q+2)
:Pt-Off(P-16,Q,Pic7
:End
:End
:!If pxl-Test(P+1,Q+10)
:Pt-Off(P,Q+8,Pic8
:!If pxl-Test(P+1,Q+18)
:Pt-Off(P,Q+16,Pic8
:End
:End
:!If pxl-Test(P+1,Q-6)
:Pt-Off(P,Q-8,Pic8
:!If pxl-Test(P+1,Q-14)
:Pt-Off(P,Q-16,Pic8
:End
:End
:DispGraph
:Pause 100
:If (X-P≤16 or (P-X≤16)) and (Y=Q
:0→L
:End
:If (Y-Q≤16 or (Q-Y≤16)) and (X=P
:0→L
:End
:End
:If A=250
:.mebbe add a for loop here instead of the massive list of PtOffs?
:Pt-Off(P,Q,Pic0C
:Pt-Off(P-8,Q,Pic0C
:Pt-Off(P-16,Q,Pic0C
:Pt-Off(P,Q-8,Pic0C
:Pt-Off(P,Q-16,Pic0C
:Pt-Off(P+8,Q,Pic0C
:Pt-Off(P+16,Q,Pic0C
:Pt-Off(P,Q+8,Pic0C
:Pt-Off(P,Q+16,Pic0C
:DispGraph
:0→A→BEnd
:.END BOMB SECTION
:If L
:.KEYCHECK SERIES
:getKey→K
:If K=48 and (B=1
:199→AEnd
:!If K^54*B
:1→B+7→CX→PY→QPt-On(P,Q,Pic1
:Pt-On(P,Q,Pic0C
:DispGraph
:End
:!If K=3*(X<87 and (pxl-Test(X+10,Y+5)
:8→Zsub(CS
:X+8→X
:End
:!If K=2*X*pxl-Test(X-6,Y+5)
:0→Zsub(CS
:X-8→X
:End
:If K=4 and (Y>0 and (pxl-Test(X+2,Y-3)=0
:16→Zsub(CS
:Y-8→Y
:End
:If K=1 and (Y<55 and (pxl-Test(X+2,Y+13)=0
:16→Z
:sub(CS
:Y+8→YEnd
:Pt-Off(X,Y,Pic4+Z
:DispGraph
:End:End
:.DIE ROUTINE
:!If L
:Output(0,0,Str1
:Pause 1000
:End
:Lbl CS
:.CLEAR ROUTINE
:Pt-Off(X,Y,Pic0C+C
:0→C
:DispGraph
:Return
:.MAP
:Lbl BK
:For(O,1,7
:O*8→T/8+1→O
:For(N,0,11
:If rand^5≠0
:Pt-Off(N*8,T,Pic3
:End
:End
:End
:For(N,0,11
:8*N→V
:N+1→N
:For(O,1,7
:If rand^5
:Pt-Off(O*8,V,Pic3
:End
:End
:End
:Return
:Lbl DG
:For(N,2,11
:For(O,2,7
:Pt-Off(N*8,O*8,Pic2
:End
:End
:DispGraph
:Return
:Lbl BK
:For(M,2,12
:For(U,2,8
:Pt-On(M-1*8,U-1*8,Pic3
:End:End
:StorePic
:DispGraph
:Return

Offline yunhua98

  • You won't this read sentence right.
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2718
  • Rating: +214/-12
  • Go take a dive in the River Lethe.
    • View Profile
Re: Bomberman
« Reply #8 on: October 16, 2010, 06:55:43 pm »
kk, thanks, but is the For(L,0,11 part supposed to not be on a seperate line?

Spoiler For =====My Projects=====:
Minor setback due to code messing up.  On hold for Contest.
<hr>
On hold for Contest.


Spoiler For ===Staff Memberships===:






Have you seen any good news-worthy programs/events?  If so, PM me with an article to be included in the next issue of CGPN!
The Game is only a demo, the code that allows one to win hasn't been done.
To paraphrase Oedipus, Hamlet, Lear, and all those guys, "I wish I had known this some time ago."
Signature Last Updated: 12/26/11
<hr>

Offline shmibs

  • しらす丼
  • Administrator
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2132
  • Rating: +281/-3
  • try to be ok, ok?
    • View Profile
    • shmibbles.me
Re: Bomberman
« Reply #9 on: October 16, 2010, 07:38:40 pm »
yes. some of the things in here are just personal preferences for code structuring, however

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Bomberman
« Reply #10 on: October 17, 2010, 04:20:29 am »
WOW that's great that you found it agaiN! Now if only you could have managed to find it before the contest ended :(

ALso it looks great. I'm glad this is alive again :).

Offline yunhua98

  • You won't this read sentence right.
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2718
  • Rating: +214/-12
  • Go take a dive in the River Lethe.
    • View Profile
Re: Bomberman
« Reply #11 on: October 17, 2010, 07:38:15 am »
well, technically I knew where it was before the contest ended, but I just lacked the motivation to do anything with it.  :P

Spoiler For =====My Projects=====:
Minor setback due to code messing up.  On hold for Contest.
<hr>
On hold for Contest.


Spoiler For ===Staff Memberships===:






Have you seen any good news-worthy programs/events?  If so, PM me with an article to be included in the next issue of CGPN!
The Game is only a demo, the code that allows one to win hasn't been done.
To paraphrase Oedipus, Hamlet, Lear, and all those guys, "I wish I had known this some time ago."
Signature Last Updated: 12/26/11
<hr>

Offline DJ Omnimaga

  • Clacualters are teh gr33t
  • CoT Emeritus
  • LV15 Omnimagician (Next: --)
  • *
  • Posts: 55943
  • Rating: +3154/-232
  • CodeWalrus founder & retired Omnimaga founder
    • View Profile
    • Dream of Omnimaga Music
Re: Bomberman
« Reply #12 on: October 17, 2010, 02:06:05 pm »
Ah ok D:

Btw did you lose some progress or was it a recent backup?

Offline meishe91

  • Super Ninja
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2946
  • Rating: +115/-11
    • View Profile
    • DeviantArt
Re: Bomberman
« Reply #13 on: October 17, 2010, 04:54:14 pm »
That looks great! Good luck on this :)
Spoiler For Spoiler:



For the 51st time, that is not my card! (Magic Joke)

Offline ztrumpet

  • The Rarely Active One
  • CoT Emeritus
  • LV13 Extreme Addict (Next: 9001)
  • *
  • Posts: 5712
  • Rating: +364/-4
  • If you see this, send me a PM. Just for fun.
    • View Profile
Re: Bomberman
« Reply #14 on: October 17, 2010, 05:00:11 pm »
That looks neat!  Nice job! ;D