|
B-Clopd by John Trapolka Memorial Krew
[nfo]
|
||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
|
|||||||||||||
|
popularity : 65% |
|||||||||||||
alltime top: #4127 |
|
|||||||||||||
added on the 2002-04-03 14:35:55 by tomaes  |
||||||||||||||
popularity helper
comments
bekloppt!
colours are a bit weird, but who cares. nice animationtechnique.
colours are a bit weird, but who cares. nice animationtechnique.
Very funny game, let's even me (a 100% non-gamer) do gaming a bit ;)
Hehe. The flamethrower is cool (pun?) but the endboss is too easy to beat. :)
This is funny, or should I better say b-kloppt?
Should have earned #1...
Should have earned #1...
Preety funny, yeah! =)
this if very fun and very well done and is playable... ;)
"shouldve won"
"shouldve won"
really nice and funny game
btw thnxs for ur mail on calodox.org Pap
btw thnxs for ur mail on calodox.org Pap
I actually play this thing ;)
slap down mario & co ! :)
Just love this smooooooooooth rayman-style... wonderful piece of work.
SNES_Lover
SNES_Lover
excellent :)
DIE DIE MARIO DIE !!!!
DIE DIE MARIO DIE !!!!
Cool, but beating sonic was hard for me. ;)
Fatality!!! Die, you 16bit! Yeah!
nice idea but the gameplay is somewhat strange :/
KILLERSPIEL!
ROLF!
That's really LOL!
Very cool. Love the super original content.
:)
LMAO xD
Awesome. Source included, damit is that a wall of text. Excerpt:
:D
Code:
PROCEDURE CompPlayer(Pla:LongInt);
VAR I,K,M,C:LongInt;
KL,KR,KD,KU,KK,KP:Boolean;
BEGIN
C:=1;
KL:=False;KR:=False;KU:=False;KD:=False;KK:=False;KP:=False;
IF(Abs(GetFix(Pl[Pla].Gl[0].XX-Pl[C].Gl[0].XX))>C_Abstand*Pl[Pla].Streck*Pl[C].Streck)
THEN IF(Random(C_StepInRan)<>0)THEN BEGIN
IF Pl[Pla].Gl[0].XX<Pl[C].Gl[0].XX THEN KR:=True
ELSE KL:=True;
END ELSE ELSE IF(Random(C_StepOutRan)=0)THEN BEGIN
IF Pl[Pla].Gl[0].XX<Pl[C].Gl[0].XX THEN KL:=True
ELSE KR:=True;
END;
IF Pl[Pla].AkCnt=0 THEN BEGIN
IF InRange(Pl[Pla].Gl[0].XX,Pl[Pla].Gl[0].YY,Pl[C].Gl[0].XX,Pl[C].Gl[0].YY,Round(C_ActAbstand*Pl[Pla].Streck*Pl[C].Streck))
THEN IF Pl[Pla].Ak=1 THEN BEGIN
FOR I:=2 TO 10 DO IF I<>6 THEN BEGIN
M:=400;
IF I<4 THEN M:=50;
IF Random(M)=0 THEN Pl[Pla].Ak:=I;
END;
END;
WITH Pl[Pla] DO
IF Ak<>1 THEN AkCnt:=(AMotion[Ak-1].Len-1)*AMotion[Ak-1].Speed;
END;
IF(Random(C_JumpRan)=0)AND(Pl[Pla].Ak=1)THEN KU:=True;
IF Random(C_DuckRan)=0 THEN KD:=True;
ControlPlayer(KL,KR,KU,KD,{KP,KK,}Pla);
END;
:D
Forgot the thumb.
nice
submit changes
if this prod is a fake, some info is false or the download link is broken,
do not post about it in the comments, it will get lost.
instead, click here !
Made me laugh under the compos.
sets the rules.