VA'3:{c]uoi|!RTaug1g2k1k2ksdtkmkixto639wsdkmkdkisetparmslocate24@colorprycsPRINTsv@ printparms-arrayindexaXwXdX1X2JdX1dX2Wsonst abbrechencthenPSET@plot fehleranzeigewiederaufnahmefehler 3* Simulation und Darstellung eines Regelkreises **.* mit nderungsproportionaler Rckfhrung *mmcm>)Dk( wegen mglichen Overflows e* Bildschirmmaske aufbauen * ( VGA 640x480, 16 Farben ( y-Achse zeichnennXw` ( LegendeXd` X1`X2`( Parameter-Men ' ! g1 g2 k2 Tau dt"`* Voreinstellungen *#( g1r#( g2u#( k2 #( Tau@+#( dt* Hauptprogramm * o)* Werte in Formel-Variablen schreiben *]coV{`( und anzeigen!'-( Zustandsvariablen setzen ( fr alle x-Werte&* Berechnung der Zustandsvariablen *  o ' ] ' c -! !3 ': ' V+ 3 {)'( integrieren - V+ : {)-* Graphische Ausgabe *  ( alte Werte lschen, `c$( x-Achse und neue Werte zeichnen  `c !`c ' `c -`c$* Tastaturabfrage und Auswertung *L( Tastatur lesen 4 d( keine Taste, nichts machen 2M2)d( Pfeil rechtsm )"( hervorgehobene Zahl verschieben ,` 2K2)d( Pfeil links "( hervorgehobene Zahl verschieben ,X` c'( sonstige Taste = nicht weiterrechneni{ |' nach Fehlern (ON ERROR) ,q( wenn nicht abgebrochen:L( auf Taste wartend&2H2)d( Pfeil aufwrtst (   # ,v@+ # @+,v #r" + #y r^( Tau oder dt   # y2P2)d( Pfeil abwrts l  @+ + # @+,v  # ,vD @+ #rf   #y r ( Tau oder dt   + # y2M2)d( Pfeil rechts ) , 2K2)d( Pfeil links  ,F c{2,^( ESCape = Programmabbruch w* Auswerten von ON ERROR *k( beliebiger Run-Time Fehler E,l Zahlenbereich berlaufen!"`,q L( auf Taste wartenh  "`y( nicht mehr weiterrechnenr| 8colorpr86* Unterprogramm fr gesteuerte farbige Textausgabe *   z  printparms8* Parameterwerte ausgeben *rG]coV{' ,Xrb +##.## "( ] ,r +##.## "( c ,r +##.## "( o ,r  ##.## "( V ,PrZ  .#### "( {z  plot81* Pixel in eigenem Koordinatensystem ausgeben *ac d ,*b , R yz