saving - GameCreators Forum

Author

Message

Stefan p

15

Years of Service

User Offline

Joined: 2nd Nov 2008

Location: Online

Posted: 30th May 2009 23:08 Edited at: 30th May 2009 23:09

Link

I have a problem in my saving code can someone try to find it because i been at it all day. And it isn't a vista problem because if declare map_name$ in the function it works.

+ Code Snippet

function save_map(map_name$)
   map_name$=map_name$+".txt" 
      set dir "C:DarkBasicProProjectslevel editor tests"
      if file exist(mapname$)=1 then delete file map_name$
   Open To Write 1,map_name$
      write string 1, str$(enemies)
      write string 1, str$(enumber)
      for g=1 to enemies
         cls Rgb(255,255,255)
         write string 1, str$(enemey(g).startx)
         write string 1, str$(enemey(g).starty)
         print "saving map"
      next g
   Close File 1
      set dir "C:DarkBasicProProjectstanks side view"
      SAVEMAP=1
endfunction map_name$

+ Code Snippet

function better_input()
hide all sprites
words$=""
input_timer# = timer()
delete_timer# = timer()
   repeat
      cls rgb(255,255,255)
      print "Please input the maps name"
      comparetimes#=comparetimes(input_timer#)
      
`adding characters      
     if inkey$()=right$(words$,1) and keystate(14)=0 
        if comparetimes#>1 then words$=words$+inkey$() : input_timer# = timer()
     endif
      	if inkey$()<>right$(words$,1) and keystate(14)=0 then words$=words$+inkey$() : input_timer# = timer() 
      
      
      comparetimes#=comparetimes(delete_timer#)
`deleting characters     
      if keystate(14)=1 and comparetimes# > 1.3 then  words$ = left$(words$,len(words$)-1 ) : delete_timer# = timer()
      
      print words$
      sync
   until returnkey()=1
endfunction words$
function comparetimes(time)
   compare_times# = (timer()-time)/100
endfunction compare_times#

+ Code Snippet

      `save
      if controlkey()=1 and keystate(31)=1
         mapname$=better_input()
         save_map(mapname$)
      endif
      
      if SAVEMAP=1 then print "Map " +mapname$+ " saved"

Thanks, Stefan

Back to top

Profile PM Email

bobbel

15

Years of Service

User Offline

Joined: 5th Jan 2009

Location: In my DBPro case xD

Posted: 30th May 2009 23:47

Link

i think the code looks fine, just this code:

+ Code Snippet

set dir "C:DarkBasicProProjectslevel editor tests"

could you change that to this and check if that works?

+ Code Snippet

set dir "C:\DarkBasicPro\Projects\level editor tests\"

*ding ding*

Back to top

Profile PM Website

Dream And Death

18

Years of Service

User Offline

Joined: 21st Feb 2006

Location: The circus! Juggling job, kids and DBPro

Posted: 31st May 2009 01:35

Link

Bobbel, I suspect he had that originally - the forum code occasionally strips backslashes from text.

"You get what everyone gets, you get a lifetime!" - Death, The Sandman Library

First you Dream, then you ... - Neil Gaiman, 2001

Back to top

Profile PM

bobbel

15

Years of Service

User Offline

Joined: 5th Jan 2009

Location: In my DBPro case xD

Posted: 31st May 2009 11:27 Edited at: 31st May 2009 11:31

Link

oh i didn;t knew that, then i have another solvement (or something like that, don;t know the word, sounds like the word to solve)

in his part of the code

+ Code Snippet

   Open To Write 1,map_name$
      write string 1, str$(enemies)
      write string 1, str$(enumber)
      for g=1 to enemies
         cls Rgb(255,255,255)
         write string 1, str$(enemey(g).startx)
         write string 1, str$(enemey(g).starty)
         print "saving map"
      next g
   Close File 1

you are writing the strings enemies, enumber and the array enemy. in a function, you can;t use variables from oustide the function. so if these are global, i have no idea. if these aren't, try to make some extra function parameters or make them global

EDIT: and another one, if you set this one in a function to one

+ Code Snippet

    SAVEMAP=1

and it isn't global, outside the function, the variable still stays 0. so, maybe, the map is saved, but you don;t see it because the savemap variable isn;t changed.

*ding ding*

Back to top

Profile PM Website

Dream And Death

18

Years of Service

User Offline

Joined: 21st Feb 2006

Location: The circus! Juggling job, kids and DBPro

Posted: 31st May 2009 12:16

Link

'solution' would be the word you were looking for ^_^

"You get what everyone gets, you get a lifetime!" - Death, The Sandman Library

First you Dream, then you ... - Neil Gaiman, 2001

Back to top

Profile PM

bobbel

15

Years of Service

User Offline

Joined: 5th Jan 2009

Location: In my DBPro case xD

Posted: 31st May 2009 13:48 Edited at: 31st May 2009 13:48

Link

ah thank you

and one other thing, if this isn;t the "Solution", you could always try to run it in administrator mode if you're using vista

due to UAC you can;t make files on the top level of C:

*ding ding*

Back to top

Profile PM Website

Stefan p

15

Years of Service

User Offline

Joined: 2nd Nov 2008

Location: Online

Posted: 1st Jun 2009 23:05 Edited at: 1st Oct 2009 00:06

Link

Ill try with uac off but im running in admin mode and the variables are globaled. I suspected that it might be the input function because if i set the maps name in the function then it works.

Edit: It works but i don't know what i did, i know i put the backslashes their and something else could remember because it was an hour apart.

Also thanks to you all.

Thanks, Stefan

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / saving