[ScreenSaver] v1.2
This commit is contained in:
parent
edf0f9c26a
commit
9459cb0f29
BIN
ScreenSaver/ScreenSaver.AMOS
Normal file → Executable file
BIN
ScreenSaver/ScreenSaver.AMOS
Normal file → Executable file
Binary file not shown.
6
ScreenSaver/ScreenSaver.AMOS.txt
Normal file → Executable file
6
ScreenSaver/ScreenSaver.AMOS.txt
Normal file → Executable file
|
@ -1,4 +1,4 @@
|
|||
' Screen Saver v1.1
|
||||
' Screen Saver v1.2
|
||||
' Created By Tomek Wojcik <tomek@bthlabs.pl>
|
||||
' 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.1";
|
||||
Print "v1.2";
|
||||
End Proc
|
||||
|
||||
Screen 0
|
||||
|
@ -175,7 +175,7 @@ Procedure TXT_INIT
|
|||
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)
|
||||
TXT_SPECIAL_STRING_COORDS(I,1)=1+Rnd(22)
|
||||
Next I
|
||||
End Proc
|
||||
|
||||
|
|
BIN
ScreenSaver/ScreenSaver.adf
Normal file → Executable file
BIN
ScreenSaver/ScreenSaver.adf
Normal file → Executable file
Binary file not shown.
BIN
ScreenSaver/ScreenSaver.exe
Normal file → Executable file
BIN
ScreenSaver/ScreenSaver.exe
Normal file → Executable file
Binary file not shown.
Loading…
Reference in New Issue
Block a user