Code:
REM Project: rpg
REM Created: 2/24/2007 1:05:05 PM
REM
REM ***** Main Source File *****
REM
mainmenu:
rem load media
load image \"rpg_media\\loading.png\",1000
paste image 1000,0,0,1
wait 2000
gosub walk
walk:
Load object \"rpg_media\\babeidle.3ds\",3
Rem make matrix
Make matrix 1,800,600,20,20
Rem texture matrix
Load image \"rpg_media\\floor01.bmp\",1
Prepare matrix texture 1,1,1,1
Fill matrix 1,0,1
Rem Make player pawn
Make object sphere 10,5
position object 10,100,0,100
load image \"rpg_media\\map.tga\",2
load image \"rpg_media\\magicbook.tga\",3
sprite 1,0,379,2
sprite 2,550,379,3
Sync On
Sync Rate 30
Rem Main loop
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)
X# = Object position x(10)
Z# = Object position z(10)
Y# = Get Ground Height(1,X#,Z#)
Position object 10,X#,Y#+12.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
Sync
Loop
Problem:
There\'s something with the camera to where it makes my object look like a pea (sp?) ant!
