| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen   | 
	
	
	
		| Autor | 
		Nachricht | 
	
	
		funkeld gesperrt
 
  Anmeldungsdatum: 10.10.2009 Beiträge: 179
 
  | 
		
			
				 Verfasst am: 11.12.2010, 13:35    Titel: DIR in -lang qb | 
				     | 
			 
			
				
  | 
			 
			
				Hallo, habe dort dieses im Basic-code gefunden:
 
 	  | Code: | 	 		  
 
IF DIR$("DIC.MEM") <> "" THEN KILL "DIC.MEM"
 
IF DIR$("EXEC.MEM") <> "" THEN KILL "EXEC.MEM"
 
IF DIR$("MISC.MEM") <> "" THEN KILL "MISC.MEM"
 
 | 	  
 
 
Wie kann man das in Freebasic umsetzen?
 
 
Folgende Fehlermeldung kommt :
 
Array not dimensioned, before '('
 
 IF DIR("DIC.MEM") <> "" THEN KILL "DIC.MEM"
 
 
Danke.
 
 
gruss
 
 
Editiert durch Moderator: Ursprünglichen Titel "Forth mit Freebasic" geändert. (Sebastian) | 
			 
		  | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		Sebastian Administrator
  
  Anmeldungsdatum: 10.09.2004 Beiträge: 5969 Wohnort: Deutschland
  | 
		 | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		funkeld gesperrt
 
  Anmeldungsdatum: 10.10.2009 Beiträge: 179
 
  | 
		
			
				 Verfasst am: 11.12.2010, 14:44    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				Ähm..., ich muss es  in "QB Console" compilieren, unter "Windows Gui" läuft es, muss aber unter "QB Console" laufen.
 
 
Gibt es da etwas anderes?
 
 
Gruss | 
			 
		  | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		Sebastian Administrator
  
  Anmeldungsdatum: 10.09.2004 Beiträge: 5969 Wohnort: Deutschland
  | 
		 | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		funkeld gesperrt
 
  Anmeldungsdatum: 10.10.2009 Beiträge: 179
 
  | 
		
			
				 Verfasst am: 12.12.2010, 12:53    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				jup danke.
 
 
gruss | 
			 
		  | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		funkeld gesperrt
 
  Anmeldungsdatum: 10.10.2009 Beiträge: 179
 
  | 
		
			
				 Verfasst am: 12.12.2010, 14:16    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				Wie kann man das "DEF SEG = a \ 16"  als Variable zum "POKE" umsetzen ?
 
Muss ja irgendeine grössere variable sein, die das alte Basic nicht packen kann?
 
DEF SEG = a \ 16: POKE a AND 15, b AND 255
 
 
danke.
 
 
gruss | 
			 
		  | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		Jojo alter Rang
  
  Anmeldungsdatum: 12.02.2005 Beiträge: 9736 Wohnort: Neben der Festplatte
  | 
		
			
				 Verfasst am: 12.12.2010, 15:41    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				FB hat keine Speichersegmente, sondern linear einen adressierbaren Adressraum. Du kannst überall hin"poken". Ist aber unsauber und sollte lieber mit Pointern, die direkt auf Variablenadressen zeigen, gelöst werden. _________________ » Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
 
  | 
			 
		  | 
	
	
		| Nach oben | 
		 | 
	
	
		  | 
	
	
		 |