Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1817 | Albom | 1 | #include "system/kolibri.h" |
2 | #include "system/stdlib.h" |
||
3 | #include "system/string.h" |
||
4 | |||
5 | char CONSOLE[] = "/sys/lib/console.obj"; |
||
6 | |||
7 | #define MENTION _printf("Arrows to move left, up, right or down, or 'Esc' to exit: \n\n"); |
||
8 | |||
9 | int** field; |
||
10 | int emptyCell_x, emptyCell_y; |
||
11 | |||
12 | char NOT_VALID_MOVE[] = {"Not valid move.\n\n"}; |
||
13 | |||
14 | void (* _stdcall con_init)(unsigned w_w, unsigned w_h, unsigned s_w, unsigned s_h, const char* t); |
||
15 | void (* _cdecl _printf)(const char* format,...); |
||
16 | void (* _stdcall __exit)(char bCloseWindow); |
||
17 | int (* _stdcall _getch)(void); |
||
18 | |||
19 | |||
20 | //------------------ |
||
21 | void init() |
||
22 | { |
||
23 | int x,y, i,j; |
||
24 | srand( kol_system_time_get() ); |
||
25 | for(i=1; i<=15;) |
||
26 | { |
||
27 | x=rand()%4; y=rand()%4; |
||
28 | if(field[x][y] == 0) field[x][y] = i++; |
||
29 | } |
||
30 | |||
31 | for(i=0; i<4; i++) //to find the empty cell |
||
32 | for(j=0; j<4; j++) |
||
33 | if(field[j][i] == 0) |
||
34 | { |
||
35 | emptyCell_x=j; emptyCell_y = i; return; |
||
36 | } |
||
37 | |||
38 | } |
||
39 | |||
40 | //--------------------- |
||
41 | void printField() |
||
42 | { |
||
43 | int i,j; |
||
44 | for(i=0; i<4; i++) |
||
45 | { |
||
46 | for(j=0; j<4; j++) |
||
47 | if(field[j][i]) _printf("%3d", field[j][i]); |
||
48 | else _printf(" _"); |
||
49 | _printf("\n\n"); |
||
50 | } |
||
51 | _printf("\n\n"); |
||
52 | } |
||
53 | |||
54 | //----------------------- |
||
55 | int notEndYet() |
||
56 | { |
||
57 | int i,j; |
||
58 | for(i=0; i<3; i++) |
||
59 | for(j=0; j<4; j++) |
||
60 | if(field[j][i] != 4*i+j+1) return 0; //go on play |
||
61 | if(field[0][3] != 13) return 0; |
||
62 | |||
63 | return 1; //victory! |
||
64 | } |
||
65 | |||
66 | //--------------- allows move the emply cell |
||
67 | int move() |
||
68 | { |
||
69 | |||
70 | unsigned short c; |
||
71 | |||
72 | while(1) |
||
73 | { |
||
74 | c = _getch(); |
||
75 | switch(c) |
||
76 | { |
||
77 | case 0x4d00: |
||
78 | if(emptyCell_x==0) |
||
79 | { |
||
80 | _printf(NOT_VALID_MOVE); |
||
81 | break; |
||
82 | } |
||
83 | else |
||
84 | { |
||
85 | field[emptyCell_x][emptyCell_y] = field[emptyCell_x-1][emptyCell_y]; |
||
86 | field[emptyCell_x-1][emptyCell_y] = 0; |
||
87 | emptyCell_x--; |
||
88 | return 1; |
||
89 | } |
||
90 | case 0x5000: |
||
91 | if(emptyCell_y==0) |
||
92 | { |
||
93 | _printf(NOT_VALID_MOVE); |
||
94 | break; |
||
95 | } |
||
96 | else |
||
97 | { |
||
98 | field[emptyCell_x][emptyCell_y] = field[emptyCell_x][emptyCell_y-1]; |
||
99 | field[emptyCell_x][emptyCell_y-1] = 0; |
||
100 | emptyCell_y--; |
||
101 | return 2; |
||
102 | } |
||
103 | case 0x4b00: |
||
104 | if(emptyCell_x==3) |
||
105 | { |
||
106 | _printf(NOT_VALID_MOVE); |
||
107 | break; |
||
108 | } |
||
109 | else |
||
110 | { |
||
111 | field[emptyCell_x][emptyCell_y] = field[emptyCell_x+1][emptyCell_y]; |
||
112 | field[emptyCell_x+1][emptyCell_y] = 0; |
||
113 | emptyCell_x++; |
||
114 | return 3; |
||
115 | } |
||
116 | case 0x4800: |
||
117 | if(emptyCell_y==3) |
||
118 | { |
||
119 | _printf(NOT_VALID_MOVE); |
||
120 | break; |
||
121 | } |
||
122 | else |
||
123 | { |
||
124 | field[emptyCell_x][emptyCell_y] = field[emptyCell_x][emptyCell_y+1]; |
||
125 | field[emptyCell_x][emptyCell_y+1] = 0; |
||
126 | emptyCell_y++; |
||
127 | return 4; |
||
128 | } |
||
129 | case 0x011b: __exit(1); |
||
130 | default: MENTION |
||
131 | } |
||
132 | } |
||
133 | } |
||
134 | |||
135 | //----------------- main function |
||
136 | void kol_main() |
||
137 | { |
||
138 | |||
139 | int i; |
||
140 | kol_struct_import *imp; |
||
141 | |||
142 | imp = kol_cofflib_load(CONSOLE); |
||
143 | if (imp == NULL) |
||
144 | kol_exit(); |
||
145 | |||
146 | con_init = ( _stdcall void (*)(unsigned, unsigned, unsigned, unsigned, const char*)) |
||
147 | kol_cofflib_procload (imp, "con_init"); |
||
148 | if (con_init == NULL) |
||
149 | kol_exit(); |
||
150 | |||
151 | _printf = ( _cdecl void (*)(const char*,...)) |
||
152 | kol_cofflib_procload (imp, "con_printf"); |
||
153 | if (_printf == NULL) |
||
154 | kol_exit(); |
||
155 | |||
156 | __exit = ( _stdcall void (*)(char)) |
||
157 | kol_cofflib_procload (imp, "con_exit"); |
||
158 | |||
159 | if (__exit == NULL) |
||
160 | kol_exit(); |
||
161 | |||
162 | |||
163 | _getch = ( _stdcall int (*)(void)) |
||
164 | kol_cofflib_procload (imp, "con_getch2"); |
||
165 | |||
166 | if (_getch == NULL) |
||
167 | kol_exit(); |
||
168 | |||
169 | con_init(-1, -1, -1, -1, "Console15 by O.Bogomaz"); |
||
170 | |||
171 | field = (int**)malloc(4 * sizeof(int*)); |
||
172 | |||
173 | for( i=0; i<4; i++) |
||
174 | field[i] = (int*)malloc(4 * sizeof(int)); |
||
175 | |||
176 | do |
||
177 | init(); |
||
178 | while(notEndYet()); |
||
179 | |||
180 | MENTION |
||
181 | |||
182 | printField(); |
||
183 | |||
184 | while(!notEndYet()) |
||
185 | { |
||
186 | move(); |
||
187 | printField(); |
||
188 | } |
||
189 | |||
190 | _printf("\nYou win!\n"); |
||
191 | __exit(0); |
||
192 | }4;>4;>3;>4;>4;>4;>4;>=15;) |