Quote: "Seriously Behdadsoft, are you a TGC mole planted in the forums to encourage discussion on really inane and simple issues?"
Maybe.
when I decided convert my car game form 3drad to unity it take Two weeks, while when I used 3drad it take one year. reason in unity forum you can find any solution for your problem. while in TGC can't find good thing.
Quote: "
PS... don't feel discouraged. Keep at it and you'll soon have something as good as "Street Karate Fighter"! In fact, why don't you rip off the graphics from an old 80s classic too? It worked for Gekko! You could do "Yie ar kung-po" or something "
I made a fighting game better than "Yie ar kung-po". also I wrote some AI for enemy and work very well.
I know some question is very simple but sometimes easy is hard for someone. and really I learned more things about Programming in this forum.
in Physics mode there is no any problem but currently I used none Physics and I'm not familiar with this method.
I used angle# variable for change angle that work but my sprite don't playing.
// Project: Test
// Created: 2016-02-24
// set window properties
SetWindowTitle( "Test" )
SetWindowSize( 1280, 800, 0 )
// set display properties
SetDisplayAspect(-1)
SetOrientationAllowed( 1, 1, 1, 1 )
SetClearColor(128,128,128)
global spr
global die = 1
global ground
global angle# = 0.0
CreateGround()
CreateSpr()
SetPhysicsDebugOn()
do
if angle# <= 270
angle# = angle# + 10
PlaySprite(spr,10,0,1,4)
elseif angle# >= 270
angle# = 270
SetSpriteAngle(spr,angle#)
endif
Print (GetSpriteAngle(spr))
Print ("angle#: " + Str(angle#))
Sync()
loop
Function CreateGround()
if GetSpriteExists(ground) = 0
ground = CreateSprite(0)
SetSpritePosition(ground,0,95)
SetSpriteSize(ground,100,5)
endif
EndFunction
Function CreateSpr()
if GetSpriteExists(spr) = 0
spr = CreateSprite(LoadImage("anim.png"))
SetSpritePosition(spr,50,70)
SetSpriteSize(spr,18.125,-1)
SetSpriteOffset(spr,GetSpriteWidth(spr)/2,GetSpriteHeight(spr)/2)
SetSpriteAnimation(spr,232,195,4)
//PlaySprite(spr,10,0,1,4)
w# = GetSpriteWidth(spr)
h# = GetSpriteHeight(spr)
SetSpriteShapeBox(spr,-w#/9,h#/2,w#/2,-h#/2,0)
endif
EndFunction
