★ APPLICATIONS ★ DIVERS ★ DATA-GENERATOR (COMPUTING PROGRAMMING USING) ★ |
| Data-Generator (Computing Programming Using) | Applications Divers |
Hiermit lassen sich auf einfache Art und Weise Maschinenroutinen in Datazeilen überfuhren, so daß solche Programme auch an User weiter gegeben werden können, die keinen Assembler besitzen. Nachdem man das Listing abgetippt hat, sollte man das Programm zunächst saven, bevor es das erste Mal gestartet wird. Die Maschinenroutine löscht das Basic-Programm! 'SYNTAX ERROR IN 1000' und zeigt die 1. DATA-Zeile an. Diese Fehlermeldung ist ohne Bedeutung! Sie kommt deshalb zustande, weil das aufrufende Programm gelöscht wurde. Die DATA-Zeilen beginnen mit Zeilennummer 1000 und lassen sich mit RENUM beliebig verschieben. Das Programm ist sehr schnell, 1000 DATAs werden in weniger als einer Sekunde geschrieben. Das Lesen der DATAs muß über READ a$ geschehen, anschließend wird der String durch a=VAL("&"+a$) in eine Zahlvariable umgewandelt. (Man kann sich übrigens eine Menge Tipperei ersparen, wenn man bei Listings, die DATAs mit vorangestellten “&“ enthalten, dieses jeweils wegläßt und stattdessen die Lese-Routine in die obengenannte Form bringt.) Mit den Eingaben &8000, &80EC und 20 werden die DA-TA-Zeilen des Programms erzeugt. Das vorletzte DATA weicht vom Listing ab, es enl hält das Low-Byte der Zeilen nummer.
|
