Prosentteina palautus (käy esim health palkkeihin)
Posted: Wed Oct 31, 2007 8:34 pm
Vaikka tää on tosi pieni funktio nii tää on silti kannattava. En sitte tiedä miten nuo foorumien pystyssä pitäjät tähän suhtautuu. Hyöty on se vaikka maksimi määrä panoksia on vaikka 1000 ja pitäisi piirtää 100 pikselin pituinen laatikko panosten määrän mukaan. Jos yrität drawimagebox:illa niin
palkki on koko ajan täynnä, jos panoksia on enemmän kuin palkin pituus niin tulee mav tai sitten palkki näyttää täydeltä! (kuten sanoin )
(Jos painat liia kaua vasenta näppäintä tulee virhe!)
No.. asiaan:
Älkää ottako hernettä nenää
palkki on koko ajan täynnä, jos panoksia on enemmän kuin palkin pituus niin tulee mav tai sitten palkki näyttää täydeltä! (kuten sanoin )
(Jos painat liia kaua vasenta näppäintä tulee virhe!)
No.. asiaan:
Code: Select all
Screen 500,300
c=0
maxmaara=1000
imglifebar=LoadImage("Media/life.jpg")
Repeat
If c=<0 Then c=0
Text 0,15,"Panosten määrä: "+c+"/"+maxmaara
Text 0,0,"Näytä panosten määrä prossina: "+Prosents(c,maxmaara)+"%"
If c=>maxmaara Then c=maxmaara
DrawImageBox imglifebar,10,50,0,0,Prosents(c,maxmaara)*2,26
Text 0,30,"Vähennä/lisää"+chr(34)+"panosten"+chr(34)+"määrää Ylös/alas näppäimillä."
Text 0,45,"Vähennä/lisää"+chr(34)+"panosten"+chr(34)+"maksimi määrää oikea/vasen näppäimillä"
C=c+UpKey()-DownKey()
maxmaara=maxmaara+rightkey()-leftkey(cbkeys)
DrawScreen
Forever
//Itse funktio
Function Prosents(howmuch,MaxM)
Return howmuch*100/MaxM
EndFunction
EDIT:
Offtopick: Mutta eihän tämä mikään turha asia ole, eihän?
EDIT:
2. mutta jos haluaa saada drawimage box:in toimimaan kannattaa käyttää tuota mun omaa tietääkseni.