[de-users] Makro gesucht Drehen Draw

2014-02-27 Diskussionsfäden Florian Reisinger
Hallo,

In meiner Freizeit programmiere ich ein Spiel. Da ich kein guter Grafiker bin 
verwende ich LibreOffice Draw. (Was sogar besser als GIMP für den Zweck 
funktioniert)

Ich erstelle eine Seite (quadratisch) und ein Icon, das die ganze Seite füllt. 
Ist schlussendlich eine Gruppe. (Also alle Elemente dieser Seite).
Folgendes muss jetzt 49 Mal händisch gemacht werden:

1) Neue Seite erstellen (Vorherige Kopieren)
2) Alle Elemente um (bei mir jetzt, wäre nett wenn man das als Schritt 0 
einstellen könnte) -7,2° drehen (Zentrum Mitte des Objekts, da das gleichzeitig 
die Mitte der Seite ist) [Um mehr Fälle abzudecken wäre es auch nett die Anzahl 
der Drehungen abzufragen]


Danke an all die Könner auf dieser Liste!
 

Liebe Grüße, / Yours,
Florian Reisinger
-- 
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert


Re: [de-users] Makro gesucht Drehen Draw

2014-02-27 Diskussionsfäden Regina Henschel

Hallo Florian,

zwei Fragen:
Brauchst du tatsächlich eine Dezimalzahl beim Drehwinkel?
Brauchst du das Makro selbst oder nur das Ergebnis des Rotierens?

Im Fall ganzzahliger Drehwinkel möglich und nur Ergebnis interessant, 
mache folgendes: Gruppiere alles in 1 Gruppe und dupliziere die Gruppe 
mit Drehwinkel in der gewünschten Anzahl. Duplizieren ist im Menü 
Bearbeiten  Vervielfältigen.


Mit freundlichen Grüßen
Regina

Florian Reisinger schrieb:

Hallo,

In meiner Freizeit programmiere ich ein Spiel. Da ich kein guter
Grafiker bin verwende ich LibreOffice Draw. (Was sogar besser als
GIMP für den Zweck funktioniert)

Ich erstelle eine Seite (quadratisch) und ein Icon, das die ganze
Seite füllt. Ist schlussendlich eine Gruppe. (Also alle Elemente
dieser Seite). Folgendes muss jetzt 49 Mal händisch gemacht werden:

1) Neue Seite erstellen (Vorherige Kopieren) 2) Alle Elemente um (bei
mir jetzt, wäre nett wenn man das als Schritt 0 einstellen könnte)
-7,2° drehen (Zentrum Mitte des Objekts, da das gleichzeitig die
Mitte der Seite ist) [Um mehr Fälle abzudecken wäre es auch nett die
Anzahl der Drehungen abzufragen]


Danke an all die Könner auf dieser Liste!





--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert


Re: [de-users] Makro gesucht Drehen Draw

2014-02-27 Diskussionsfäden Florian Reisinger
Hallo,

Comments inline, Schau es mir morgen an

Liebe Grüße, / Yours,
Florian Reisinger

 Am 27.02.2014 um 20:51 schrieb Regina Henschel rb.hensc...@t-online.de:
 
 Hallo Florian,
 
 zwei Fragen:
 Brauchst du tatsächlich eine Dezimalzahl beim Drehwinkel?

Ja, 7,2 Grad ist so ziemlich muss

 Brauchst du das Makro selbst oder nur das Ergebnis des Rotierens?

Ich will ohne viel zu tuen das Ergebnis

 
 Im Fall ganzzahliger Drehwinkel möglich und nur Ergebnis interessant, mache 
 folgendes: Gruppiere alles in 1 Gruppe und dupliziere die Gruppe mit 
 Drehwinkel in der gewünschten Anzahl. Duplizieren ist im Menü Bearbeiten  
 Vervielfältigen.

Schade, dass das nur mit Dezimalzahlen geht Schau es mir morgen trotzdem 
an...
So ähnlich hab ich es jetzt auch per Hand gemacht (Copy and Paste und Drehen - 
Oben linker Anfasser nach einen Schritt nach links (hab den schritt auf 7,2 
Grad umgestellt

 
 Mit freundlichen Grüßen
 Regina
 
 Florian Reisinger schrieb:
 Hallo,
 
 In meiner Freizeit programmiere ich ein Spiel. Da ich kein guter
 Grafiker bin verwende ich LibreOffice Draw. (Was sogar besser als
 GIMP für den Zweck funktioniert)
 
 Ich erstelle eine Seite (quadratisch) und ein Icon, das die ganze
 Seite füllt. Ist schlussendlich eine Gruppe. (Also alle Elemente
 dieser Seite). Folgendes muss jetzt 49 Mal händisch gemacht werden:
 
 1) Neue Seite erstellen (Vorherige Kopieren) 2) Alle Elemente um (bei
 mir jetzt, wäre nett wenn man das als Schritt 0 einstellen könnte)
 -7,2° drehen (Zentrum Mitte des Objekts, da das gleichzeitig die
 Mitte der Seite ist) [Um mehr Fälle abzudecken wäre es auch nett die
 Anzahl der Drehungen abzufragen]
 
 
 Danke an all die Könner auf dieser Liste!
 
 
 
 
 -- 
 Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
 Probleme? 
 http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
 Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
 Listenarchiv: http://listarchives.libreoffice.org/de/users/
 Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert

-- 
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert


Re: [de-users] Makro gesucht Drehen Draw

2014-02-27 Diskussionsfäden Robert Großkopf
Hallo Florian,
 
 1) Neue Seite erstellen (Vorherige Kopieren) 2) Alle Elemente um (bei
 mir jetzt, wäre nett wenn man das als Schritt 0 einstellen könnte)
 -7,2° drehen (Zentrum Mitte des Objekts, da das gleichzeitig die
 Mitte der Seite ist) [Um mehr Fälle abzudecken wäre es auch nett die
 Anzahl der Drehungen abzufragen]

Ich mache so etwas zwar auch nur per Trial and Error, aber der Folgende
Code macht mir bei einem Rechteck auf der Seite (oder eben bei nur einem
Objekt) lauter neue Seiten, bei denen das Ganze schrittweise gedreht wird.

SUB NeueSeite
DIM oDoc AS OBJECT
DIM oSeiten AS OBJECT
DIM oSeite AS OBJECT
DIM oShape AS OBJECT
DIM inZahl AS INTEGER
oDoc = ThisComponent
oSeiten = oDoc.getDrawPages()
inZahl = InputBox(Wie viele neue Seiten sollen's sein?)
inZahl = inZahl -1
FOR i = 0 TO inZahl
oDoc.duplicate(oSeiten.getByIndex(i))
oSeite = oSeiten.getByIndex(i+1)
oShape = oSeite.getByIndex(0)
oShape.RotateAngle = 720 * (i+1)
NEXT
END SUB

Gruß

Robert

-- 
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert


Re: [de-users] Makro gesucht Drehen Draw

2014-02-27 Diskussionsfäden Wolfgang Jäth
Am 27.02.2014 20:57, schrieb Florian Reisinger:
 
 Am 27.02.2014 um 20:51 schrieb Regina Henschel rb.hensc...@t-online.de:
 
 Hallo Florian,
 
 zwei Fragen:
 Brauchst du tatsächlich eine Dezimalzahl beim Drehwinkel?
 
 Ja, 7,2 Grad ist so ziemlich muss

Keine Möglichkeit, das von 50 Schritte pro volle Umdrehung aka 360° auf
60 Schritte zu ändern?

Und wenn Du die ersten 5 Schritte (0°/7,2°/14,4°/.../28,8°) manuell
erstellst, und diesen Satz dann mit jeweils 36* vervielfältigst?

Wolfgang
-- 


-- 
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme? 
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert