Игра "Lights Out" - 57 строк на С++

1 ResizeScreen(40, 40); 2 Show(); 3 int i = 0; 4 b: 5 Print("O"); 6 i = i + 1; 7 if (i < 25) { 8 goto b; 9 } 10 i = 0; 11 p: 12 int x = MouseX() / 8; 13 int y = MouseY() / 8; 14 if (IsKey(kKeyMouseLeft)) { 15 goto t; 16 } 17 if (i < 6) { 18 i = i + 1; 19 x = Random32(0, 4); 20 y = Random32(0, 4); 21 goto t; 22 } 23 Show(); 24 goto p; 25 t: 26 int n = 0; 27 l: 28 if (n == 1) { 29 x = x - 1; 30 } 31 if (n == 2) { 32 x = x + 2; 33 } 34 if (n == 3) { 35 x = x - 1; 36 y = y - 1; 37 } 38 if (n == 4) { 39 y = y + 2; 40 } 41 string s = Screen(x, y); 42 if (s == "X") { 43 Paper(0); 44 At(x, y); 45 Print("O"); 46 } 47 if (s == "O") { 48 Paper(14); 49 At(x, y); 50 Print("X"); 51 } 52 n = n + 1; 53 if (n < 5) { 54 goto l; 55 } 56 Show(); 57 goto p;