XProfan

Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Kreisbogen zeichnen
Lauffähig ab Profan-Version 5.0
Erklärung:
----------
Diese Beispiel demonstriert, wie ein Kreisbogen
mit Profan gezeichnet wird
Es bedeuten:
------------
%MaxX									 horizontale Auflösung des Bildschirmes
%MaxY									 vertikale Auflösung des Bildschirmes
Arc										 Siehe Profan² - Hilfe
Usepen									 Siehe Profan² - Hilfe
-----------------------------------------------
Window 0,0 - %MaxX,%MaxY										Fenster erstellen
Usepen 4,1,RGB(0,120,0)											Linienart zum Zeichnen des Ka.
Arc 10,10-300,300; 250,100;40,200						Kreisbogen wird gezeichnet
Waitinput																		Warten auf Eingabe