Array Felder drehen

Übersicht

BlitzMax, BlitzMax NG

Allgemein

	Bigmichi Betreff: Array Felder drehen	Fr, Apr 22, 2005 14:44 Antworten mit Zitat
Mein Problem ist grade wie schaff ich es in eienr For schleife Ein DatenFeld zu drehen ? z.B BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] 110 010 011 in BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] 001 111 100 Halt nach links drehen bzw nach rechts drehen ? =( ist für nen Tetris hab die Engine nun fast fertig nur das mit dem Drehen verwirrt mich =( Achja zu bedenken wäre noch das man es nicht manuell machen kann da die Breite udn Höhe verschieden ist und so das dan natürlich nicht geht aber damit es zum drehen funtzt is breite udn Höhe imemr gleich groß Danke schonmals =)

Bigmichi

Betreff: Array Felder drehen

Fr, Apr 22, 2005 14:44
Antworten mit Zitat

Mein Problem ist grade wie schaff ich es in eienr For schleife Ein DatenFeld zu drehen ? z.B

BlitzBasic: [AUSKLAPPEN]

110
010
011

in

BlitzBasic: [AUSKLAPPEN]


001
111
100

Halt nach links drehen bzw nach rechts drehen ? =( ist für nen Tetris hab die Engine nun fast fertig nur das mit dem Drehen verwirrt mich =(

Achja zu bedenken wäre noch das man es nicht manuell machen kann da die Breite udn Höhe verschieden ist und so das dan natürlich nicht geht aber damit es zum drehen funtzt is breite udn Höhe imemr gleich groß

Danke schonmals =)

	wunderkind	Fr, Apr 22, 2005 15:55 Antworten mit Zitat
Auf die Sprünge helf Nimm dir Stift und Zettel und notiere dir einfach mal für jede Zeile die Abbildungen. Beispiel erste Zeile: Code: [AUSKLAPPEN] [EINKLAPPEN] x/y -> x/y 1/1 -> 3/1 2/1 -> 3/2 3/1 -> 3/3 Dabei müsstest du ziemlich schnell ein Muster feststellen und die Regel herleiten können .

wunderkind

Fr, Apr 22, 2005 15:55
Antworten mit Zitat

*Auf die Sprünge helf*

Nimm dir Stift und Zettel und notiere dir einfach mal für jede Zeile die Abbildungen. Beispiel erste Zeile:

Code: [AUSKLAPPEN]

x/y -> x/y
1/1 -> 3/1
2/1 -> 3/2
3/1 -> 3/3

Dabei müsstest du ziemlich schnell ein Muster feststellen und die Regel herleiten können Wink

	Bigmichi	Fr, Apr 22, 2005 16:39 Antworten mit Zitat
ok für echtsdrehen hab ich es bisher rausgefunden nun muss ich noch links machen danke für den tipp mit dem Zettel und dem Bsp... hier noch mein Code gibts da optimierungsmöglichkeit ? kommt mir sehr lang vor... BlitzMax: [AUSKLAPPEN] [EINKLAPPEN] Local TX:Short,TY:Short Local Z:Short = 0 Local ZX:Short,ZY:Short For TY = 0 To Size-1 For TX = 0 To Size-1 D2[TX,TY] = Data[TX,TY] Next Next ClearOldData() For TY = 0 To Size-1 For TX = 0 To Size-1 ZX = Size-1 - Z ZY = TX Data[ZX,ZY] = D2[TX,TY] 'DebugStop Next Z :+ 1 Next Update() clear udn update nicht beachten Data ist der eriginalspeicher...

Bigmichi

Fr, Apr 22, 2005 16:39
Antworten mit Zitat

ok für echtsdrehen hab ich es bisher rausgefunden Very Happy

nun muss ich noch links machen danke für den tipp mit dem Zettel und dem Bsp...

hier noch mein Code gibts da optimierungsmöglichkeit ? kommt mir sehr lang vor...

BlitzMax: [AUSKLAPPEN]

	Local TX:Short,TY:Short
	Local Z:Short = 0
	Local ZX:Short,ZY:Short
			
		For TY = 0 To Size-1
		For TX = 0 To Size-1
			D2[TX,TY] = Data[TX,TY]
		Next
		Next
				
		ClearOldData()		
		
		For TY = 0 To Size-1
		For TX = 0 To Size-1
			ZX = Size-1 - Z
			ZY = TX
			Data[ZX,ZY] = D2[TX,TY]
			'DebugStop
		Next
		Z :+ 1
		Next
		
		
		Update()

clear udn update nicht beachten Very Happy

Data ist der eriginalspeicher...

Übersicht

BlitzMax, BlitzMax NG

Allgemein

Nach Oben

BlitzBasic Portal

Array Felder drehen

Bigmichi

Betreff: Array Felder drehen

wunderkind

Bigmichi