Can someone help me with this code?

Author

Message

Anomaly452

14

Years of Service

User Offline

Joined: 14th Aug 2011

Location: Cyberspace

Posted: 19th Aug 2011 03:04

Link

Here is the peice of code that I am having trouble with:

+ Code Snippet

open to read 1,"settings.cfg"

repeat
	read byte 1,cByte
	cByte$=chr$(cByte)
	if cByte$="="
		cSet$=cString$
		cString$=""
		repeat
			read byte 1,cByte
			cByte$=chr$(cByte)
			if cByte$=";"
			else
				cString$=cString$+cByte$
			endif
		until cByte$=";"
		cVal$=cString$
	endif
	if cByte$=";"
		if cSet$="display_x" then dispx$=cVal$
		if cSet$="display_y" then dispy$=cVal$
		if cSet$="display_d" then dispd$=cVal$
		if cSet$="vsync" then vsync$=cVal$
		cString$=""
	else
		cString$=cString$+cByte$
	endif
until cString$="endfile"

wait key

set display mode dispx$,dispy$,dispd$,vsync$

The SET DISPLAY MODE command will not accept the STRINGS. Is there any way I can convert the STRINGS into INTEGERS or force it to accept the STRINGS. When I try to replace all of the $ symbols with # symbols to indicate that they are INTEGERS, the program compiles correctly but the values of dispx#, dispy#, dispd#, and vsync# are reset to 0 instead of the values that were there when they were in STRING format.

I hope I made sense

Can anyone help me with this problem?

Oh yeah, here is a copy of the file that it is reading from:

+ Code Snippet

display_x=1280;display_y=720;display_d=32;vsync=1;endfile;

The wisest leader is the one that can avoid the conflict in the first place.

Back to top

Profile PM

Bluespark

15

Years of Service

User Offline

Joined: 18th Mar 2011

Location:

Posted: 19th Aug 2011 05:25

Link

Try this:

+ Code Snippet

displaywidth$="640"
displaywidth=val(displaywidth$)

Back to top

Profile PM

Grog Grueslayer

Valued Member

21

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 19th Aug 2011 06:56 Edited at: 19th Aug 2011 06:59

Link

You're over complicating reading a .cfg file... there's no need to read it byte-by-byte. A .cfg file is just a .txt file with a different extension so you can use the READ STRING command to read the entire line at once. You don't need to have "endfile" in the string because the FILE END() command knows when the file naturally ends. Also if you wrote that .cfg file yourself you can make it a lot easier to work with by getting rid of the variable names and using IanMs SPLIT STRING() commands to separate everything.

Change your Settings.cfg to this:

+ Code Snippet

Display: 1280,720,32,1

And read it with this (after you get IanMs Matrix 1 Utilities Plugin):

+ Code Snippet

` Open the settings config
open to read 1,"Settings.cfg"

 ` Do this...
 repeat
 
  ` Read the entire line at once
  read string 1,a$
  
  ` Separate the string by colons and commas  (IanMs command)
  split string a$,":,"

  ` Check for "Display" (IanMs command)
  if split word$(1)="Display"

   ` Grab each variable for display  (IanMs command)
   dispx=val(split word$(2))
   dispy=val(split word$(3))
   dispd=val(split word$(4))
   vsync=val(split word$(5)) 
  
   ` Change the display mode
   set display mode dispx,dispy,dispd,vsync

  endif

 ` Until the end of the file has been reached
 until file end(1)

print "The screen is now "+str$(screen width())+"x"+str$(screen height())+"."

wait key

If you don't have IanMs Matrix 1 Utilities Plugin it's time for you to join the rest of us in the 21st century.

https://forumfiles.thegamecreators.com/download/2192430

Back to top

Profile PM Email

Webber

15

Years of Service

User Offline

Joined: 27th May 2011

Location:

Posted: 20th Aug 2011 03:37

Link

I'm gonna have to agree with Grog, but there is a way to convert strings into numerical values.

+ Code Snippet

set display mode val(dispx$),val(dispy$),val(dispd$),val(vsync$)

I like games, and stuff.

Back to top

Profile PM

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Can someone help me with this code?