probleme beim input -_-
Übersicht
BlitzBasic Allgemein
GastBetreff: probleme beim input -_- |
 So, Feb 22, 2004 20:07Antworten mit Zitat |
|
|---|---|---|
|
also ich mache grad einen mapeditor, am anfang muss man die tilesets die man benutzen möchte eingeben, nachdem ich einen vierten layer eingebaut habe funzt nix mehr, also, hier die problem stellen
Print "Wieviele Tiles hat das Set2?" set2_tiles = Input(":") wenn ich dann print "Set2_tiles"+set2_tiles eingebe, kommt immer null raus auch wenn null rauskommt, funzt tileset2_img = LoadAnimImage(tileset2$,32,32,0,set2_tiles) ohne probleme beim speichern und lade ngibs dann die probs, array index out of bounds oder so Print "Bitte dateinamen eingeben(ohne endung)" dateiname$ = Input(":") file = WriteFile(dateiname$+".m2s") WriteInt (file,mx) WriteInt (file,my) For p = 0 To mx For q = 0 To my Print map(p,q,1)/32 Print map(p,q,2)/32 Print map(p,q,3)/32 WriteInt (file,map(p,q,1)) WriteInt (file,map(p,q,2)) WriteInt (file,map(p,q,3)) WriteInt (file,map(p,q,4)) Next Next WriteString (file,tileset1$) WriteString (file,tileset2$) WriteString (file,tileset3$) WriteString (file,tileset4$) WriteString (file,set1_tiles) WriteString (file,set2_tiles) WriteString (file,set3_tiles) WriteString (file,set4_tiles) Print "set2_tiles: "+set_2tiles Print "tileset2$: "+tileset2$ WaitKey() CloseFile( file ) EndIf ;######lAden##### If KeyHit(scan_f2) .load FlushKeys Cls Flip Cls Print "Bitte dateinamen eingeben(ohne endung)" dateiname$ = Input(":") file = ReadFile(dateiname$+".m2s") mx = ReadInt(file) my = ReadInt(file) Dim map(mx,my,4) For p = 0 To mx For q = 0 To my map(p,q,1) = ReadInt (file) map(p,q,2) = ReadInt (file) map(p,q,3) = ReadInt (file) map(p,q,4) = ReadInt (file) Next Next tileset1$ = ReadString (file) tileset2$ = ReadString (file) tileset3$ = ReadString (file) tileset4$ = ReadString (file) set1_tiles = ReadInt (file) set2_tiles = ReadInt (file) set3_tiles = ReadInt (file) set4_tiles = ReadInt (file) WaitKey() tileset1_img = LoadAnimImage(tileset1$,32,32,0,set1_tiles) tileset2_img = LoadAnimImage(tileset2$,32,32,0,set2_tiles) tileset3_img = LoadAnimImage(tileset3$,32,32,0,set3_tiles) tileset4_img = LoadAnimImage("data/collide.png",32,32,0,2) CloseFile( file ) EndIf wo liegt das problem? vor layer 4 klappte alles -_- |
||
|
soli |
Mo, Feb 23, 2004 0:07 Antworten mit Zitat 
|
|---|---|---|
|
Kann nicht funktioniert haben.
Dim map (x,y,z) muß an den Anfang, oder auf jeden Fall bevor das Feld aufgerufen wird. und set2_tiles musst du glaube ich in eine Zahl umwandeln soli |
||
| solitaire | ||
|
Jolinah |
Mo, Feb 23, 2004 12:05 Antworten mit Zitat
|
|---|---|---|
|
set2_tiles muss nen string sein für input denke ich..
Code: [AUSKLAPPEN] set2_tiles$ = Input(":")
|
||
|
DivineDominion |
Mo, Feb 23, 2004 13:32 Antworten mit Zitat
|
|---|---|---|
|
fpr eien zahl also
Code: [AUSKLAPPEN] set2_tiles = int( Input( ":" ) )
|
||
|
christian.tietze@gmail.com - https://christiantietze.de
macOS |
||
Edlothiol |
Mo, Feb 23, 2004 13:47 Antworten mit Zitat
|
|
|---|---|---|
| Das ist nicht nötig, die Umwandlung geschieht ja automatisch. | ||
Gast |
Mo, Feb 23, 2004 18:23 Antworten mit Zitat |
|
|---|---|---|
|
soli hat Folgendes geschrieben: Kann nicht funktioniert haben.
Dim map (x,y,z) muß an den Anfang, oder auf jeden Fall bevor das Feld aufgerufen wird. und set2_tiles musst du glaube ich in eine Zahl umwandeln soli map gibs doch schon, sonst könnt ich das ganze ja nichmal speichern 
also es hatte was mit string und int zu tun, danke an alle ^^ |
||
Übersicht
BlitzBasic Allgemein
Powered by phpBB © 2001 - 2006, phpBB Group