Better code readability

diff --git a/Games/Pomppu Paavo.bas b/Games/Pomppu Paavo.bas
index 107ec84..8840726 100755 (executable)
--- a/Games/Pomppu Paavo.bas
+++ b/Games/Pomppu Paavo.bas
@@ -217,7 +217,7 @@ a = 50
 b = 50\r
 siie = 1\r
 siie1 = 1\r
-6\r
+MainGameLoop:\r
 WHILE kbd$ = ""\r
 kbd$ = INKEY$\r
 IF graphicsMode = 2 THEN b = b * 2: GOTO 106\r
@@ -302,13 +302,13 @@ IF a$ = "+" THEN a = 2: b = 50: CurrentLevelNumber% = CurrentLevelNumber% + 5: L
 IF a$ = "q" THEN END\r
 sipa = sipa + 1\r
 IF sipa = 3 THEN sipa = 1\r
-GOTO 6\r
+GOTO MainGameLoop\r
 \r
 \r
 106\r
 WHILE kbd$ = ""\r
 kbd$ = INKEY$\r
-IF graphicsMode = 1 THEN b = b / 2: GOTO 6\r
+IF graphicsMode = 1 THEN b = b / 2: GOTO MainGameLoop\r
 IF b > 0 THEN GET (a \ 2, b \ 2)-((a + 20) \ 2, (b + 20) \ 2), marm1\r
 IF b > 0 THEN IF sipp = 1 THEN PUT (a \ 2, b \ 2), sippm1, OR\r
 IF b > 0 THEN IF sipp = 2 THEN PUT (a \ 2, b \ 2), sippm2, OR\r