))))))))))))))))))))))))))))))))))))))))))))))))))
; ca. 50 x ) zum Wechseln in den Programmiermodus
; Laufschriftdarstellung

;-------------------------------------------------
; diese Einstellungen gelten nach dem Power On 

lines       = 2  ; Display hat 2 Zeilen
characters  =16  ; und 16 Zeichen pro Zeile
blockcursor = 0  ; Cursor ausschalten
mode        = 2  ; Displaymodus fr RS-232 Betrieb
inputlogic  = 1  ; Eingnge HIGH-Aktiv

;------------------------------------------------

text=0

" "
"***** Demo *****"
wait= 2

; das Komma (,) am Zeilenanfang
; verhindert den Clear Screen

,ESC,'O1,1',"t"                 wait
,ESC,'O1,1',"ft"                wait
,ESC,'O1,1',"ift"               wait
,ESC,'O1,1',"rift"              wait
,ESC,'O1,1',"hrift"             wait
,ESC,'O1,1',"chrift"            wait
,ESC,'O1,1',"schrift"           wait
,ESC,'O1,1',"fschrift"          wait
,ESC,'O1,1',"ufschrift"         wait
,ESC,'O1,1',"aufschrift"        wait
,ESC,'O1,1',"Laufschrift"       wait
,ESC,'O1,1'," Laufschrift"      wait
,ESC,'O1,1',"  Laufschrift"     wait
,ESC,'O1,1',"   Laufschrift"    wait
,ESC,'O1,1',"    Laufschrift"   wait
,ESC,'O1,1',"     Laufschrift"  wait
,ESC,'O1,1',"      Laufschrif"  wait
,ESC,'O1,1',"       Laufschri"  wait
,ESC,'O1,1',"        Laufschr"  wait
,ESC,'O1,1',"         Laufsch"  wait
,ESC,'O1,1',"          Laufsc"  wait
,ESC,'O1,1',"           Laufs"  wait
,ESC,'O1,1',"            Lauf"  wait
,ESC,'O1,1',"             Lau"  wait
,ESC,'O1,1',"              La"  wait
,ESC,'O1,1',"               L"  wait

;-------------------------------------------------------------
; mit Clear Screen flackert die Anzeige bei schnellem Wechsel

text=1

"t"                 wait=2
"ft"                wait
"ift"               wait
"rift"              wait
"hrift"             wait
"chrift"            wait
"schrift"           wait
"fschrift"          wait
"ufschrift"         wait
"aufschrift"        wait
"Laufschrift"       wait
" Laufschrift"      wait
"  Laufschrift"     wait
"   Laufschrift"    wait
"    Laufschrift"   wait
"     Laufschrift"  wait
"      Laufschrif"  wait
"       Laufschri"  wait
"        Laufschr"  wait
"         Laufsch"  wait
"          Laufsc"  wait
"           Laufs"  wait
"            Lauf"  wait
"             Lau"  wait
"              La"  wait
"               L"  wait

;----------------------------------------------
; und nun Programmiermodus beenden

quit
