diff --git a/ths_example/example b/ths_example/example index 8de58fc..e432c9b 100755 Binary files a/ths_example/example and b/ths_example/example differ diff --git a/ths_example/example.cbl b/ths_example/example.cbl index e041408..569989c 100644 --- a/ths_example/example.cbl +++ b/ths_example/example.cbl @@ -17,9 +17,9 @@ 01 INIT-SCREEN. 05 BLANK SCREEN. - 05 LINE 1 COLUMN 1 REVERSE-VIDEO VALUE IS '*******************************************'. - 05 LINE 1 COLUMN 40 VALUE IS '*******************************************'. - + 05 LINE 01 COLUMN 01 VALUE IS '**************************************************************************************'. + 05 LINE 02 COLUMN 01 VALUE IS '* Programmname (c) Dr. Thomas Sindt 2026 *'. + 05 LINE 03 COLUMN 01 VALUE IS '**************************************************************************************'. 01 INPUT-SCREEN AUTO. 05 BACKGROUND-COLOR 6 FOREGROUND-COLOR 5.