PT Forum

T3dd1n0us Joined: 24th Aug 2011
Location:

Posted: 1st Sep 2011 23:32

I have main.agc which defines my game objects:

// Object Structure.
Type GameObj
Obj_Image
Obj_Sprite
x#
y#
Obj_Width
Obj_Height
EndType

//====== Game Objects ==================
// Cards
Card_0 as GameObj
//======================================

in Media.agc I have 2 functions, 1 loads the object, the other calls that function to load each image into an object:

function LoadSprite(obj as GameObj, ImgName as string)
obj.Obj_Image = LoadImage(ImgName)
obj.Obj_Sprite = CreateSprite(obj.Obj_Image)
obj.Obj_Width = GetSpriteWidth(obj.Obj_Sprite)
obj.Obj_Height = GetSpriteHeight(obj.Obj_Sprite)
EndFunction

Function LoadCards()
LoadSprite(Card_0, "0.jpg")
EndFunction

When I call LoadCards() from Main.AGC it crashes. When I call LoadSprite(Card_0, "0.jpg") from main.agc it works fine?

Is this a compiler bug? Or am doign something wrong?

Thanks

Bursar Joined: 17th Sep 2008
Location:

Posted: 2nd Sep 2011 11:44

Try declaring Card_0 as a global.

When you call LoadSprite directly you are passing in the local copy of Card_0, so it works.

When using the LoadCards function, there is no local Card_0 for it to work with.

Hodgey Joined: 10th Oct 2009
Location: Australia

Posted: 2nd Sep 2011 12:20

Try declaring Card_0 as a global.

Aren't UDTs automatically global?

+ Code Snippet

rem Portrait App
SetDisplayAspect( 0.66 )
type mytype
    x as integer
    y as integer
endtype

a as mytype
rem A Wizard Did It!
do
 myfunc()
 Sync()
loop

function myfunc()
    a.x = 2
    a.y = 4
    print(a.x)
    print(a.y)
endfunction

I think the problem is here: LoadSprite(Card_0, "0.jpg")
I think there needs to be an element in there such as Card_0.obj_image

Bursar Joined: 17th Sep 2008
Location:

Posted: 2nd Sep 2011 12:41

Aren't UDTs automatically global?

Arrays of types are, but I don't know when declaring a single instance of the type.

I think there needs to be an element in there such as Card_0.obj_image

That doesn't explain why it works when called directly. Maybe it's just luck that it assigns the right value to the right element.

Hodgey Joined: 10th Oct 2009
Location: Australia

Posted: 2nd Sep 2011 13:24

That doesn't explain why it works when called directly. Maybe it's just luck that it assigns the right value to the right element.

I think it could be because when he passes Card_0 into LoadSprites, it expects a datatype of GameObj and so it's legal because he then accesses everything from the object's elements. But when he uses it in the loadcards() function he doesn't use the elements which causes a problem. That's my thinking of it anyway

T3dd1n0us Joined: 24th Aug 2011
Location:

Posted: 3rd Sep 2011 9:38

Hi Guys,

Thanks for the reply's

Try declaring Card_0 as a global.

All my Card_... are declared in main.agc. They will be used everywhere.

When i change it to sub and call is as suc it seems to work:

Main.agc

+ Code Snippet

// Object Structure.
 Type GameObj
 Obj_Image
 Obj_Sprite
 x#
 y#
 Obj_Width
 Obj_Height
 EndType
 
//====== Game Objects ==================
 // Cards
 Card_0 as GameObj
 //======================================
 
GoSub LoadCards

.....

Media.agc

+ Code Snippet

function LoadSprite(obj as GameObj, ImgName as string)
 obj.Obj_Image = LoadImage(ImgName)
 obj.Obj_Sprite = CreateSprite(obj.Obj_Image)
 obj.Obj_Width = GetSpriteWidth(obj.Obj_Sprite)
 obj.Obj_Height = GetSpriteHeight(obj.Obj_Sprite)
 EndFunction
 
LoadCards:
 LoadSprite(Card_0, "0.jpg")
Return

When LoadCards is defined as a function with no parameters and called as such it crashes.

Regards

Hodgey Joined: 10th Oct 2009
Location: Australia

Posted: 3rd Sep 2011 14:31

Oh, I see what you're doing now, my bad, I was getting confused with LoadSprite and CreateSprite. I see. I'm not too sure why that is...
Everyone ignore what I said earlier as it is incorrect.

Bursar Joined: 17th Sep 2008
Location:

Posted: 3rd Sep 2011 16:16

All my Card_... are declared in main.agc. They will be used everywhere.

Doesn't matter. Despite what the docs say, if you don't specifically declare a variable as global, it will only be local.

Hodgey Joined: 10th Oct 2009
Location: Australia

Posted: 4th Sep 2011 0:03

Despite what the docs say, if you don't specifically declare a variable as global, it will only be local.

I think UDTs are excepted though (individually and arrays) because I never declare any of my UDTs as global and they work across functions and across different source code files. I'll also point out that I can call a function within a function without the app crashing. Maybe the problem lies somewhere else...

LeeBamber Joined: 21st Jan 2000
Location: England

Posted: 6th Sep 2011 3:10

If this bug(s) is definitely confirmed, can they be added here: http://code.google.com/p/agk/issues/list

Funnell7 Joined: 8th Sep 2011
Location: UK, England

Posted: 18th Sep 2011 1:09

I think I may be experiencing a similar issue. Or maybe I'm doing something wrong? I'm trying to create a simple function, the code is below. Whenever I run the program I am getting the 'Sprite does not exist at line 31'. Reading the above I assumed it was something to do with declaring the Sprite as global. However doing so, doesn't solve the issue either. I've been trying to solve this for the last hour or so and am now completely stumped... Do you have any ideas?

+ Code Snippet

SetVirtualResolution (320, 480)
SetSyncRate(30, 1)

WoFImage = Loadimage("WoF.0.png")
WoFSprite = CreateSprite(WoFImage)
SetSpritePosition(WoFSprite, 10, 10)

ButtonImage = Loadimage("StopButton.png")
ButtonSprite = CreateSprite(ButtonImage)
SetSpritePosition(ButtonSprite, 15, 420)
SetSpriteVisible(ButtonSprite, 0)

do
    if GetPointerPressed() = 1
        Press = GetSpriteHit(GetPointerX(), GetPointerY())
    endif

    if Press = ButtonSprite AND GetSpriteVisible(ButtonSprite) = 1
        // Do Something
        Press = 0
    endif

    MyFunction()

    Print(ScreenFPS())
    Print(Press)
    Print(GetSpriteVisible(ButtonSprite))
    Sync()
loop

function MyFunction()
    SetSpriteVisible(ButtonSprite, 1)
endfunction

Any help would be much appreciated,

Many thanks!

Hockeykid Joined: 26th Sep 2007
Location:

Posted: 18th Sep 2011 6:33

been trying to solve this for the last hour or so and am now completely stumped... Do you have any ideas?

You need to make "ButtonSprite" global for it to work in a function, try this:

+ Code Snippet

SetVirtualResolution (320, 480)
SetSyncRate(30, 1)

WoFImage = Loadimage("WoF.0.png")
WoFSprite = CreateSprite(WoFImage)
SetSpritePosition(WoFSprite, 10, 10)

ButtonImage = Loadimage("StopButton.png")
Global ButtonSprite
ButtonSprite = CreateSprite(ButtonImage)
SetSpritePosition(ButtonSprite, 15, 420)
SetSpriteVisible(ButtonSprite, 0)

do
    if GetPointerPressed() = 1
        Press = GetSpriteHit(GetPointerX(), GetPointerY())
    endif

    if Press = ButtonSprite AND GetSpriteVisible(ButtonSprite) = 1
        // Do Something
        Press = 0
    endif

    MyFunction()

    Print(ScreenFPS())
    Print(Press)
    Print(GetSpriteVisible(ButtonSprite))
    Sync()
loop

function MyFunction()
    SetSpriteVisible(ButtonSprite, 1)
endfunction

Funnell7 Joined: 8th Sep 2011
Location: UK, England

Posted: 18th Sep 2011 14:11

@hockeykid, thanks, I'll give that a try. I did try this,

+ Code Snippet

ButtonImage = Loadimage("StopButton.png")
Global ButtonSprite = CreateSprite(ButtonImage)
SetSpritePosition(ButtonSprite, 15, 420)
SetSpriteVisible(ButtonSprite, 0)

But this didn't work either. Now that you mention it, I think I remember seeing something saying that you cannot declare global infront, you have to do it on a seperate line. Thanks so much, I'll give it a go...

<1 >

Sign In