arrays question - GameCreators Forum

Author

Message

Mr Black

19

Years of Service

User Offline

Joined: 20th Oct 2005

Location: USA

Posted: 20th May 2006 22:53

Link

Is there a way i can save numbers and strings into the same array. I use this right now but it doesnt work.

+ Code Snippet

type profile
name$ as string
age as byte
birthday$ as string
ffm$ as string
pc$ as string
endtype


dim profile(10,10,10) as profile

profile(1,1,1)=name$
profile(1,1,2)=age
profile(1,1,3)=birthday$
profile(1,1,4)=ffm$
profile(1,1,5)=pc$

It atleast loaded when i did

+ Code Snippet

dim profile(1) as profile

profile(1).name=name$

I liked that but i read and saw thats its impossible.

Back to top

Profile PM

Slayer93

20

Years of Service

User Offline

Joined: 5th Aug 2004

Location: I wish I knew

Posted: 21st May 2006 02:10

Link

+ Code Snippet

type profile
name$ as string
age as byte
birthday$ as string
ffm$ as string
pc$ as string
endtype


dim profile(10,10,10) as profile

profile(1,1,1)=name$
profile(1,1,2)=age
profile(1,1,3)=birthday$
profile(1,1,4)=ffm$
profile(1,1,5)=pc$

The thing wrong about this is you didn't put the field it is suppose to go to. Something like this profile(1,1,1)=name$ should be like this profile(1,1,1).name$=name$. This part .name$ is the field you put it in just like everything else.

Hope that explained something because I am not good at explaining things.

NARUTO IS THE NINJA.....not really

WIP...4 Elements

Back to top

Profile PM Email Website

Mr Black

19

Years of Service

User Offline

Joined: 20th Oct 2005

Location: USA

Posted: 21st May 2006 02:47 Edited at: 21st May 2006 04:24

Link

Ok, i tried that but still not saving right, heres my source for saving.

+ Code Snippet

save array filename$,profile(10,10,10)

-This is the line the error(incorrect array)or something like that says the error is.

Thanx for the reply slayer93

Back to top

Profile PM

MSon

20

Years of Service

User Offline

Joined: 13th Jul 2004

Location: Earth, (I Think).

Posted: 21st May 2006 04:31

Link

Have you tried using Typed Dims?

+ Code Snippet

Type ProfileType
     Name     As String
     Age      As Integer
     Birthday As String
     EndType
 Dim Profile(10) As ProfileType

Profile(1).Name = Name$
Profile(1).Age  = Age
Profile(1).Birthday = Birthday$

PS: You can't use 'Save Array' on Typed Dims, so instead Try

+ Code Snippet

For n = 1 to Array Count(Profile())
Write String  1,Profile(1).Name
Write Integer 1,Profile(1).Age
Write String  1,Profile(1).Birthday
Next n

This Should search through the Whole Dim, Writing Every Entry

Back to top

Profile PM Email Website

Mr Black

19

Years of Service

User Offline

Joined: 20th Oct 2005

Location: USA

Posted: 21st May 2006 06:09 Edited at: 21st May 2006 06:11

Link

Ok, that got me closer, now it saves correctly, cant load it tho. Heres what I am using

+ Code Snippet

   open to read 1,"profiles/"+name$+".bin"
         read String  1,profile(1).name
         read byte 1,profile(1).age
         read String  1,profile(1).birthday
         read string 1,profile(1).ffm
         read string 1,profile(1).pc
   close file 1
profile(1).name=name$
profile(1).age=age
profile(1).birthday=birthday$
profile(1).ffm=ffm$
profile(1).pc=pc$

Thanx for all the help

EDIT: and MSon i kinda did what u 1st said in my first post. But now thanks to u i can use the profile(1).string style.

Back to top

Profile PM

MSon

20

Years of Service

User Offline

Joined: 13th Jul 2004

Location: Earth, (I Think).

Posted: 21st May 2006 06:16

Link

I don't think you can mix strings and bytes in a file, (Unsure)

I know you can't mix strings and bytes in a Typed dim, (Try using Integers)

Back to top

Profile PM Email Website

Mr Black

19

Years of Service

User Offline

Joined: 20th Oct 2005

Location: USA

Posted: 21st May 2006 06:31 Edited at: 21st May 2006 06:35

Link

Got it
my stupid mistake
heres what i have now

+ Code Snippet

type profile
name$ as string
age as byte
birthday$ as string
ffm$ as string
pc$ as string
endtype


dim profile(10) as profile

profile(1).name$=name$
profile(1).age=age
profile(1).birthday$=birthday$
profile(1).ffm$=ffm$
profile(1).pc$=pc$

saves
   open to write 1,"profiles/"+name$+".bin"
         Write String  1,profile(1).name$
         Write byte 1,profile(1).age
         Write String  1,profile(1).birthday$
         write string 1,profile(1).ffm$
         write string 1,profile(1).pc$
close file 1

loads
   open to read 1,"profiles/"+name$+".bin"
      read string 1,name$
      read byte 1,ages
      read string 1,birthday$
      read string 1,ffm$
      read string 1,pc$
   close file 1

Thanks for the help, i think i got it right now, this is much easier to organize then what i had before. Altho, if its possible to do what i had before that would be nice, but it atleast works now.

EDIT:It must be its possible to can mix strings and bytes, works for me.

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / arrays question