Experience / Leveling Up by Red Rain29th Jan 2010 16:08
|
---|
Summary Here's a simple text coding of how I was able to level up a character by gaining experience. I hope this helps people out in the RPGamers........ Sadly, it double's up the needed E Description Code ` This code was downloaded from The Game Creators ` It is reproduced here with full permission ` http://www.thegamecreators.com backdrop on sync on : sync rate 40 Lvl=0 PlayerExp=0 rem ** you can start out with whatever number u choose rem ** in order to make your first level up Xp=(whatever number) Xp=250 rem do/loops do if returnkey()=1 then inc PlayerExp,1 text 5,5,"Press RETURNKEY to increase Exp points" Lv$="Lv: "+str$(Lvl) : text 5,25,Lv$ GainedXp$="Xp: "+str$(PlayerExp) : text 5,40,GainedXp$ NeededXp$="Xp needed: "+str$(Xp) : text 5,55,NeededXp$ rem level up if PlayerExp=Xp Lvl=Lvl+1 dec PlayerExp,PlayerExp Xp=Xp*2 endif sync loop |