From: Svjatoslav Agejenko <svjatoslav@svjatoslav.eu>
Date: Thu, 21 Aug 2025 16:47:17 +0000 (+0300)
Subject: Better code readability
X-Git-Url: http://www2.svjatoslav.eu/gitweb/?a=commitdiff_plain;h=33c5bc65c01885e5c1c5ad6d55f2ac0e7831cede;p=qbasicapps.git

Better code readability
---

diff --git a/Games/Pomppu Paavo.bas b/Games/Pomppu Paavo.bas
index 2822882..fc4c2cf 100755
--- a/Games/Pomppu Paavo.bas	
+++ b/Games/Pomppu Paavo.bas	
@@ -38,7 +38,7 @@ DIM SHARED munt(30)
 DIM SHARED poosas(100)
 DIM SHARED aken(100)
 DIM SHARED vedru(50)
-DIM SHARED intro(6000)
+DIM SHARED IntroScreen(6000)
 DIM SHARED TreeSprite(3000)
 DIM SHARED noolt(51)
 DIM SHARED noolt1(51)
@@ -201,14 +201,14 @@ DrawSprite 0, 0, 17, 1, 1
 GET (1, 1)-(21, 31), DoorSprite
 CLS
 DrawSprite 0, 0, 17, 1, 2
-GET (1, 1)-(11, 16), intro
+GET (1, 1)-(11, 16), IntroScreen
 CLS
 GOTO 7
 DrawSprite -1, -1, 10, 4, 1
-GET (1, 1)-(318, 124), intro
+GET (1, 1)-(318, 124), IntroScreen
 CLS
 SLEEP 1
-PUT (1, 1), intro, PSET
+PUT (1, 1), IntroScreen, PSET
 SLEEP 100
 7
 LoadLevel 1