Author Topic: Mission Copter  (Read 7036 times)

0 Members and 1 Guest 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
Re: Mission Copter
« Reply #30 on: May 01, 2011, 06:44:29 pm »
sounds good!  It would make it really challenging if you added physics to the game though.  ;)

Also, I love the obstacles.  ;)

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 Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: Mission Copter
« Reply #31 on: May 02, 2011, 07:44:31 am »
sounds good!  It would make it really challenging if you added physics to the game though.  ;)

Also, I love the obstacles.  ;)

What do you mean with Physics? :S

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: Mission Copter
« Reply #32 on: May 02, 2011, 09:36:49 pm »
when you press up or fall you accelerate.
« Last Edit: May 02, 2011, 09:37:34 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 ralphdspam

  • LV8 Addict (Next: 1000)
  • ********
  • Posts: 841
  • Rating: +38/-1
  • My name is actually Matt.
    • View Profile
Re: Mission Copter
« Reply #33 on: May 02, 2011, 09:40:06 pm »
Looks really nice!  I really like how the pixelated walls look. :)
ld a, 0
ld a, a

Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: Mission Copter
« Reply #34 on: May 03, 2011, 02:59:15 am »
when you press up or fall you accelerate.

Just that physics is gravity, collision, acceleration, etc. I have some physics, I'll try to make gravity and movement better by implementing acceleration, but that's pretty tricky ;)

Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: Mission Copter
« Reply #35 on: May 26, 2011, 02:59:29 am »
I tried adding acceleration to this, and here's my code:

Code: [Select]
.COPTER

[1F04CEB7C7310E1F->Pic1
[0E04CEB7C7310E1F->Pic2
Lbl 1
Fix 5
DiagnosticOff

Lbl 0
ClrDraw
0->X->S->A->B
5632->Y
100->R

Repeat getKey(15)

.If (X=88) or (X=89) or (Y=62) or (Y=63) or (Y=65532) or (Y=65531) or (pxl-Test(X-1,Y+2)) or (pxl-Test(X-1,Y+3)) or (pxl-Test(X-1,Y+4)) or (pxl-Test(X,Y+4)) or (pxl-Test(X,Y+5)) or (pxl-Test(X+1,Y+1)) or (pxl-Test(X+1,Y+6)) or (pxl-Test(X+2,Y)) or (pxl-Test(X+2,Y+7)) or (pxl-Test(X+3,Y+8)) or (pxl-Test(X+4,Y-1)) or (pxl-Test(X+4,Y+8)) or (pxl-Test(X+5,Y)) or (pxl-Test(X+5,Y+8)) or (pxl-Test(X+6,Y)) or (pxl-Test(X+6,Y+8)) or (pxl-Test(X+7,Y+8)) or (pxl-Test(X+8,Y+3)) or (pxl-Test(X+8,Y+4)) or (pxl-Test(X+8,Y+5)) or (pxl-Test(X+8,Y+7))
.  sub(GO
.  Goto 0
.End

.MOVEMENTS
If getKey(4) and (Y>1)
  B-10->B
End
If getKey(2)
  A-8->A
End
If getKey(3)
  A+8->A
End
If getKey(1)
  B+2->B
End

If rand^80=1
  R-1->R
End

If rand^R=1 and (S>30)
  rand^45+10->Z
  ref(88,Z,7,15
End

Fix 3
Text(0,0,S>Dec
Fix 2

.SCORE
S+1->S

.GRAVITY
B+2->B

.ANIMATION
!If S^10
  Pic1->O
Else
  Pic2->O
End

Horizontal -
Horizontal -
Horizontal -

ref(92,0,3,64
rref(92,rand^5+8,3,rand^5+50

X+A->X
Y+B->Y

Pt-On(X/256,Y/256,O)^^r
DispGraph^^r
ClrDraw^^r

End
Goto 0

Lbl GO
Fix 1
Text(20,28,"GAME OVER
Fix 0
Repeat getKey
DispGraph
End
Pause 3000
Return

It doesn't look so well :(

You can download the source here.

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: Mission Copter
« Reply #36 on: May 26, 2011, 03:00:43 am »
Sorry to hear. Is it because it doesn't work or is it due to not making the gameplay good? Sometimes physics can make some game extremly hard.

Offline Munchor

  • LV13 Extreme Addict (Next: 9001)
  • *************
  • Posts: 6199
  • Rating: +295/-121
  • Code Recycler
    • View Profile
Re: Mission Copter
« Reply #37 on: May 26, 2011, 09:49:20 am »
Sorry to hear. Is it because it doesn't work or is it due to not making the gameplay good? Sometimes physics can make some game extremly hard.

Yeah it makes the game too hard, but it works :)