Something wrong with my UDT - GameCreators Forum

Author

Message

DB_Newbie

16

Years of Service

User Offline

Joined: 4th Aug 2009

Location:

Posted: 25th Jun 2010 16:57 Edited at: 25th Jun 2010 17:01

Link

Hi all,

I'm having trouble with something.

I made a UDT:

+ Code Snippet

TYPE arma_variables
   left AS INTEGER = 1
   right AS INTEGER = 0
   rotate AS INTEGER = 0
   roll AS INTEGER = 0
ENDTYPE

DIM arma(2) AS arma_variables

And I'm trying to call it later in the code with this:

+ Code Snippet

   IF arma(1).left = 1
      MOVE OBJECT LEFT 1, 1
      INC arma(1).roll, 5
      arma(1).rotate = 0
   ENDIF

But for some reason it doesn't work. The object doesn't move or anything. The UDT is only used for this and this only so nothing else should affect it. I'm sure I done this right. Because I used a similar method for another object in my code and it works. But this one doesn't.

Am I missing something here?

Back to top

Profile PM

BMacZero

20

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 25th Jun 2010 17:06

Link

You can't assign values inside the type declaration like that.

See this:

+ Code Snippet

type mytype
    inte as integer = 1
    bool as boolean = 1
    inte2 as integer = 0
    bool2 as boolean = 0
endtype

myvar as mytype

print myvar.inte
print myvar.bool
print myvar.inte2
print myvar.bool2

wait key

Back to top

Profile PM Email Website

DB_Newbie

16

Years of Service

User Offline

Joined: 4th Aug 2009

Location:

Posted: 25th Jun 2010 17:18 Edited at: 25th Jun 2010 17:21

Link

Really?

But I have these and they work:

+ Code Snippet

TYPE pickup_variables
   obj AS INTEGER = 0
   speed AS FLOAT = 0.0
   spin AS FLOAT = 0.0
ENDTYPE

DIM pickup(5) AS pickup_variables

`Touching the pickup
FOR n = 811 to 815
   no = n - 810
   IF OBJECT COLLISION(101, n) = 1 AND pickup(no).obj = 0
      pickup(no).obj = 1
      pickup(no).speed = -0.3
   ENDIF
NEXT n

`Moving the pickup
FOR n = 811 to 815
   no = n - 810
   IF pickup(no).obj = 1
      INC pickup(no).speed, 0.05
      INC pickup(no).spin, 10

      MOVE OBJECT UP n, pickup(no).speed
      YROTATE OBJECT n, pickup(no).spin
   ENDIF
NEXT n

As you can see, "speed" begins as 0. Then in the IF statement, I assigned it a value of -0.3. In the code, this caused my object to first move downwards before moving upwards. If I were to comment out this line:

+ Code Snippet

pickup(no).speed = -0.3

The object just moves upwards the moment object 101 collides with it.

I don't know... perhaps I'm really not understanding it o.O

EDIT: Wait... are you talking about declaring the values inside the TYPE and ENDTYPE lines? Your example did the same no? I'm confused =/

Back to top

Profile PM

BMacZero

20

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 25th Jun 2010 17:31 Edited at: 25th Jun 2010 17:31

Link

You can set them just fine after defining the variable like that, for example:
myvar.speed = -0.3

You just can't set the value within the type declaration:
type mytype
speed as float = -0.3
stuff as integer = 0
endtype

No matter what you put there, the different parts of the type all start with values of 0.

Back to top

Profile PM Email Website

Green Gandalf

VIP Member

21

Years of Service

User Offline

Joined: 3rd Jan 2005

Playing: Malevolence:Sword of Ahkranox, Skyrim, Civ6.

Posted: 25th Jun 2010 17:36 Edited at: 25th Jun 2010 17:37

Link

[Edit BMacZero beat me to it.

]

He's telling you that the values you tried to use inside the type declaration are ignored - they are all set to zero as usual (which, incidentally, is why your second code seems to work).

Did you run his code?

You should just declare your types like this:

+ Code Snippet

TYPE arma_variables
   left AS INTEGER
   right AS INTEGER
   rotate AS INTEGER
   roll AS INTEGER
ENDTYPE

DIM arma(2) AS arma_variables

then add some code to initialise the variables to the values you want. A UDT is a type not a variable.

Back to top

Profile PM Email

DB_Newbie

16

Years of Service

User Offline

Joined: 4th Aug 2009

Location:

Posted: 25th Jun 2010 18:01 Edited at: 25th Jun 2010 18:02

Link

Oh!!! I see...

The code is working no, thanks a lot BMacZero ^^

@GreenGandalf

Yeah, that's exactly what I did. I made sure none of the varibales inside the type are defined. They have no "=" anymore at the end of them =)

Back to top

Profile PM

BMacZero

20

Years of Service

User Offline

Joined: 30th Dec 2005

Location: E:/ NA / USA

Posted: 25th Jun 2010 18:21

Link

Exactly

.

Back to top

Profile PM Email Website

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Something wrong with my UDT