[*]Profan

Window Title "Debugprüfung - " $ $ProfVer
cls
// in amount: only Widestring verweigert itself (With the whom Arrays was Yes clear. Perhaps can itself the dialog Yes variable style, so More displayed becomes.)
Declare Test1$
Declare string Test2
Declare widestring Test3
Declare Test4%
Declare int Test5
Declare quadint Test6
Declare float Test7
Declare single Test8
Declare Test9$[1]
Test1$ = "Das ought to showing."
Test2  = "neue Types-Deklaration"
Test3  = "Überraschung"
Test4% = 12
Test5  = 14
Test6  = 2018
Test7  = pi()
Test8  = 3.14
test9$[0] = "na"
test9$[1] = "klar"
 $D "Daten Show (1)", Test1$
Print "und moreover in the Program: "; Test1$
WaitInput
 $D "Daten Show (2)", Test2
Print "und moreover in the Program: "; Test2
WaitInput
 $D "Daten Show (3)", Test3
// upps
Print "und moreover in the Program: "; Test3
WaitInput
 $D "Daten Show (4)", Test4%
Print "und moreover in the Program: "; Test4%
WaitInput
 $D "Daten Show (5)", Test5
Print "und moreover in the Program: "; Test5
WaitInput
 $D "Daten Show (6)", Test6
Print "und moreover in the Program: "; Test6
WaitInput
 $D "Daten Show (7)", Test7
Print "und moreover in the Program: "; Test7
WaitInput
 $D "Daten Show (8)", Test8
// Why uses at all who this Datentyp
Print "und moreover in the Program: "; Test8
WaitInput
 $D "Daten Show (9)", Test9$[1]
Print "und moreover in the Program: "; Test9$[1]
WaitInput
end