collide Mouse and sprite - GameCreators Forum

Author

Message

Behdadsoft

15

Years of Service

User Offline

Joined: 7th Apr 2009

Location: Tehran-Iran

Posted: 19th Jan 2014 09:11 Edited at: 19th Jan 2014 09:21

Link

Hi.
how can detect collide between mouse over or click on the sprite? there is function for this work?
sorry for more question, because I Only used GUI Engines and I am not familiar with Visual engines like AGK.

Thanks

Back to top

Profile PM

Markus

Valued Member

20

Years of Service

User Offline

Joined: 10th Apr 2004

Location: Germany

Posted: 19th Jan 2014 10:22 Edited at: 19th Jan 2014 10:25

Link

GetSpriteHit use the draw order, means you get the top sprite

spr=GetSpriteHit ( x, y )

1 or 0=GetSpriteHitTest ( iSpriteIndex, x, y )

sprites are in world coords!!
ScreenToWorldX ( x )
ScreenToWorldY ( y )

GetPointerPressed ()
GetPointerReleased ()
GetPointerState ()
GetPointerX ()
GetPointerY ()

alternate rectangle check
(mousex=>x1 and mousex<=x2) and (mousey=>y1 and mousey<=y2)

online docu with search/filter
http://www.appgamekit.com/documentation/search.html

AGK 108 (B)19 : Windows 8.1 Pro 64 Bit : AMD Radeon HD 6670

Back to top

Profile PM Email

Behdadsoft

15

Years of Service

User Offline

Joined: 7th Apr 2009

Location: Tehran-Iran

Posted: 19th Jan 2014 12:58 Edited at: 19th Jan 2014 13:24

Link

Thanks Markus. if possible Now I Need you Guide that how can Move sprite when GetPointerState () = 1? I only need guide and no any code. I want write my code with your help for better familiar with AppGameKit Functions.

This is my code Up to now:

+ Code Snippet

do
    HitTest = GetSpriteHitTest ( spr, GetPointerX(), GetPointerY() )
    if HitTest = 1
if GetPointerState () = 1
    PointerX# = GetPointerX()
    PointerY# = GetPointerY()
        Print ("Mouse Over")
        if move = 0
            move = 1
            SpriteX# = ScreenToWorldX ( GetSpriteX ( spr ) )
            SpriteY# = ScreenToWorldY ( GetSpriteY ( spr ) )

            X# = PointerX# - SpriteX#
            Y# = PointerY# - SpriteY#

            square# = sqrt ( (X# ^ 2) + (Y# ^ 2) )

        Endif
    Endif
Endif

 Sync()
loop

Thanks

Back to top

Profile PM

Kobaltic

12

Years of Service

User Offline

Joined: 24th Jan 2012

Location: PA, USA

Posted: 19th Jan 2014 13:36 Edited at: 19th Jan 2014 13:37

Link

Behdadsoft, you should really check out the example games and example snippets that come with the engine. A lot of your questions are answered in those.

To answer your question, get the sprite's current location X and Y, and add or subtract a number (add to go one way subtract to go the other way). The bigger the number you use the faster your sprite will travel. Keep it in the main loop and start with 1 and go from there.

If you are doing move to where you touch the screen, then you also need to get the distance from where you click and where the sprite is.

If that is what you want, go to your AppGameKit install and go to here for an example with code.

AGK/IDE/Help/examples/sprites/8_move.htm

edit: typo fixed

Back to top

Profile PM Email Website

Behdadsoft

15

Years of Service

User Offline

Joined: 7th Apr 2009

Location: Tehran-Iran

Posted: 19th Jan 2014 17:05

Link

previous code is according to Sprite Move Example at AGK. I've already seen it.

This is My code but don't move my sprite.

SetDisplayAspect( 4.0/3.0 )

spr = CreateSprite (0)
SetSpriteSize (spr, 8, 11)
SetSpriteOffset ( spr, GetSpriteWidth(spr)/2, GetSpriteHeight(spr)/2)
SetSpritePositionByOffset (spr, 10, 80)
setspritePhysicson (spr, 1)

do
    HitTest = GetSpriteHitTest ( spr, GetPointerX(), GetPointerY() )
    if HitTest = 1
if GetPointerState () = 1
    PointerX# = GetPointerX()
    PointerY# = GetPointerY()
        Print ("Mouse Over")
        if move = 0
            move = 1
            SpriteX# = ScreenToWorldX ( GetSpriteX ( spr ) )
            SpriteY# = ScreenToWorldY ( GetSpriteY ( spr ) )

X# = PointerX# - SpriteX#
            Y# = PointerY# - SpriteY#
            square# = sqrt ( (X# ^ 2) + (Y# ^ 2) )

if square# <> 0.0
                directionX# = X#/square#
                directionY# = Y#/square#
            Endif

if move > 0
                newX# = SpriteX# + directionX# * move
                newY# = SpriteY# + directionY# * move
            Endif
                if move < square#
                    move = move + 2
                else
                    move = 0
                Endif
                    SetSpritePosition ( spr, newX#, newY# )
        Endif
    Endif
Endif

Sync()
loop

+ Code Snippet

SetDisplayAspect( 4.0/3.0 )

spr = CreateSprite (0)
SetSpriteSize (spr, 8, 11)
SetSpriteOffset ( spr, GetSpriteWidth(spr)/2, GetSpriteHeight(spr)/2)
SetSpritePositionByOffset (spr, 10, 80)
setspritePhysicson (spr, 1)


do
    HitTest = GetSpriteHitTest ( spr, GetPointerX(), GetPointerY() )
    if HitTest = 1
if GetPointerState () = 1
    PointerX# = GetPointerX()
    PointerY# = GetPointerY()
        Print ("Mouse Over")
        if move = 0
            move = 1
            SpriteX# = ScreenToWorldX ( GetSpriteX ( spr ) )
            SpriteY# = ScreenToWorldY ( GetSpriteY ( spr ) )

            X# = PointerX# - SpriteX#
            Y# = PointerY# - SpriteY#
            square# = sqrt ( (X# ^ 2) + (Y# ^ 2) )

            if square# <> 0.0
                directionX# = X#/square#
                directionY# = Y#/square#
            Endif

            if move > 0
                newX# = SpriteX# + directionX# * move
                newY# = SpriteY# + directionY# * move
            Endif
                if move < square#
                    move = move + 2
                else
                    move = 0
                Endif
                    SetSpritePosition ( spr, newX#, newY# )
        Endif
    Endif
Endif

 Sync()
loop

Back to top

Profile PM

Markus

Valued Member

20

Years of Service

User Offline

Joined: 10th Apr 2004

Location: Germany

Posted: 19th Jan 2014 18:41 Edited at: 19th Jan 2014 20:31

Link

try this , and maybe use 3=kinematic at setspritePhysicson

SetDisplayAspect( 4.0/3.0 )

spr = CreateSprite (0)
SetSpriteSize (spr, 8, 11)
SetSpritePositionByOffset (spr, 10, 80)
setspritePhysicson (spr, 1)

do
    mx#=ScreenToWorldX(GetPointerX())
    my#=ScreenToWorldY(GetPointerY())

if getpointerpressed()=1
        HitTest = GetSpriteHitTest ( spr, mx#, my# )
        //click offset
        ox# = mx# - GetSpriteXbyoffset ( spr )
        oy# = my# - GetSpriteYbyoffset ( spr )
    endif

if getpointerreleased()=1
        HitTest = 0
    endif

if GetPointerState() = 1 and HitTest=1
                dx# = mx# - GetSpriteXbyoffset ( spr ) - ox#
                dy# = my# - GetSpriteYbyoffset ( spr ) - oy#
                l# = sqrt ( dx#*dx# + dy#*dy# )

if l#>0.0
                    dx#=dx# / 10.0
                    dy#=dy# / 10.0
                    nx#=GetSpriteXbyoffset ( spr ) + dx#
                    ny#=GetSpriteybyoffset ( spr ) + dy#
                    SetSpritePositionbyoffset ( spr, nx#, ny# )
                endif

Endif

Sync()
loop

+ Code Snippet

SetDisplayAspect( 4.0/3.0 )

spr = CreateSprite (0)
SetSpriteSize (spr, 8, 11)
SetSpritePositionByOffset (spr, 10, 80)
setspritePhysicson (spr, 1)


do
    mx#=ScreenToWorldX(GetPointerX())
    my#=ScreenToWorldY(GetPointerY())

    if getpointerpressed()=1
        HitTest = GetSpriteHitTest ( spr, mx#, my# )
        //click offset
        ox# = mx# - GetSpriteXbyoffset ( spr )
        oy# = my# - GetSpriteYbyoffset ( spr )
    endif

    if getpointerreleased()=1
        HitTest = 0
    endif

    if GetPointerState() = 1 and HitTest=1
                dx# = mx# - GetSpriteXbyoffset ( spr ) - ox#
                dy# = my# - GetSpriteYbyoffset ( spr ) - oy#
                l# = sqrt ( dx#*dx# + dy#*dy# )

                if l#>0.0
                    dx#=dx# / 10.0
                    dy#=dy# / 10.0
                    nx#=GetSpriteXbyoffset ( spr ) + dx#
                    ny#=GetSpriteybyoffset ( spr ) + dy#
                    SetSpritePositionbyoffset ( spr, nx#, ny# )
                endif

    Endif

 Sync()
loop

AGK 108 (B)19 : Windows 8.1 Pro 64 Bit : AMD Radeon HD 6670

Back to top

Profile PM Email

Behdadsoft

15

Years of Service

User Offline

Joined: 7th Apr 2009

Location: Tehran-Iran

Posted: 19th Jan 2014 19:08

Link

Thanks Markus,
I don't Think any example in AppGameKit could help me to write this code.

Your Calculation is according to Formula? really I love know how you can Calculation.

Back to top

Profile PM

Markus

Valued Member

20

Years of Service

User Offline

Joined: 10th Apr 2004

Location: Germany

Posted: 19th Jan 2014 20:26

Link

at first i think about the steps i need,
then i write code for this steps.

at first the pointer is in screen coord, we need world coord for the sprite.
at click you want memory the sprite (because at mouse movement you get out of the sprite area)
at release forget the sprite handle.
at mouse down you want move the sprite.
then we need the delta from a to b for x and y axis.
the length i do not need but i left in code.
for movement i use 1/10 from the original difference because i did not want the movement in one step to the new mouse position.
then you set the new position.
ready

the click offset is special,based on experience,
if you not use this offset the sprite center want goto mouse pointer at click, means the sprite move without you move your mouse at click.
for calculation i think also step for step to get the result.

AGK 108 (B)19 : Windows 8.1 Pro 64 Bit : AMD Radeon HD 6670

Back to top

Profile PM Email

Sorry your browser is not supported!

AppGameKit Classic Chat / collide Mouse and sprite