F:9F2~
F.;F6
F.;F6
F:9F2~
F>9F8~
WHILE GoodDate% = %False
      CharToRet$ = " "
      CALL GetAny(TermSet$,8,(PosX%),(PosY%),"##/##/##",RetString$,CharToRet$,_
         
       %True)
?THEN
        DIE DATEN WERDEN JETZT IN  TEXTDATEI 'LINEAR.TXT' GESPEICHERT           LINEAR.TXTo PROGRAMM RECHNET NUR BIS ZU EINER NUTZUNGSDAUER VON 30 JAHREN-BITTE KORREKTUR   L= L
SCHEN DER BESTEHENDEN DATEN       S = SPEICHERN IN TEXTDATEI 'LINEAR.TXT'    ENDE DER EINGABE MIT F1    -    ABBRUCH UND R
CKKEHR ZUM HAUPTMEN
 MIT ESC   ##/##/##0.##00. #0123456789ILN-0123456789.-0123456789RQOGHPMKDCBA@?>=<; - BITTE DR
CKEN SIE ZUM NEUSTART DIE RETURNTASTE     ###    FEHLER NR. ====== >       BITTE DEN DRUCKER BEREITMACHEN UND DANN DIE RETURNTASTE DR
CKEN       SLWOLLEN SIE NOCH EINE BERECHNUNG ? (J/N)--------------------------------------------------nNjJWOLLEN SIE EINEN AUSDRUCK ?    (J/N)####  ##########,.##  ##########,.##JAHR    ABSCHREIBUNG        BUCHWERTERGEBNISSE############,.##VORGABEN (Programm Lineare Abschreibung)DIE ERFORDERLICHEN ANFANGSWERTE EINBITTE GEBEN SIE JETZTSCHROTTWERT DES GUTES   : NUTZUNGSDAUER IN JAHREN : ANSCHAFFUNGSWERT        : NACH DER LINEAREN METHODE.SCHREIBUNGSRATEN EINES WIRTSCHAFTSGUTESDIESES PROGRAMM BERECHNET DIE AB-
IFARBEN.DATzinsen.exe:
lankInt%,Char;