From 78cfa5246c00854170c708c01963c2ada88d6519 Mon Sep 17 00:00:00 2001
From: Svjatoslav Agejenko <svjatoslav@svjatoslav.eu>
Date: Fri, 22 Aug 2025 23:52:39 +0300
Subject: [PATCH] Move Pomppu Paavo levels to files

---
 Games/Pomppu Paavo/Pomppu Paavo.bas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/Games/Pomppu Paavo/Pomppu Paavo.bas b/Games/Pomppu Paavo/Pomppu Paavo.bas
index 24d661f..ed7ed2e 100755
--- a/Games/Pomppu Paavo/Pomppu Paavo.bas	
+++ b/Games/Pomppu Paavo/Pomppu Paavo.bas	
@@ -219,7 +219,7 @@ siie = 1
 siie1 = 1
 MainGameLoop:
 kbd$ = INKEY$
-IF graphicsMode = 2 THEN b = b * 2: GOTO 106
+IF graphicsMode = 2 THEN b = b * 2: GOTO mainLoopSmallScale
 IF b > 0 THEN GET (a, b)-(a + 20, b + 20), mar1
 IF b > 0 THEN IF sipp = 1 THEN PUT (a, b), sipp1, OR
 IF b > 0 THEN IF sipp = 2 THEN PUT (a, b), sipp2, OR
@@ -354,7 +354,7 @@ IF sipa = 3 THEN sipa = 1
 GOTO MainGameLoop
 
 
-106
+mainLoopSmallScale:
 kbd$ = INKEY$
 IF graphicsMode = 1 THEN b = b / 2: GOTO MainGameLoop
 IF b > 0 THEN GET (a \ 2, b \ 2)-((a + 20) \ 2, (b + 20) \ 2), marm1
@@ -486,7 +486,7 @@ IF kbd$ = "q" THEN END
 sipa = sipa + 1
 IF sipa = 3 THEN sipa = 1
 
-GOTO 106
+GOTO mainLoopSmallScale
 
 SUB DisplayGameStatistics
 '
-- 
2.20.1