diff --git a/ScreenSaver/ScreenSaver.AMOS b/ScreenSaver/ScreenSaver.AMOS old mode 100755 new mode 100644 index ad17a11..7492da6 Binary files a/ScreenSaver/ScreenSaver.AMOS and b/ScreenSaver/ScreenSaver.AMOS differ diff --git a/ScreenSaver/ScreenSaver.AMOS.txt b/ScreenSaver/ScreenSaver.AMOS.txt old mode 100755 new mode 100644 index d2b4fbf..c2f8992 --- a/ScreenSaver/ScreenSaver.AMOS.txt +++ b/ScreenSaver/ScreenSaver.AMOS.txt @@ -1,4 +1,4 @@ -' Screen Saver v1.0 +' Screen Saver v1.1 ' Created By Tomek Wojcik ' Copyright 2020-present by BTHLabs (https://bthlabs.pl) ' Licensed under terms of MIT License @@ -43,7 +43,7 @@ Procedure MAIN_DRAW_BORDER Locate 0,24 Centre "By BTHLabs. For teh lulz." Locate 35,0 : Pen 13 : Paper 0 - Print "v1.0"; + Print "v1.1"; End Proc Screen 0 @@ -153,12 +153,13 @@ End Proc TXT_PEN_BASE=13 TXT_PEN_SPECIAL=1 -Dim TXT_SPECIAL_STRINGS$(3) +Dim TXT_SPECIAL_STRINGS$(4) TXT_SPECIAL_STRINGS$(0)="Basia" TXT_SPECIAL_STRINGS$(1)="Ziomek" TXT_SPECIAL_STRINGS$(2)="Tomek" +TXT_SPECIAL_STRINGS$(3)="Pecia" -Dim TXT_SPECIAL_STRING_COORDS(3,2) +Dim TXT_SPECIAL_STRING_COORDS(4,2) Global TXT_PEN_BASE,TXT_PEN_SPECIAL,TXT_SPECIAL_STRINGS$(),TXT_SPECIAL_STRING_COORDS() @@ -171,7 +172,7 @@ Procedure TXT_INIT Next X Next Y - For I=0 To 2 + For I=0 To 3 TXT_SPECIAL_STRING$=TXT_SPECIAL_STRINGS$(I) TXT_SPECIAL_STRING_COORDS(I,0)=1+Rnd(37-Len(TXT_SPECIAL_STRING$)) TXT_SPECIAL_STRING_COORDS(I,1)=1+Rnd(23) @@ -191,7 +192,7 @@ Procedure TXT_TICK Print Chr$(32+Rnd(64)); Next I - For I=0 To 2 + For I=0 To 3 Pen TXT_PEN_SPECIAL : Paper 0 Locate TXT_SPECIAL_STRING_COORDS(I,0),TXT_SPECIAL_STRING_COORDS(I,1) Print TXT_SPECIAL_STRINGS$(I); diff --git a/ScreenSaver/ScreenSaver.adf b/ScreenSaver/ScreenSaver.adf old mode 100755 new mode 100644 index 3b9beff..fb23181 Binary files a/ScreenSaver/ScreenSaver.adf and b/ScreenSaver/ScreenSaver.adf differ diff --git a/ScreenSaver/ScreenSaver.exe b/ScreenSaver/ScreenSaver.exe old mode 100755 new mode 100644 index 69c59a2..0e85b56 Binary files a/ScreenSaver/ScreenSaver.exe and b/ScreenSaver/ScreenSaver.exe differ