XProfan

Deutsch

Roberto
Neu

Wie kann man Rectangle zufällig malen das immer wen man das Programm öffnet ein Programm gemacht wird??
Dafür braucht man bestimmt Randomize und diese Zeichen "",""

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Nico
Madysa

Du musst nur an Rectangle zufällige Parameters übergeben.
Die Funktion Rnd() gibt zufällige Zahlen aus.
Randomize sorgt dafür, dass die Zahlen wirklich zufällig sind.
Die restlichen Infos stehen in der Hilfe, mal sehen, ob dus schaffst.

Gruß
Nico

Nico Madysa

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Roberto
Neu

Dann kommt bei mir immer das Raus
Kompilieren Markieren Separieren

randomize
windowtitle "Microkosmos"
window 10,10 - 700,600
useFont "Arial",26,0,0,0,0
rectangle @RND(10 + 1) -1
waitkey

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Roberto
Neu

Ein ganz ganz kleiner Tipp villeicht

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Nico
Madysa

Schon nicht schlecht, du verbesserst dich. Zwei Vorschläge.
1. Sieh dir in der Hilfe noch einmal die Beschreibung zu Rectangle an und überprüfe, ob du den Befehl richtig verwendest.
2. Es ist zwar kein Muss, doch normalerweise steht am Ende eines Quelltextes immer end.

Nico Madysa

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Roberto
Neu

Braucht man da nicht 4x @ RND denn man muss ja für X1,X2,Y1,Y2 eine Züfällige zahl machen?
Ich hab das mal so gemacht sieht aber nicht Richtig aus
Kompilieren Markieren Separieren

randomize
windowtitle "Microkosmos"
window 10,10 - 700,600
rectangle @RND(10 + 1) - 1 - @RND(10 + 1) - 1 - @RND(10 + 1) - 1 - @RND(10 + 1) - 1
waitkey
end

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Kompilieren Markieren Separieren

rectangle (rnd(700)),(rnd(600)) - (rnd(700)),(rnd(600))

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Nico
Madysa

Also iF! Er soll doch alleine darauf kommen!

Nico Madysa

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Roberto
Neu

Das hätte dauern können da ich immer @ davor gemacht habe.

17.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Roberto
Neu

So da hab ich n kleinen Microkosmos entworfen^^
Ist aber noch im Beta Beta zustand

Microkosm 3 Predetermined.zip	312 kB

Hochgeladen:	18.07.2009

Ladeanzahl:
		Herunterladen

18.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Dietmar
Horn

Zu RecTangle: Siehe auch XProfan-Lehrbuch ab Seite 315 und folgende ...

Zum Grundaufbau eines Windows-Programmes (mit Haupt-Programmschleife, etc.): Siehe XProfan-Lehrbuch ab Seite 78 und folgende ...

Gruß
Dietmar

Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...]

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch: [...]

18.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

E.T.

Roberto Neu, Beitrag=53333, Zeitpunkt=18.07.2009

So da hab ich n kleinen Microkosmos entworfen^^

Wohl eher entwerfen lassen ...

@Dietmar: Da siehst Du es wieder: Wer lesen kann ist klar im Vorteil, sei es nun in der Hilfedatei, im XProfan-Lehrbuch, im Forum, ...

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

18.07.2009 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

►