[ flash ] game gemaakt, moest ik ff posten :)

[XangadiX]

eindelijk gelukt;

een vechtspelletje waarbij je tgen de computer kunt vechten in flash

http://melkweg.hku.nl/>>/MC/melkweg_combat3.swf

en voor de liefhebbers:
(als iemand dingen ffectiever kan code post het dan hier )

code:

//n0tes :: 

//initial vars 1. slow the game down

//de lijn waarop de poppetjes staan

baseline = 130.6
jumpstrength = 2
near = 15
actiontime = 3
bump = 2
init = init + 1

//here the clips would be loaded
//including the stats for each player

//playerchoice

if (playerchoice == "marc") {

player = _root.marc
computer = _root.sacha
computerchoice = "sacha"
}else{

player = _root.sacha
computer = _root.marc
computerchoice = "marc"

}

//startposittion

if (init == 2) {

setProperty (player, _x, 71.6)
setProperty (computer, _x, 251.8)
init = 3
}


//make computer move backward

setProperty (computer, _xscale, -100)

//player

playerSpeedFW =   2
playerSpeedBW =  -3

playerHitStrength = 14
playerHitPoints = 5
playerHit = 5

playerKickStrength = 14
playerKickPoints = 10
playerkick = 5

//computer

computerSpeedFW = -2
computerSpeedBW =  3

computerHitStrength = 14
computerHitPoints = 5
computerhit = 5

computerKickStrength = 14
computerKickPoints = 10
computerkick = 5

//getting positions

oldposlgx  = getProperty (player, _x)
oldposlgy  = getProperty (player, _y)
oldposrgx  = getProperty (computer, _x)
oldposrgy  = getProperty (computer, _y)

setProperty (schaduwleft, _x, oldposlgx)
setProperty (schaduwright, _x, oldposrgx)

//keyscript :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

//player

AnyKey = checkKeyE + CheckKeyD
if (checkKeyE == 1) {checkKeyD = 0}
if (checkKeyD == 1) {checkKeyE = 0}


if (checkKeyE == 1) { 
DoHitPlayer (player)

} 

if  (checkKeyD == 1) { 
DoKickPlayer ( player)

}

if (checkKeyS == 1) { 
DoSpecialPlayer (player)
}

if (checkKeyDown == 1) {
DoDuckPlayer (player)
}

if (checkKeyUp == 1) {
DoJumpPlayer ( player )
}

if (Key.isDown(Key.Right)) {
DoMovePlayer(player, playerSpeedFW)
}

if (Key.isDown(Key.Left)) {
DoMovePlayer(player, playerSpeedBW)
}




//:::::::::::::::::: AI action! ::::::::::::::;::::::::

//damage = 1, 2, 3 (1 is HP > 50, 2 HP > 50, 3 HP >5) (install "moods" based on points)
//random number = random(6) +random(6) to ensure a bell-shaped graph
//common action is 1: attack, 2, block, 3, retreat


//set random number

AIanyAction = AIhit + AIkick + AIduck + AIlost + AIwin

if (AIwin == 1 or Ailost == 1) {
action = 2001
}

if (AIanyAction == 0) {
action = random(6) + random(6)
}

if (oldposrgx <= oldposlgx + near ) {
inaction = 1
}


if (action == 5) {
DoHitComputer ( computer ) 
computer.gotoAndPlay("hit")
}

if (action == 9) {
DoKickComputer (computer )
computer.gotoAndPlay("kick")
}

if (action <= 8 or AIjump <= 4) {
DoJumpComputer ( computer )
}

if (action <= 2)  {
doMoveComputer (computer, computerSpeedBW)
}


if (action <> 2001){

if (action >= 5) { 
doMoveComputer (computer, computerSpeedFW)
} 
}



//:::::::::::::::::::::::::::: FUNCTIONS ::::::::::::::::::::::::::::::::::::::::

//Points and winning or loosing

function DrawPoints () {


setProperty  (pointsL, _xscale, pointsleft)
setProperty  (pointsL, _x, 36.5 + (0.61 * pointsleft) / 2)

// NB:  (pointsL, _x, (start)posX - lengght / 2 + ( length/100 * pointsleft / 2))

setProperty  (pointsR, _xscale, pointsRight)
setProperty  (pointsR, _x, 226.4 + (0.61 * pointsright) / 2)

//win or loose?

if (pointsLeft < 0) {
_root.left.gotoAndPlay("loose")
_root.right.gotoAndPlay("won")
winorloose = computerchoice + " WINS!"
AIwin = 1
setProperty (PointsL, _xScale, 0)
_root.computer.gotoAndPlay("won")
gotoAndPlay(3);

}

if (pointsRight < 0) {
_root.Left.gotoAndPlay("won")
_root.Right.gotoAndPlay("loose")
winorloose = playerchoice + " WINS!"
AIlost = 1
setProperty (PointsR, _xScale, 0)
_root.player.gotoAndPlay("won")
gotoAndStop(3);
}
}
//to keep it exciting:

points = points + 0.1
if (points == 100) {points = 100}


//::::::::::::::::::::Moving::::::::::::::::::::::::::::::::::

function DoMovePlayer (player, speed) {

if (oldposrgx <= oldposlgx + near) { 

setProperty (computer, _x, oldposrgx + bump)
setProperty (player, _x, oldposlgx - bump) 

}else{

setProperty (player, _x, oldposlgx + speed)
}
} 

function DoMoveComputer (computer, speed) {

if (oldposrgx <= oldposlgx + near ) {
setProperty (computer, _x, oldposrgx + bump)
setProperty (player, _x, oldposlgx - bump )

}else{

setProperty (computer, _x, oldposrgx + speed)
}
}

//::::::::::::::::::Slapping::::::::::::::::::::::::::::::::::::::

function DoHitplayer (Player) {

counter1 = counter1 + 1
CheckKeyE = 1 

if (counter1 == 1) { 

player.gotoAndPlay ("hit")

if (oldposrgx <= oldposlgx + near) {

computer.gotoAndPlay("hitted") 
setProperty (computer, _x,  oldposrgx + playerHitStrength)
pointsright = pointsright - PlayerHitPoints
}

} 

if (counter1 >= actiontime) {

_root.player.gotoAndPlay("basis")
drawPoints ()
counter1 = 0  
checkKeyE = 0
}

}

function DoHitComputer (Computer) {

counter2 = counter2 + 1
AIhit = 1

if (counter2 < actiontime) {

if (oldposrgx <= oldposlgx + near) {

player.gotoAndPlay("hitted") 
setProperty (player, _x,  oldposlgx - computerHitStrength)
pointsleft = pointsleft - computerHitPoints

}

}else{

drawPoints () 
counter2 = 0  
AIhit = 0
}
}

//:::::::::::::::::::::::::::::kicking:::::::::::::::::::::::::::::


function DoKickPlayer (player) {

counter3 = counter3 + 1
CheckKeyD = 1

if (counter3 == 1) {

player.gotoAndPlay ("kick")

if (oldposrgx <= oldposlgx + near) {

computer.gotoAndPlay("hitted") 
setProperty (computer, _x, oldposrgx + playerKickStrength)
     pointsright = pointsright - playerKickPoints
} 

}

if (counter3 >= actiontime){

_root.player.gotoAndPlay("basis")
DrawPoints ()
counter3 = 0  
checkKeyD = 0

}
}

function DoKickComputer (computer) {

counter4 = counter4 + 1
AIkick = 1

if (counter4 < actiontime) {

if (oldposrgx <= oldposlgx + near) {

player.gotoAndPlay("hitted") 
setProperty (player, _x, oldposlgx - computerKickStrength)
if (counter4 = computerkick) {pointsleft = pointsleft - computerKickPoints}
}

}else{

DrawPoints ()
counter4 = 0  
AIkick = 0

}
}


function DoJumpPlayer (player) {

counter5 = counter5 + 1

if (counter5 <=20) {
if (counter5 <= 10) {
setProperty (player, _y, oldposlgy - 10/counter5)

}

if (counter5 > 10) { 
setProperty (player, _y, oldposlgy + (counter5-10)*0.537)
} 

}else{

setProperty (player, _y, baseline)
counter5 = 0
checkKeyUp = 0
}
}


function DoJumpComputer (computer) {

counter6 = counter6 + 1
AIjump = 1

if (counter6 <= 20) {

if (counter6 <= 10) {
setProperty (computer, _y, oldposrgy - 10/counter6)
}

if (counter6 > 10) { 
setProperty (computer, _y, oldposrgy + (counter6-10)*0.537)
} 

}else{

setProperty (computer, _y, baseline)
counter6 = 0
AIjump = 0
}
}

//::::::::::::::::::::::::::::::::::::you are now here::::::::::::::::::::::::


function DoSpecial (object, direction) {

_root.left.gotoAndPlay("special");
checkKeyS = 0
}

function DoDuck () {

anyKey = checkKeyUp + checkKeyDown + checkKeyS + checkKeyD + checkKeyE

if (checkKeyDown == 1) {

_root.left.gotoAndPlay("duck");

if (anyKey > 1) {

_root.left.gotoAndPlay(1)
checkKeyDown = 0
}
}
}





//::::::::::: end of AI c00ding :::::::::::::::::::::::::::::::::::::::::::::::::::::::

//fall off line (for fun only)

//if (oldposrgx >= 341) {

// teller3 = teller3 + 1
// setProperty (_root.right, _y, oldposrgy + teller3*0.5)
// setProperty (_root.right, _x, 442)
// _root.left.gotoAndStop("won");
//}

//if (oldposlgx <= 45) {

// teller3 = teller3 + 1
// setProperty (_root.left, _y, oldposlgy + teller3*0.5)
// setProperty (_root.left, _x, 44)
// _root.right.gotoAndStop("won");
//}

[Verwijderd]

Is ech wel grapig

[Verwijderd]

marc wins

[Verwijderd]

Leuk ding man, eerste keer dat ik zo'n ding zie en dat het er een beetje op lijkt.

't is nog niet al te snel, maar ik zal eens kijken of ik het kan optimaliseren.

(fla?)

b.

[Pelle]

* Pelle vind XangadiX een goeroe

Erg cool!
Wanneer komen de fatalities?

[Verwijderd]

TOP, zeer leuk gemaakt.
Alleen een beetje sluggish ja...
Tijd voor schockwave hehe.

[XangadiX]

Op woensdag 31 oktober 2001 14:56 schreef B-Top het volgende:
Leuk ding man, eerste keer dat ik zo'n ding zie en dat het er een beetje op lijkt.

't is nog niet al te snel, maar ik zal eens kijken of ik het kan optimaliseren.

(fla?)

b.

ja; ik had hem ook nog niet gezien, daarom wilde ik hem ook bouwen, ik heb het weleens in shockwave geprobeerd maar liep vast op de multiplayer.

Deze versie krijgt nog meerdere characters met vershillende stats, 2 blocking fucties en dat je niet kan kicken als iemand in de lucht zit (jumped) en niet kan slaan als iemand gebukt zit (moet er ook nog in) en ik wil eigenlijk een special move er nog op zetten.

Dit is dus de kale engine, ik ben bang dat ik geen fla kan posten hier want zoals je kan zien is dit spelletje voor de nieuwe site van de Melkweg in amsterdam

[Blaise]

Ik wil ook een fatality ofzo...
iig iets meer dan "blabla wins"

[XangadiX]

Op woensdag 31 oktober 2001 15:06 schreef Spud het volgende:
TOP, zeer leuk gemaakt.
Alleen een beetje sluggish ja...
Tijd voor schockwave hehe.

Ow; hij kan wel sneller hoor, maar dan maakt de computer je volledig in

en als ik al het andere en de multiplayer af heb dan zal ik er ook nog een paar fatalaties inzetten.

tot die tijd zul je je moeten behelpen met:
MORTAL COMBAT!!!!

[FragNeck]

lachu man!

[Verwijderd]

Ben nu aan het kijken...

Hij's nogal slugish om meerdere redenen:

Miljoenen if's...
Functie's teveel.
en een lage framerate 12...

Als je hem hoger zet wint de computer bijna altijd, om dat ie niet gerestrict is...

Ai ziet er wat dat betreft wel een beetje raar uit met 120 Fps

Slimmere AI anyone?
A* gaat hier niet werken

Ff een ai routine bedenken, en wat if's verwijderen.

B.

[Verwijderd]

Ziet er leuk uit jah!

/me vraagt zich af waarom er altijd veel leuke Flash topics zijn als hij op school zit

t zou inderdaad wel leuker worden als het wat vloeiender zou gaan en als het uitgebreider zou zijn. Ventjes met speciale functies zou leuk zijn, eventueel random achtergrondje ofzo. Verder lukte het mij niet over de tegenstander heen te springen, en inderdaad hogere AI bouwen voor de tegenstander. Maar zeker heel leuk gedaan!...

[Verwijderd]

Echt grappig! Goed gedaan trouwens. Heb je die code zelf verzonnen? Zo ja, bravo!
Maar met welke knop kon je slaan? Of is er een vooraf ingestelde winnaar?

[Verwijderd]

Ik heb al je keycode if's er nu uit, als het goed is worden de controls ook wat smoother....

Proctijd voor keycode is iets van 0,2% op een P3 1000

Weet niet of ik vandaag nog verder kom dan dat, ik ben de game engine van null ( ) af aan opnieuw aan het bouwen duz...

B.

[DeFeCt]

Tof!

Alhoewel ik me niet kan voorstellen dat de melkweg het vechten in de gardarobe wil stimuleren...

[XangadiX]

Op woensdag 31 oktober 2001 17:31 schreef DeFeCt het volgende:
Tof!

Alhoewel ik me niet kan voorstellen dat de melkweg het vechten in de gardarobe wil stimuleren...

neen; we gaan het ook "subcultural combat" noemen, zodat alle subcultuurtjes in de melkweg met elkaar op de vuist kunnen

en verder; ja de code is slordig, dit is de eerste keer dat ik meer dan 200 regels code schrijf; en ja ik heb hem zelf geschreven. Verder hoop ik wel dat ik de code nog begrijp als die overgedaan is

als ik hem niet begrijp mag niemand hem gebruiken
verder is er geen voorafingestelde winnaar.

[pim]

Op woensdag 31 oktober 2001 15:08 schreef XangadiX het volgende:

[..]

Dit is dus de kale engine, ik ben bang dat ik geen fla kan posten hier want zoals je kan zien is dit spelletje voor de nieuwe site van de Melkweg in amsterdam

Volgens mij maak je het me wel erg makkelijk

[zwahiel]

nice game... Mooie background ook! en zowieso een geinige game

[Yellow|A]

* Yellow|A zal nooit meer rustig door de garderobe heen kunnen wandelen

[prototype]

WOW, 'k heb een hidden feature gevonden volgens mij!, Je kan uit 't beeld lopen om te verstoppen voor je vijand!, ohnee toch niet, je wordt dan nog steeds in elkaar geslagen, maar volgens mij hoort dat niet echt eh?

[XangadiX]

[quote]
Op woensdag 31 oktober 2001 23:22 schreef pim het volgende:

[..]

hmmm.... sja maar da's dus net de bedoeling he?

en verder, prototype; zoals ik al zie, hij is nog niet af

[XangadiX]

ik krijg dus deze melding als ik mijn tikfout er uit wil halen;

Helaas, je bericht is al gewijzigd door een moderator. Je kunt dit bericht niet meer wijzigen.

maar dat is dus NIET de bedoeling

[waxle]

Op donderdag 01 november 2001 01:27 schreef Yellow het volgende:
* Yellow|A zal nooit meer rustig door de garderobe heen kunnen wandelen

* waxle stelt zich voor hoe Yellow binnenkomt lopen en besprongen wordt door een horde Gothic-people en Xangadix en Defect die de stand bijhouden in biertjes onder het genot van aanzwellende hiphop

Hop, tis weer vrijdagmiddag