★ APPLICATIONS ★ DIVERS ★ Von 0 auf 360 in 13 Sekunden! ★ |
RSX Kreis (CPC Amstrad International) | Applications Divers |
Spitze, wenn es sich dabei um einen Sportwagen handelt, aber lächerlich, wenn es darum geht, daß der Schneider CPC einen Kreis zeichnet! Solange braucht er nämlich, wenn man das Programm auf Seite 13 des CPC-Handbuchs startet. Etwas schneller (ca. 40 mal) geht das mit einem MC-Programm, mit dem dann der Befehl IKREIS zur Verfügung steht. SYNTAX: Der Kreis wird immer mit dem Mittelpunkt im Nullpunkt bezüglich der letzten ORIGIN x,y Anweisung gezeichnet. Wenn der Radius kleiner als 2 angegeben wird, gibt es keinen Kreis mehr. Es gibt vier Möglichkeiten:
Beispiel: In der Bildschirmmitte wird ein Halbkreis (4/8) mit dem Radius 190 und der ink-Farbe 1 gezeichnet. Mit einem geschickten Gebrauch der Farben können alle möglichen Kombinationen der Segmente gezeichnet werden. METHODE: Es wird immer nur 1/8 des Kreises berechnet, der Rest kann durch Austausch der X/Y-Werte und Vorzeichenwechsel gezeichnet werden. Bei jedem Durchgang wird nur geprüft, ob der Punkt (x/y) oder der Punkt (x/y-1) näher zum Zentrum liegt. Der Punkt mit dem kürzeren Abstand wird dann gezeichnet und x wird um eins erhöht. Nachdem die 279 Bytes der Routine mit dem Basiclader oder einem Assembler zwischen &A000 und &A11E korrekt hinein gepoked wurden, kann der neue Befehl durch call &A000 initialisiert werden. Ersteht dann bis zum Abschalten des Gerätes zur Verfügung.
|