k its real basic movement but here it is
Do
set cursor 0,0
print screen fps()
Rem Store Object angle
AngleY# = object angle Y(10)
Rem Control input for camera
If Upkey()=1
XTest# = Newxvalue(X#,AngleY#,20)
ZTest# = Newzvalue(Z#,AngleY#,20)
If XTest#>0 and XTest#<10000 and ZTest#>0 and ZTest#<10000
Move object 10,10
Endif
Endif
If Leftkey()=1 then Yrotate object 10,Wrapvalue(AngleY#-5)
If Rightkey()=1 then Yrotate object 10,Wrapvalue(AngleY#+5)
if keystate(30)=1
Character_Attack()
endif
if keystate(32)=1
AB = IntRndRange(16, 32)
Print "AB ";AB
sleep 3 * 1000
AB = 0
endif
X# = Object position x(10)
Z# = Object position z(10)
Y# = Get Ground Height(1,X#,Z#)
Position object 10,X#,Y#+0.5,Z#
CameraZ# = Newzvalue(Z#,AngleY#-180,100)
CameraX# = Newxvalue(X#,AngleY#-180,100)
CameraY# = Get Ground Height(1,CameraX#,CameraZ#)
Position camera CameraX#,CameraY#+50,CameraZ#
Point camera X#,Y#+25,Z#
Rem Refresh Screen
print "Class: ";usr.Class$
print "Level ";usr.Level
print "HP ";usr.HP;" / ";usr.Max_HP
print "MP ";usr.MP;" / ";usr.Max_MP
print "Strength ";usr.Strength
print "Defense ";usr.Defense
print "Agility ";usr.Agility
print "Dexerity ";usr.Dexerity
print "Inteligence ";usr.Intelligence
print "Luck ";usr.Luck
print "Experience ";usr.Expp
print "Exerience to next ";usr.EXP_to_Next
print "Lira ";usr.Lira
print "X ";X#
print "Z ";Z#
print "Height ";Y#
print "Polygons On Screen: ",statistic(1)
Sync
Loop
can you show me where in that coding to place walking animation
and how to do walking delays so I can change how fast ya walk?
A 1 man team
EVIL SIG!
