BLIde major update00.09.10

BlitzMax Forums/BlitzMax Programming/BLIde major update00.09.10

Ok ... another "lag" - no changes (still code folding disabled):

Type TGame   
  Field debugmode:Byte = 0							'0=no debug messages; 1=some debugmessages
  Field DebugInfos:Byte = 0 {saveload = "nosave"}
  Field name:String 								'name of the game (mainly for display in network-lobby    
  Field speed:Float = 0.1 							'Speed of the game
  Field oldspeed:Float = 0.1 						'Speed of the game
  Field DoorOpenTime:Int = 100 						'time how long a door will be shown open until figure enters
  Field IntTimer:Float								'common timer    
  Field intDeltaTime:Float = 0 						'for exact movement and so on
  Field time:Float 									'time in game, unformatted       
  Field timeSinceBegin:Float 						'time in game, not reset every day       
  Field minute:Int = 0 {saveload = "normal"}		'minute of the game
  Field day:Int = 1 {saveload = "normal"}		'day of game
  Field year:Int = 2006 {saveload = "normal"}	'year of the game
  Field cursorstate:Int = 0 {saveload = "normal"}		'which cursor has to be shown? 0=normal 1=dragging
  Field playerID:Int = 1 {saveload = "normal"}		'playerID of player who sits in front of the screen
  Field start_MovieAmount:Int = 5 {saveload = "normal"}		'how many movies does a player get on a new game
  Field start_AdAmount:Int = 3 {saveload = "normal"}		'how many contracts a player gets on a new game
  Field error:Int = 0 {saveload = "normal"}		'is there a error (errorbox) floating around?
  Field maxAudiencePercentage:Float = 0.3 {saveload = "normal"} 	'how many 0.0-1.0 (100%) audience is maximum reachable
  Field maxContractsAllowed:Int = 10 {saveload = "normal"}		'how many contracts a player can possess
  Field maxMoviesInSuitcaseAllowed:Int = 12 {saveload = "normal"}	'how many movies can be carried in suitcase
  Field gamestate:Int = 0 {saveload = "normal"}		'0 = Mainmenu, 1=Running, ...
  Field networkgame:Byte = 0 {saveload = "normal"}		'are we playing a network game? 0=false
  Field networkgameready:Int = 0 {saveload = "normal"}		'is the network game ready - all options set? 0=false
  Field onlinegame:Byte = 0 {saveload = "normal"}		'playing over internet? 0=false
  Field title:String = "MyGame" {saveload = "normal"}	'title of the game
  Field daytoplan:Int = day {saveload = "normal"}		'which day has to be shown in programmeplanner
  Field newday:Int = 0 {saveload = "normal"}
  Field newhour:Int = 0 {saveload = "normal"}
  Field newhourAndFiveMinutes:Int = 0 {saveload = "normal"}
  Field newhourAndFiftyFiveMinutes:Int = 0 {saveload = "normal"}
  Field daynames:String[]					'array of abbreviated (short) daynames 
  Field daynames_long:String[] 				'array of daynames (long version)
  Field fullscreen:Int			= 0			'playing fullscreen? 0=false
  Field username:String 		= "Ano Nymus"	'username of the player
  Field userport:Short			= 4444			'userport of the player
  Field userchannelname:String 	= "SunTV"		'channelname the player uses
  Field userlanguage:String		= "de"			'language the player uses
  Field userdb:String 			= "database.xml"
  Field userfallbackip:String 	= ""


was on my way to remove some meta-data to write different ones to other variables (instead of "normal" "nosave" for not-to-save-fields - less code ;D).

Changed 9-10 lines and got a 3-4 seconds lag while writing... like everytime only a lag, no missed input characters or so.

The TGame-Object is about 400 lines.


bye
MB

ps: I appreciate your work and time you put into this IDE very, very much.