  | 
					
						Das deutsche QBasic- und FreeBASIC-Forum Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!   
						
						
					 | 
				 
			 
			 
	
		| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen   | 
	 
	
	
		| Autor | 
		Nachricht | 
	 
	
		arduno
 
 
  Anmeldungsdatum: 12.05.2011 Beiträge: 252
 
  | 
		
			
				 Verfasst am: 14.05.2013, 11:05    Titel: Put-Image soll nicht flimmern. | 
				     | 
			 
			
				
  | 
			 
			
				Hallo, guten Tag.
 
Ich mache gerade einen Grafiktest für ein Screen 512x512 Pixel.
 
Dieser soll beim erneuern nicht flimmern.
 
Das bekomme ich nicht hin.
 
Zwischen   ScreenLock  und ScreenUnLock soll kein CLS.
 
 
Wie geht das.
 
 
Danke
 
gruss
 
 
 	  | Code: | 	 		  
 
#INCLUDE "fbgfx.bi"
 
ScreenRes 532,532,32 
 
 
Declare Sub plotten()
 
 
Dim Shared As Integer xw, yw 
 
Dim Shared ascii_daten As UByte Ptr
 
dim Shared As integer ptr scr_img
 
 
ascii_daten=Allocate(2100) 
 
 
Open "z1013-char.bin" For Binary As #1 
 
Get #1 ,,ascii_daten[0],2048 
 
Close #1 
 
 
scr_img=imagecreate(512,512,&h000000) 
 
 
Cls 
 
DO
 
   Sleep 10
 
    
 
   If MULTIKEY(FB.SC_A) Then
 
      plotten()
 
   EndIf
 
   ScreenLock 
 
   Put (10,10),scr_img
 
   ScreenUnLock
 
Loop UNTIL INKEY = CHR(27) 
 
 
Sub plotten()
 
   For yw=0 To 511
 
      For xw=0 To 511
 
         PSet scr_img,(xw,yw),&hff0000
 
      Next
 
   Next
 
End Sub
 
 | 	 
 
  Zuletzt bearbeitet von arduno am 14.05.2013, 11:12, insgesamt einmal bearbeitet | 
			 
		  | 
	 
	
		| Nach oben | 
		 | 
	 
	
		  | 
	 
	
		Eternal_pain
 
  
  Anmeldungsdatum: 08.08.2006 Beiträge: 1783 Wohnort: BW/KA
  | 
		
			
				 Verfasst am: 14.05.2013, 11:09    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				Anbetracht Deiner Beiträge empfehle ich Dir die wirklich tolle, hilfreiche, deutsche, täglich aktuelle, mit vielen Beispielen, Hilfe zu lesen!!!
 
 
benutze
 
 	  | Code: | 	 		  | Put (10,10),scr_img,pset | 	  
 
im zweifelsfall zwischen Screenlock/Screenunlock.... _________________
   | 
			 
		  | 
	 
	
		| Nach oben | 
		 | 
	 
	
		  | 
	 
	
		arduno
 
 
  Anmeldungsdatum: 12.05.2011 Beiträge: 252
 
  | 
		
			
				 Verfasst am: 14.05.2013, 11:14    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				Jup, danke.
 
Ich wusste nicht das pset beim Put so eine Auswirkung hat.
 
 
Danke.
 
 
Gruss
 
peter | 
			 
		  | 
	 
	
		| Nach oben | 
		 | 
	 
	
		  | 
	 
	
		nemored
 
  
  Anmeldungsdatum: 22.02.2007 Beiträge: 4712 Wohnort: ~/
  | 
		
			
				 Verfasst am: 14.05.2013, 14:18    Titel:  | 
				     | 
			 
			
				
  | 
			 
			
				Standard ist das Aktionswort XOR; wenn du PSET willst, musst das gesondert angeben. _________________ Deine Chance beträgt 1:1000. Also musst du folgendes tun: Vergiss die 1000 und konzentriere dich auf die 1. | 
			 
		  | 
	 
	
		| Nach oben | 
		 | 
	 
	
		  | 
	 
	
		 | 
	 
 
  
	 
	    
	   | 
	
Du kannst keine Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum nicht antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen.
  | 
   
 
     |