newt binding, first demo - hello world application -- noch

Former-commit-id: 034808deb8
This commit is contained in:
Norayr Chilingarian 2015-02-21 04:38:14 +04:00
parent 50d44e7b62
commit 3f82522841
3 changed files with 70 additions and 0 deletions

View file

@ -0,0 +1,14 @@
MODULE newttest;
IMPORT newt;
VAR i : newt.Int32;
str : ARRAY 32 OF CHAR;
BEGIN
i := newt.Init();
newt.Cls();
str := "hello world!";
newt.DrawRootText(5, 7, str);
newt.WaitForKey();
newt.Delay(30);
i := newt.Finished();
END newttest.