/source/pintor.c

http://github.com/llopisillo/fail0verflow2 · C · 1217 lines · 900 code · 185 blank · 132 comment · 216 complexity · 98cb22ed776229ecd515a4bfab4cdcb8 MD5 · raw file 

    

  1. /*  PINTOR for GP32
    2. 

  2.     Copyright (C) 2005  Hermes/PS2Reality 
    3. 

    4. 

  4.     This program is free software; you can redistribute it and/or modify
    5. 

  5.     it under the terms of the GNU General Public License as published by
    6. 

  6.     the Free Software Foundation; either version 2 of the License, or
    7. 

  7.     (at your option) any later version.
    8. 

    9. 

  9.     This program is distributed in the hope that it will be useful,
    10. 

  10.     but WITHOUT ANY WARRANTY; without even the implied warranty of
    11. 

  11.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    12. 

  12.     GNU General Public License for more details.
    13. 

    14. 

  14.     You should have received a copy of the GNU General Public License
    15. 

  15.     along with this program; if not, write to the Free Software
    16. 

  16.     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
    17. 

    18. 

  18. */
    19. 

  19. 

  20. #include <stdio.h>
    21. 

  21. #include <stdlib.h>
    22. 

  22. #include <string.h>
    23. 

  23. #include <math.h>
    24. 

  24. #include <time.h>
    25. 

  25. 

  26. #include <malloc.h>
    27. 

  27. #include <stdlib.h>
    28. 

  28. #include <unistd.h>
    29. 

  29. #include <sys/time.h>
    30. 

  30. #include "pad.h"
    31. 

  31. 

  32. #include "audioplayer.h"
    33. 

  33. #include "spu_soundlib.h"
    34. 

  34. 

  35. 

  36. #define WIDTH	256
    37. 

  37. #define HEIGHT	192
    38. 

  38. 

  39. #define BORDER	10
    40. 

  40. 

  41. static int pause_audio = 0;
    42. 

  42. 

  43. unsigned GetTicks()
    44. 

  44. {
    45. 

  45.  struct timeval tv;
    46. 

  46.     gettimeofday( &tv, 0 );
    47. 

  47.     
    48. 

  48.     return ((tv.tv_sec * 1000000) + tv.tv_usec) / 1000;
    49. 

  49. }
    50. 

  50. 

  51. 

  52. // VARIABLES DEL PROGRAMA
    53. 

  53. 

  54. 

  55. #define PAD_RIGHT BUTTON_RIGHT
    56. 

  56. #define PAD_LEFT BUTTON_LEFT
    57. 

  57. #define PAD_DOWN BUTTON_DOWN
    58. 

  58. #define PAD_UP BUTTON_UP
    59. 

  59. 

  60. 

  61. 

  62. int PADEVENT=0; // si 1 se puede leer el PAD
    63. 

  63. 

  64. 

  65. 

  66. /****************************************************************************************************************************************/
    67. 

  67. // PANTALLA
    68. 

  68. /****************************************************************************************************************************************/
    69. 

  69. 

  70. extern unsigned char msx[];  // define la fuente externa usada para dibujar letras y numeros 
    71. 

  71. unsigned *video=NULL;       // memoria que almacena la pantalla virtual
    72. 

  72. unsigned *video_text=NULL;  // memoria que almacena la textura
    73. 

  73. 

  74. #define SIZEVIDEO 4*256*192 // tama?o en bytes de la pantalla vir.
    75. 

  75. #define SCANVIDEO 256       // ancho de la pantalla vir.
    76. 

  76. #define DESPL8VID 11        // usado para ajustar Y a scans (se utilizan graficos de 8x8 pixeles, 8*SCANVIDEO=2048=2^11
    77. 

  77. #define ANCHO 32            // ancho de la pantalla en bloques de 8 pixeles
    78. 

  78. #define ALTO 24             // alto d ela pantalla en bloques de 8 pixeles
    79. 

  79. #define ALTO2 22            // se usa para presentar la puntuacion, vidas, etc en pantalla
    80. 

  80. 

  81. unsigned COLORFONDO=0x80804000; // color de fondo (vaya noticia :P)
    82. 

  82. 

  83. 

  84. 

  85. void ClearVideo(unsigned val) // se usa para 'borrar' la pantalla virtual con un color
    86. 

  86. {
    87. 

  87. int n;
    88. 

  88. for(n=0;n<SIZEVIDEO/4;n++)
    89. 

  89. 	{
    90. 

  90. 	video[n]=val;
    91. 

  91. 	}
    92. 

  92. }
    93. 

  93. 

  94. extern void drawScene();
    95. 

  95. 

  96. void DrawScreen() // funcion evento que dibuja todos los elementos de la pantalla virtaul al LCD
    97. 

  97. {
    98. 

  98.     int n;
    99. 

  99.     unsigned c,c2;
    100. 

  100.     volatile unsigned *v;
    101. 

  101. 

  102.     c2=0xff00102f;
    103. 

  103. 

  104.     for(n = 0; n < (256 * 192); n++) {
    105. 

  105. 	    v=((unsigned *) video) + n;
    106. 

  106.         c=(*v & 0xff00ff00) | ((*v<<16) & 0xff0000) | ((*v>>16) & 0xff);
    107. 

  107.         if(!c || c < 0x11000000) c = c2;
    108. 

  108.         video_text[n] = c;
    109. 

  109.     }  
    110. 

  110.     
    111. 

  111.     drawScene();
    112. 

  112.     ps3pad_read();PADEVENT=1;
    113. 

  113. }
    114. 

  114. 

  115. void v_putchar( unsigned x, unsigned y, unsigned color, unsigned char ch) // rutina usada para dibujar caracteres (coordenadas de 8x8)
    116. 

  116. {
    117. 

  117.    int 	i,j,v;
    118. 

  118.    unsigned char	*font;
    119. 

  119.   
    120. 

  120.    if(x>=ANCHO || y>=ALTO) return;
    121. 

  121.    v=(y<<DESPL8VID);
    122. 

  122.    font = &msx[ (int)ch * 8];
    123. 

  123.    for (i=0; i < 8; i++, font++)
    124. 

  124. 		{  
    125. 

  125. 		 for (j=0; j < 8; j++)
    126. 

  126.           {
    127. 

  127.           if ((*font & (128 >> j)))
    128. 

  128. 			  { 
    129. 

  129.                video[v+(((x<<3)+j))]=color;
    130. 

  130. 			  }
    131. 

  131. 			else video[v+(((x<<3)+j))]=0;
    132. 

  132.           }
    133. 

  133. 	  v+=SCANVIDEO;
    134. 

  134. 	 }
    135. 

  135.  
    136. 

  136. }
    137. 

  137. 

  138. // display array of chars
    139. 

  139. 

  140. void v_putcad(int x,int y,unsigned color,char *cad)  // dibuja una cadena de texto
    141. 

  141. {
    142. 

  142. 	
    143. 

  143. while(cad[0]!=0) {v_putchar(x,y,color,cad[0]);cad++;x++;}
    144. 

  144. }
    145. 

  145. 

  146. 

  147. /****************************************************************************************************************************************/
    148. 

  148. //  rutinas y definicion de UDG (User Defined Graphic) (8x8 pixeles)
    149. 

  149. /****************************************************************************************************************************************/
    150. 

  150. 

  151. // paleta de conversion de caracter/color
    152. 

  152. 

  153. unsigned PALETA[10]={0x0,0xff0000ff,0xff00ff00,0xff00ffff,0xffff0000,0xffff00ff,0xffffff00,0xffffffff,0xff000000,1};
    154. 

  154. 

  155. void SetUDG(unsigned x,unsigned y,unsigned char *punt) // dibuja un UDG
    156. 

  156. {
    157. 

  157. int n,m,v;
    158. 

  158. unsigned col;
    159. 

  159. if(x>=ANCHO || y>=ALTO) return;
    160. 

  160. v=(y<<DESPL8VID);
    161. 

  161. 

  162. for(n=0;n<8;n++)
    163. 

  163. 	{
    164. 

  164. 	for(m=0;m<8;m++)
    165. 

  165. 		{
    166. 

  166. 		col=(unsigned )*punt++;
    167. 

  167. 		col-=48;
    168. 

  168. 		col=PALETA[col];
    169. 

  169. 		//if(col==1) col=COLORFONDO;
    170. 

  170. 		if(col!=0)
    171. 

  171.         video[v+(((x<<3)+m))]=col;
    172. 

  172. 		}
    173. 

  173. 	v+=SCANVIDEO;
    174. 

  174. 	}
    175. 

  175. }
    176. 

  176. 

  177. // lista de UDG's usados en el juego
    178. 

  178. unsigned char gdu_sprite[20][8][8]={
    179. 

  179. {
    180. 

  180. "33388333",
    181. 

  181. "33388333",
    182. 

  182. "33383383",
    183. 

  183. "38888833",
    184. 

  184. "83383333",
    185. 

  185. "33838833",
    186. 

  186. "33833833",
    187. 

  187. "38333383",
    188. 

  188. },
    189. 

  189. {
    190. 

  190. "99999999",
    191. 

  191. "99999999",
    192. 

  192. "99999999",
    193. 

  193. "99999999",
    194. 

  194. "99999999",
    195. 

  195. "99999999",
    196. 

  196. "99999999",
    197. 

  197. "99999999",
    198. 

  198. },
    199. 

  199. {
    200. 

  200. "77777777",
    201. 

  201. "77777777",
    202. 

  202. "77777777",
    203. 

  203. "77777777",
    204. 

  204. "77777777",
    205. 

  205. "77777777",
    206. 

  206. "77777777",
    207. 

  207. "77777777",
    208. 

  208. },
    209. 

  209. {
    210. 

  210. "33333333",
    211. 

  211. "33333333",
    212. 

  212. "33333333",
    213. 

  213. "33333333",
    214. 

  214. "33333333",
    215. 

  215. "33333333",
    216. 

  216. "33333333",
    217. 

  217. "33333333",
    218. 

  218. },
    219. 

  219. {
    220. 

  220. "33388333",
    221. 

  221. "33388333",
    222. 

  222. "38338333",
    223. 

  223. "33888883",
    224. 

  224. "33338338",
    225. 

  225. "33883833",
    226. 

  226. "33833833",
    227. 

  227. "38333383",
    228. 

  228. },
    229. 

  229. {
    230. 

  230. "22222222",
    231. 

  231. "22222222",
    232. 

  232. "22222222",
    233. 

  233. "22222222",
    234. 

  234. "22222222",
    235. 

  235. "22222222",
    236. 

  236. "22222222",
    237. 

  237. "22222222",
    238. 

  238. },
    239. 

  239. {
    240. 

  240. // 6
    241. 

  241. "00001100",
    242. 

  242. "10111110",
    243. 

  243. "11111011",
    244. 

  244. "01111111",
    245. 

  245. "01111000",
    246. 

  246. "00110111",
    247. 

  247. "00111110",
    248. 

  248. "00001100",
    249. 

  249. },
    250. 

  250. {
    251. 

  251. "00001100",
    252. 

  252. "00111110",
    253. 

  253. "01111011",
    254. 

  254. "01111111",
    255. 

  255. "01111000",
    256. 

  256. "11110001",
    257. 

  257. "10111110",
    258. 

  258. "00001100",
    259. 

  259. },
    260. 

  260. {
    261. 

  261. 

  262. // 8
    263. 

  263. "00110000",
    264. 

  264. "01111101",
    265. 

  265. "11011111",
    266. 

  266. "11111110",
    267. 

  267. "00011110",
    268. 

  268. "11101100",
    269. 

  269. "01111100",
    270. 

  270. "00110000",
    271. 

  271. 

  272. },
    273. 

  273. {
    274. 

  274. "00110000",
    275. 

  275. "01111100",
    276. 

  276. "11011110",
    277. 

  277. "11111110",
    278. 

  278. "00011110",
    279. 

  279. "10001111",
    280. 

  280. "01111101",
    281. 

  281. "00110000",
    282. 

  282. },
    283. 

  283. 

  284. 

  285. };
    286. 

  286. 

  287. 

  288. /****************************************************************************************************************************************/
    289. 

  289. // definicion de mapas del juego
    290. 

  290. /****************************************************************************************************************************************/
    291. 

  291. 

  292. 

  293. // definicion d elos mapas: A,B,C,D->representa donde aparecen los bichos, 1,2->caminos
    294. 

  294. unsigned char map_screens[8][22][32]={
    295. 

  295. 

  296. {
    297. 

  297. ////////////////////////////////////
    298. 

  298. "            2      2            ",
    299. 

  299. "             2    2             ",
    300. 

  300. "                                ",
    301. 

  301. "            22222222            ",
    302. 

  302. "                                ",
    303. 

  303. "11111111111                     ",
    304. 

  304. " 1        11                    ",
    305. 

  305. " 1         1     1              ",
    306. 

  306. " 1        11     1              ",
    307. 

  307. " 1111111111   111111111         ",
    308. 

  308. " 1               1          1 11",
    309. 

  309. " 1  2    1 11111 1    1111  111 ",
    310. 

  310. " 1       111   1 1   11  11 1   ",
    311. 

  311. " 1  1    1     111   1    1 1   ",
    312. 

  312. " 1111    1     1 1   1    111   ",
    313. 

  313. " 1  1    1     1 1   1    1 1   ",
    314. 

  314. " 1  11   1     1 11  11  11 1   ",
    315. 

  315. " A   1111D     1  11B11111  C   ",
    316. 

  316. "                                ",
    317. 

  317. "22222222222222222222222222222222",
    318. 

  318. "22222222222222222222222222222222",
    319. 

  319. "                                ",
    320. 

  320. },
    321. 

  321. {
    322. 

  322. //////////////////////////////////
    323. 

  323. "A1111111                1111111D",
    324. 

  324. "1      1                1      1",
    325. 

  325. "1      11111111$111111111      1",
    326. 

  326. "1      1                1      1",
    327. 

  327. "1      1                1      1",
    328. 

  328. "1      111111111111111111      1",
    329. 

  329. "1      1    1      1    1      1",
    330. 

  330. "11111111    1      1    11111111",
    331. 

  331. "  1  1    111111111111    1  1  ",
    332. 

  332. "  1  1    1          1    1  1  ",
    333. 

  333. "  1  1    1          1    1  1  ",
    334. 

  334. "  1  1    1          1    1  1  ",
    335. 

  335. "  1  1    1          1    1  1  ",
    336. 

  336. "  1  1    111111111111    1  1  ",
    337. 

  337. "11111111    1      1    11111111",
    338. 

  338. "1      1    1      1    1      1",
    339. 

  339. "1      111111111111111111      1",
    340. 

  340. "1      1                1      1",
    341. 

  341. "1      1                1      1",
    342. 

  342. "1      111111111111111111      1",
    343. 

  343. "1      1                1      1",
    344. 

  344. "C1111111                1111111B",
    345. 

  345. },
    346. 

  346. {
    347. 

  347. ////////////////////////////////////
    348. 

  348. "   A11111              11111D   ",
    349. 

  349. "   1    1              1    1   ",
    350. 

  350. "111111111111        111111111111",
    351. 

  351. "1          1        1          1",
    352. 

  352. "1          1        1          1",
    353. 

  353. "111111111111        111111111111",
    354. 

  354. "   1    1   11111111   1    1   ",
    355. 

  355. "   1    1   1      1   1    1   ",
    356. 

  356. "   1    1   1      1   1    1   ",
    357. 

  357. "1111111111111111$111111111111111",
    358. 

  358. "1                              1",
    359. 

  359. "1                              1",
    360. 

  360. "1                              1",
    361. 

  361. "11111111111111111111111111111111",
    362. 

  362. "   1        1      1        1   ",
    363. 

  363. "   1        1      1        1   ",
    364. 

  364. "   1        1      1        1   ",
    365. 

  365. "   1        1      1        1   ",
    366. 

  366. "   1        1      1        1   ",
    367. 

  367. "   C111111111      111111111B   ",
    368. 

  368. "                                ",
    369. 

  369. "                                ",
    370. 

  370. ////////////////////////////////////
    371. 

  371. },
    372. 

  372. {
    373. 

  373. ////////////////////////////////////
    374. 

  374. "A1111                11111      ",
    375. 

  375. "1   1                1   1      ",
    376. 

  376. "1   1                1   1      ",
    377. 

  377. "1   111111111111111111111111111D",
    378. 

  378. "1   1                1   1     1",
    379. 

  379. "1   1                1   1     1",
    380. 

  380. "1   1111111111111$11111111111111",
    381. 

  381. "1   1                1   1      ",
    382. 

  382. "1   1                1   1      ",
    383. 

  383. "1   1         1111111111111111  ",
    384. 

  384. "1   1         1              1  ",
    385. 

  385. "1   1         1              1  ",
    386. 

  386. "1   1         1              1  ",
    387. 

  387. "1   1   111111111111111111111111",
    388. 

  388. "1   1   1                      1",
    389. 

  389. "1   1   1                      1",
    390. 

  390. "1   1111111111111111111111111111",
    391. 

  391. "1   1                       1   ",
    392. 

  392. "1   1                       1   ",
    393. 

  393. "1   111111111111111111111111B   ",
    394. 

  394. "1   1    1            1         ",
    395. 

  395. "C1111    11111111111111         ",
    396. 

  396. },
    397. 

  397. {
    398. 

  398. ////////////////////////////////////
    399. 

  399. "    A11111      111111111111D   ",
    400. 

  400. "    1    1      1           1   ",
    401. 

  401. " 111111111  11111111111111111111",
    402. 

  402. " 1       1  1      1      1    1",
    403. 

  403. " 1       1  1      1      1    1",
    404. 

  404. " 111111111  1      1      1    1",
    405. 

  405. "    1    1  1      1      1    1",
    406. 

  406. "    1    1  1      1      1    1",
    407. 

  407. "    1    1  1      1111111111111",
    408. 

  408. "    1    1  1      1           1",
    409. 

  409. "    1    1  1      1           1",
    410. 

  410. "    1    1  1      1           1",
    411. 

  411. "    1    1  1111$111111111111111",
    412. 

  412. "    1    1  1      1      1    1",
    413. 

  413. "    1    1  1      1      1    1",
    414. 

  414. "    1    1  1      1      1    1",
    415. 

  415. "    1    1  1      1      1    1",
    416. 

  416. "11111111111111111111111111111111",
    417. 

  417. "1                            1  ",
    418. 

  418. "1                            1  ",
    419. 

  419. "1                            1  ",
    420. 

  420. "C1111111111111111111111111111B  ",
    421. 

  421. ////////////////////////////////////
    422. 

  422. },
    423. 

  423. {
    424. 

  424. ////////////////////////////////////
    425. 

  425. "A11111111   11111111   11111111D",
    426. 

  426. "1       1   1      1   1       1",
    427. 

  427. "1       1   1      1   1       1",
    428. 

  428. "1       1 111111111111 1       1",
    429. 

  429. "111111111 1          1 111111111",
    430. 

  430. "    1     1          1     1    ",
    431. 

  431. "1111111111111111$111111111111111",
    432. 

  432. "1         1          1         1",
    433. 

  433. "1         1          1         1",
    434. 

  434. "1         1          1         1",
    435. 

  435. "1         111111111111         1",
    436. 

  436. "1         1  1    1  1         1",
    437. 

  437. "1         1  1    1  1         1",
    438. 

  438. "11111111111  1    1  11111111111",
    439. 

  439. "  1     1    1    1    1     1  ",
    440. 

  440. "  1     1111111111111111     1  ",
    441. 

  441. "  1     1              1     1  ",
    442. 

  442. "  1     1              1     1  ",
    443. 

  443. "11111111111111111111111111111111",
    444. 

  444. "1          1        1          1",
    445. 

  445. "1          1        1          1",
    446. 

  446. "C11111111111        11111111111B",
    447. 

  447. ////////////////////////////////////
    448. 

  448. },
    449. 

  449. {
    450. 

  450. ////////////////////////////////////
    451. 

  451. "                                ",
    452. 

  452. "                                ",
    453. 

  453. "                                ",
    454. 

  454. "                                ",
    455. 

  455. "                                ",
    456. 

  456. "                                ",
    457. 

  457. "                                ",
    458. 

  458. "                                ",
    459. 

  459. "                                ",
    460. 

  460. "                                ",
    461. 

  461. "                                ",
    462. 

  462. "                                ",
    463. 

  463. "                                ",
    464. 

  464. "                                ",
    465. 

  465. "                                ",
    466. 

  466. "                                ",
    467. 

  467. "                                ",
    468. 

  468. "                                ",
    469. 

  469. "                                ",
    470. 

  470. "                                ",
    471. 

  471. "                                ",
    472. 

  472. "                                ",
    473. 

  473. ////////////////////////////////////
    474. 

  474. },
    475. 

  475. 

  476. 

  477. };
    478. 

  478. // numero de anillos por mapa
    479. 

  479. int map_screen_rings[10]={66,11,10,10,12,13,0,0,0,0};
    480. 

  480. 

  481. /****************************************************************************************************************************************/
    482. 

  482. // variables del juego
    483. 

  483. /****************************************************************************************************************************************/
    484. 

  484. 

  485. 

  486. int pausa=0; // 1- juego pausado
    487. 

  487. 

  488. unsigned puntos=0; // si te tengo que explicar esto, mejor lo dejamos :P
    489. 

  489. unsigned hiscore=0;
    490. 

  490. int vidas=3;
    491. 

  491. int nbichos=2;
    492. 

  492. 

  493. int rings=0; // anillos completados
    494. 

  494. unsigned protadir=0; // para donde miramos
    495. 

  495. int bichodir[4]={0,0,0,0}; // para donde miran los bichos
    496. 

  496. 

  497. int ACTMAP=0; // mapa actual
    498. 

  498. unsigned char map_screen[24][32]; // aqui se trabaja (se copia el mapa aqui para ello)
    499. 

  499. 

  500. 

  501. //  control de eventos de sonido
    502. 

  502. int message_scroll=0;
    503. 

  503. int message_effect1=0;
    504. 

  504. int message_effect2=0;
    505. 

  505. int message_camina[4]={0,0,0,0};
    506. 

  506. int piok=0;
    507. 

  507. int message_piok=0; // me han 'picado' me temo :D
    508. 

  508. 

  509. /****************************************************************************************************************************************/
    510. 

  510. // manejo y control de mapas del juego
    511. 

  511. /****************************************************************************************************************************************/
    512. 

  512. 

  513. 

  514. void copyMAP()
    515. 

  515. {
    516. 

  516. int n,m;
    517. 

  517. unsigned char c;
    518. 

  518. protadir=0;
    519. 

  519. 

  520. rings=0;
    521. 

  521. piok=0;
    522. 

  522. message_piok=0;
    523. 

  523. for(n=0;n<4;n++) 
    524. 

  524. 	{bichodir[n]=0;
    525. 

  525.     message_camina[n]=0;
    526. 

  526.     }
    527. 

  527.  message_effect2=0;
    528. 

  528. message_effect1=0;
    529. 

  529. message_scroll=0;
    530. 

  530. ClearVideo(0);
    531. 

  531. 

  532. switch(ACTMAP)
    533. 

  533. 	{
    534. 

  534. 	case 0:COLORFONDO=0x80800000;PALETA[2]=0x80ff8000;break;
    535. 

  535. 	case 2:COLORFONDO=0x80004020;PALETA[2]=0x8000ff80;break;
    536. 

  536. 	case 3:COLORFONDO=0x80404040;PALETA[2]=0x808000ff;break;
    537. 

  537. 	case 4:COLORFONDO=0x80404000;PALETA[2]=0x8000ff00;break;
    538. 

  538. 	case 5:COLORFONDO=0x80402040;PALETA[2]=0x80ff00ff;break;
    539. 

  539. 	default:COLORFONDO=0x80804000;PALETA[2]=0x80ff8000;
    540. 

  540. 	}
    541. 

  541. 

  542. //memcpy(map_screen,&map_screens[ACTMAP][0][0],32*22);
    543. 

  543. for(n=0;n<22;n++)
    544. 

  544. {
    545. 

  545. for(m=0;m<32;m++)
    546. 

  546. 	{
    547. 

  547.     c=map_screens[ACTMAP][n][m];
    548. 

  548.     // esto sucede la primera vez
    549. 

  549. 	if(c==' ') c=0;
    550. 

  550. 	else
    551. 

  551. 	if(c=='1') c=1;
    552. 

  552. 	else
    553. 

  553. 	if(c=='2') c=2;
    554. 

  554. 	else
    555. 

  555. 	if(c=='$') c=130;
    556. 

  556. 	else
    557. 

  557. 	if(c=='A') c=65;
    558. 

  558. 	else
    559. 

  559. 	if(c=='B' && nbichos>1) c=33;
    560. 

  560.     else
    561. 

  561. 	if(c=='C' && nbichos>2) c=17;
    562. 

  562.     else
    563. 

  563. 	if(c=='D' && nbichos>3) c=9;
    564. 

  564. 	else c=1;
    565. 

  565. 	map_screen[n][m]=c;
    566. 

  566. 	}
    567. 

  567. }
    568. 

  568. }
    569. 

  569. 

  570. int AnalizeMAP();
    571. 

  571. 

  572. void scrollMAP() // efecto de scroll lateral de cuando completamos un mapa
    573. 

  573. {
    574. 

  574. int n,m;
    575. 

  575. 

  576. for(n=0;n<22;n++)
    577. 

  577. 	{
    578. 

  578. 	for(m=30;m>=0;m--)
    579. 

  579. 		{
    580. 

  580. 		map_screen[n][m+1]=map_screen[n][m];
    581. 

  581. 		}
    582. 

  582. 	map_screen[n][0]=0;
    583. 

  583. 	}
    584. 

  584. }
    585. 

  585. 

  586. static int screen_count0 = 0;
    587. 

  587. 

  588. void DrawMAP() // dibuja el mapa y actualiza variables
    589. 

  589. {
    590. 

  590. int n,m,v;
    591. 

  591. unsigned char c;
    592. 

  592. char cad[256];
    593. 

  593. static int paso=0,count=0,count2=0;
    594. 

  594. 

  595. 

  596. 

  597. screen_count0++;
    598. 

  598. 

  599. count2++;
    600. 

  600. if(count2>=50) {count2=0;}
    601. 

  601. count++;
    602. 

  602. if(count>=32){count=0;paso^=1;}
    603. 

  603. 

  604. 

  605. if(rings>=map_screen_rings[ACTMAP] || piok || pausa || ACTMAP==0) count2=20; // evita efectos de sonido
    606. 

  606. else
    607. 

  607. rings+=AnalizeMAP();
    608. 

  608. //if(rings>map_screen_rings[ACTMAP]) return ; // si se han comppletado los anillos retorna
    609. 

  609. 

  610. for(n=0;n<22;n++)
    611. 

  611. {
    612. 

  612. for(m=0;m<32;m++)
    613. 

  613. 	{
    614. 

  614.     c=map_screen[n][m];
    615. 

  615.     // esto sucede la primera vez
    616. 

  616. 	/*if(c=='$') {c='2' | 128;map_screen[n][m]=c; }
    617. 

  617. 	if(c=='A') {c='1' | 128;map_screen[n][m]=c; }*/
    618. 

  618. 	// pinta fondo mapa
    619. 

  619. 	
    620. 

  620. 	v=(c & 7)+1;
    621. 

  621. 	
    622. 

  622. 	SetUDG(m,n,(unsigned char *) &gdu_sprite[v][0][0]);
    623. 

  623. 	// mi personaje esta aqui?
    624. 

  624. 	if(c & 128) {if((c & 120) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}SetUDG(m,n,(unsigned char *) &gdu_sprite[4*(protadir==1 || protadir==4)][0][0]);c=(c & 0xfc) | 130;map_screen[n][m]=c;}
    625. 

  625. 	// veo bichos!!
    626. 

  626. 	if(c & 64) {if((c & 128) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    627. 

  627. 		       if(count2==0) message_camina[0]=(m-16)+(m==16);SetUDG(m,n,(unsigned char *) &gdu_sprite[6+paso+2*(bichodir[0]==1 || bichodir[0]==4)][0][0]);}
    628. 

  628. 	if(c & 32) {if((c & 128) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    629. 

  629. 		       if(count2==0) message_camina[1]=(m-16)+(m==16);SetUDG(m,n,(unsigned char *) &gdu_sprite[6+paso+2*(bichodir[1]==1 || bichodir[1]==4)][0][0]);}
    630. 

  630. 	if(c & 16) {if((c & 128) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    631. 

  631. 		       if(count2==0) message_camina[2]=(m-16)+(m==16);SetUDG(m,n,(unsigned char *) &gdu_sprite[6+paso+2*(bichodir[2]==1 || bichodir[2]==4)][0][0]);}
    632. 

  632. 	if(c & 8) {if((c & 128) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    633. 

  633. 		      if(count2==0) message_camina[3]=(m-16)+(m==16);SetUDG(m,n,(unsigned char *) &gdu_sprite[6+paso+2*(bichodir[3]==1 || bichodir[3]==4)][0][0]);}
    634. 

  634. 	}
    635. 

  635. }
    636. 

  636. 

  637. 

  638. if(ACTMAP!=0) // si no es pantalla 0
    639. 

  639. {if(puntos>hiscore) hiscore=puntos;
    640. 

  640. sprintf(cad,"SCORE:%6.6u HI:%6.6u ",puntos,hiscore); 
    641. 

  641. v_putcad(0,23,0xffffFFff,cad);
    642. 

  642. v_putcad(23,23,0xffffFFff,"LIVES:");
    643. 

  643. for(n=0;n<vidas;n++) SetUDG(29+n,23,(unsigned char *) &gdu_sprite[0]);
    644. 

  644. screen_count0 = 0;
    645. 

  645. }
    646. 

  646. else
    647. 

  647. {
    648. 

  648. 

  649. if(screen_count0<30)
    650. 

  650.     {
    651. 

  651.     v_putcad(7,22,0xffffffff,"by HermesEOL / 2011");
    652. 

  652.     v_putcad(6,23,0xffffffff,"Fail0verflow Version");
    653. 

  653.     }
    654. 

  654. else
    655. 

  655.     {
    656. 

  656. 

  657.     memset(video, 0, SIZEVIDEO);
    658. 

  658.     v_putcad(11, 1,0xff00ffff,"Starring:");
    659. 

  659. 

  660.     SetUDG(3,3,(unsigned char *) &gdu_sprite[0]);
    661. 

  661.     v_putcad(4, 3,0xffffffff,"..... 1 to 100 John Does");
    662. 

  662. 

  663.     SetUDG(3,5,(unsigned char *) &gdu_sprite[8]);
    664. 

  664.     v_putcad(4, 5,0xffffffff,"..... Giant Crab S.C.E.A.");
    665. 

  665. 

  666.     SetUDG(3,7,(unsigned char *) &gdu_sprite[9]);
    667. 

  667.     v_putcad(4, 7,0xffffffff,"..... Attorneys lapdogs");
    668. 

  668. 

  669.     v_putcad(13, 9,0xff00ffff,"Music:");
    670. 

  670. 

  671.     v_putcad(0, 11,0xffffffff,"The Light It Up Contest-Geohot");
    672. 

  672. 

  673.     v_putcad(11, 13,0xff00ffff,"No Thanks:");
    674. 

  674. 

  675.     v_putcad(0, 15,0xffffffff,"To github to erase the original");
    676. 

  676.     v_putcad(0, 16,0xffffffff,"fail0verflow repository cowardly ");
    677. 

  677.     v_putcad(0, 17,0xffffffff,"without any reason to justify it.");
    678. 

  678.     
    679. 

  679.     v_putcad(7,22,0xffffffff,"by HermesEOL / 2011");
    680. 

  680.     v_putcad(6,23,0xffffffff,"Fail0verflow Version");
    681. 

  681. 

  682.     if(screen_count0>60) screen_count0 = 0;
    683. 

  683.     }
    684. 

  684.     
    685. 

  685. }
    686. 

  686. 

  687. }
    688. 

  688. 

  689. int subanalizeMAP(int x,int y) // llamada por analizeMAP(), me gustan los nombres rarus
    690. 

  690. {
    691. 

  691. int n,m;
    692. 

  692. 

  693. int xx1,yy1,xx2,yy2;
    694. 

  694. 

  695. if(x>29 || y>19) return 0;
    696. 

  696. if((map_screen[y][x+1] & 3)!=2 || (map_screen[y+1][x] & 3)!=2) return 0;
    697. 

  697. 

  698. xx1=xx2=x;yy1=yy2=y;
    699. 

  699. // busca una bifurcacion hacia abajo
    700. 

  700. for(m=x+1;m<32;m++)
    701. 

  701. 	{
    702. 

  702. 	if((map_screen[y][m] & 3)==2)
    703. 

  703. 	{
    704. 

  704. 	if((map_screen[y+1][m] & 3)==1) break;
    705. 

  705. 	if((map_screen[y+1][m] & 3)==2) {xx2=m;break;}
    706. 

  706. 	} else break;
    707. 

  707. 	}
    708. 

  708. // busca una bifurcacion a la derecha
    709. 

  709. for(m=y+1;m<22;m++)
    710. 

  710. 	{
    711. 

  711. 	if((map_screen[m][x] & 3)==2)
    712. 

  712. 	{
    713. 

  713. 	if((map_screen[m][x+1] & 3)==1) break; 
    714. 

  714. 	if((map_screen[m][x+1] & 3)==2) {yy2=m;break;}
    715. 

  715. 	} else break;
    716. 

  716. 	}
    717. 

  717. if(xx1==xx2 || yy1==yy2) return 0;
    718. 

  718. 

  719. for(m=xx1;m<=xx2;m++)
    720. 

  720. 	{
    721. 

  721. 	if((map_screen[yy2][m] & 3)!=2) break;
    722. 

  722. 	}
    723. 

  723. if(m<=xx2) return 0; // no esta completo el circulo
    724. 

  724. for(m=yy1;m<=yy2;m++)
    725. 

  725. 	{
    726. 

  726. 	if((map_screen[m][xx2] & 3)!=2) break;
    727. 

  727. 	}
    728. 

  728. if(m<=yy2) return 0; // no esta completo el circulo
    729. 

  729. // recuadro a iluminar
    730. 

  730. for(n=yy1+1;n<yy2;n++)
    731. 

  731. 	{
    732. 

  732. 	for(m=xx1+1;m<xx2;m++)
    733. 

  733. 		{
    734. 

  734. 		if(map_screen[n][m]==4) return 0; // ya estaba pintado
    735. 

  735. 		map_screen[n][m]=4;
    736. 

  736. 		}
    737. 

  737. 	}
    738. 

  738. message_effect1=1; // emite un sonido
    739. 

  739. return 1;
    740. 

  740. }
    741. 

  741. 

  742. int AnalizeMAP() // rutina que sirve para que el programa se entere de lo que pasa en el mapa (busca anillos)
    743. 

  743. {
    744. 

  744. int numrec=0;
    745. 

  745. int n,m;
    746. 

  746. 

  747. for(n=0;n<22;n++)
    748. 

  748. {
    749. 

  749. for(m=0;m<32;m++)
    750. 

  750. 	{
    751. 

  751. 	if((map_screen[n][m] & 3)==2)  
    752. 

  752. 		{
    753. 

  753. 		if(subanalizeMAP(m,n)) numrec++;
    754. 

  754. 		}
    755. 

  755. 	}
    756. 

  756. }
    757. 

  757. puntos+=10*numrec*nbichos;
    758. 

  758. return numrec;
    759. 

  759. }
    760. 

  760. 

  761. void Borra_Prota()
    762. 

  762. {
    763. 

  763. int n,m;
    764. 

  764. for(n=0;n<22;n++)
    765. 

  765. {
    766. 

  766. for(m=0;m<32;m++)
    767. 

  767. 	{
    768. 

  768.     map_screen[n][m]&=127;
    769. 

  769. 	}
    770. 

  770. }
    771. 

  771. }
    772. 

  772. 

  773. void Move_Bicho(unsigned nbi) // mola el spanglish :D
    774. 

  774. {
    775. 

  775. int n,m;
    776. 

  776. unsigned char c,mask,mask2;
    777. 

  777. int testmove=0,contmove=0;
    778. 

  778. switch(nbi)
    779. 

  779. {
    780. 

  780. case 1: mask=32;mask2=255-32;break;
    781. 

  781. case 2: mask=16;mask2=255-16;break;
    782. 

  782. case 3: mask=8;mask2=255-8;break;
    783. 

  783. default: mask=64;mask2=255-64;
    784. 

  784. }
    785. 

  785. //busca al bichin :P
    786. 

  786. for(n=0;n<22;n++)
    787. 

  787. {
    788. 

  788. for(m=0;m<32;m++)
    789. 

  789. 	{
    790. 

  790.     c=map_screen[n][m];
    791. 

  791. 	if(c & mask) // detectado bicho
    792. 

  792. 		{
    793. 

  793. 		do
    794. 

  794. 		{
    795. 

  795. 		if(bichodir[nbi]==0)
    796. 

  796. 			{bichodir[nbi]=(rand() & 1)+1; message_effect2=1;}
    797. 

  797.          if(bichodir[nbi]==1 || bichodir[nbi]==2)
    798. 

  798. 			{
    799. 

  799. 			if(n>0) if(map_screen[n-1][m] & 3) if((rand() & 15)<4) {bichodir[nbi]=4;message_effect2=1;} 
    800. 

  800. 			if(n<21) if(map_screen[n+1][m] & 3) if((rand() & 15)<4) {bichodir[nbi]=8;message_effect2=1;} 
    801. 

  801. 			}
    802. 

  802.          else
    803. 

  803. 			{
    804. 

  804. 			{
    805. 

  805. 			if(m>0) if(map_screen[n][m-1] & 3) if((rand() & 15)<4) {bichodir[nbi]=1;message_effect2=1;} 
    806. 

  806. 			if(m<31) if(map_screen[n][m+1] & 3) if((rand() & 15)<4) {bichodir[nbi]=2;message_effect2=1;}
    807. 

  807. 			}
    808. 

  808. 			}
    809. 

  809. 		if(bichodir[nbi] & 1)
    810. 

  810. 			{
    811. 

  811. 			if(m>0) if(map_screen[n][m-1] & 3) {map_screen[n][m]&=mask2;map_screen[n][m-1]|=mask;testmove++;}
    812. 

  812. 			}
    813. 

  813. 		else
    814. 

  814. 		if(bichodir[nbi] & 2)
    815. 

  815. 			{
    816. 

  816. 			if(m<31) if(map_screen[n][m+1] & 3) {map_screen[n][m]&=mask2;map_screen[n][m+1]|=mask;testmove++;}
    817. 

  817. 			}
    818. 

  818. 		else
    819. 

  819. 		if(bichodir[nbi] & 4)
    820. 

  820. 			{
    821. 

  821. 			if(n>0) if(map_screen[n-1][m] & 3) {map_screen[n][m]&=mask2;map_screen[n-1][m]|=mask;testmove++;}
    822. 

  822. 			}
    823. 

  823. 		else
    824. 

  824. 		if(bichodir[nbi] & 8)
    825. 

  825. 			{
    826. 

  826. 			if(n<21) if(map_screen[n+1][m] & 3) {map_screen[n][m]&=mask2;map_screen[n+1][m]|=mask;testmove++;}
    827. 

  827. 			}
    828. 

  828. 		contmove++;
    829. 

  829. 		if(contmove>32 && testmove==0) { // anticuelgue
    830. 

  830. 			           contmove=0;
    831. 

  831. 					   bichodir[nbi]=0;
    832. 

  832. 						}
    833. 

  833. 		}while(testmove==0);
    834. 

  834. 	if((c & 128) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    835. 

  835. 	return;
    836. 

  836. 		}
    837. 

  837. 		
    838. 

  838. 	}
    839. 

  839. }
    840. 

  840. 

  841. }
    842. 

  842. 

  843. 

  844. void Move_Prota(unsigned pad)
    845. 

  845. {
    846. 

  846. int n,m;
    847. 

  847. unsigned char c;
    848. 

  848. for(n=0;n<nbichos;n++) Move_Bicho(n);
    849. 

  849. 

  850. //busca a mi personaje
    851. 

  851. for(n=0;n<22;n++)
    852. 

  852. {
    853. 

  853. for(m=0;m<32;m++)
    854. 

  854. 	{
    855. 

  855.     c=map_screen[n][m];
    856. 

  856. 	if(c & 128) // detectado protagonista
    857. 

  857. 		{
    858. 

  858. 		if((c & 120) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    859. 

  859. 		if((pad & PAD_LEFT) && protadir!=1)
    860. 

  860. 			{
    861. 

  861. 			if(m>0) if(map_screen[n][m-1] & 3) protadir=1;
    862. 

  862. 			}
    863. 

  863. 		else
    864. 

  864. 	    if((pad & PAD_RIGHT) && protadir!=2)
    865. 

  865. 			{
    866. 

  866. 			if(m<31) if(map_screen[n][m+1] & 3)protadir=/*(protadir  & 12) |*/ 2;
    867. 

  867. 			}	
    868. 

  868. 		else
    869. 

  869.        if((pad & PAD_UP) && protadir!=4)
    870. 

  870. 			{
    871. 

  871. 			if(n>0) if(map_screen[n-1][m] & 3)protadir=/*(protadir  & 3) |*/ 4;
    872. 

  872. 			}
    873. 

  873. 		else
    874. 

  874. 	    if((pad & PAD_DOWN) && protadir!=8)
    875. 

  875. 			{
    876. 

  876. 			if(n<21) if(map_screen[n+1][m] & 3) protadir=/*(protadir  & 3) |*/ 8;
    877. 

  877. 			}	
    878. 

  878. 			
    879. 

  879. 

  880. //protadir=1;
    881. 

  881. 		if(protadir & 1)
    882. 

  882. 			{
    883. 

  883. 			if(m>0) if(map_screen[n][m-1] & 3) {map_screen[n][m]&=127;map_screen[n][m-1]=(map_screen[n][m-1] & 0xfc) | 130;}
    884. 

  884. 			}
    885. 

  885. 		else
    886. 

  886. 		if(protadir & 2)
    887. 

  887. 			{
    888. 

  888. 			if(m<31) if(map_screen[n][m+1] & 3) {map_screen[n][m]&=127;map_screen[n][m+1]=(map_screen[n][m+1] & 0xfc) | 130;}
    889. 

  889. 			}
    890. 

  890. 		else
    891. 

  891. 		if(protadir & 4)
    892. 

  892. 			{
    893. 

  893. 			if(n>0) if(map_screen[n-1][m] & 3) {map_screen[n][m]&=127;map_screen[n-1][m]=(map_screen[n-1][m] & 0xfc) | 130;}
    894. 

  894. 			}
    895. 

  895. 		else
    896. 

  896. 		if(protadir & 8)
    897. 

  897. 			{
    898. 

  898. 			if(n<21) if(map_screen[n+1][m] & 3) {map_screen[n][m]&=127;map_screen[n+1][m]=(map_screen[n+1][m] & 0xfc) | 130;}
    899. 

  899. 			}
    900. 

  900. 	if((c & 120) && piok==0){piok=16384+(n<<5)+m;message_piok=1;}
    901. 

  901. 	return;
    902. 

  902. 		}
    903. 

  903. 		
    904. 

  904. 	}
    905. 

  905. }
    906. 

  906. 

  907. }
    908. 

  908. 

  909. 

  910. /****************************************************************************************************************************************/
    911. 

  911. //  SONIDO (generación)
    912. 

  912. /****************************************************************************************************************************************/
    913. 

  913. 

  914. 

  915. 

  916. int time1_sound=0;
    917. 

  917. int time2_sound=0;
    918. 

  918. int time3_sound=0;
    919. 

  919. int time4_sound=0;
    920. 

  920. int count_sound=0;
    921. 

  921. int count2_sound=0;
    922. 

  922. int vol_sound=0;
    923. 

  923. int mod_sound=1;
    924. 

  924. 

  925. /* set_sonido
    926. 

  926. vol=volumen (0-0x7fff)
    927. 

  927. hz=frecuencia en hz del sonido
    928. 

  928. time_on=tiempo en ms que se reproduce la onda
    929. 

  929. time_off=tiempo en ms deonda en off (intermitencia)
    930. 

  930. times=numero de veces que se repite (-1=infinito)
    931. 

  931. */
    932. 

  932. 

  933. void set_sonido(int vol,int hz,int time_on,int time_off,int times) // programa un sonido
    934. 

  934. {
    935. 

  935. int a;
    936. 

  936. time4_sound=0;
    937. 

  937. //time_on>>=1;
    938. 

  938. //time_off>>=1;
    939. 

  939. vol_sound=vol;
    940. 

  940. a=44100/hz;
    941. 

  941. if(a==0) a=2;
    942. 

  942. time1_sound=a;
    943. 

  943. time_on=(11025*time_on)/(a*1000);
    944. 

  944. if(time_on==0) time_on=1;
    945. 

  945. time2_sound=time_on;
    946. 

  946. time3_sound=(11025*time_off)/1000;
    947. 

  947. time4_sound=times;
    948. 

  948. 

  949. }
    950. 

  950. 

  951. // mezclador de audio de las SDL llamado como eventos
    952. 

  952. 

  953. void mixaudio(void *unused, u8 *stream, int len)
    954. 

  954. {
    955. 

  955. 

  956. int n;
    957. 

  957. 

  958. int mid;
    959. 

  959. short *pu;
    960. 

  960. mid=time1_sound>>1;
    961. 

  961. pu=(short *) stream;
    962. 

  962. for(n=0;n<(len>>2);n++)
    963. 

  963. 	{
    964. 

  964. 	if(time4_sound!=0)
    965. 

  965. 		{
    966. 

  966. 		if(count2_sound<time2_sound)
    967. 

  967. 			{
    968. 

  968. 			if(count_sound==mid) {pu[0]=pu[1]=0;pu+=2;} else 
    969. 

  969. 			if(count_sound<mid) {pu[0]=pu[1]=vol_sound;pu+=2;} else {pu[0]=pu[1]=-vol_sound;pu+=2;}
    970. 

  970. 			count_sound++;if(count_sound>=time1_sound) {count_sound=0;count2_sound++;}
    971. 

  971. 			}
    972. 

  972. 		else
    973. 

  973. 			{
    974. 

  974. 			if(count_sound<time3_sound) {pu[0]=pu[1]=0;pu+=2;count_sound++;} 
    975. 

  975. 			else {count_sound=count2_sound=0;if(time4_sound>0) time4_sound--;}
    976. 

  976. 			}
    977. 

  977. 		}
    978. 

  978. 	}
    979. 

  979. 

  980. }
    981. 

  981.    
    982. 

  982. 

  983. /****************************************************************************************************************************************/
    984. 

  984. //  MAIN
    985. 

  985. /****************************************************************************************************************************************/
    986. 

  986. 

  987. unsigned oldtime=0; // se usa para conocer el tiempo transcurrido en ms
    988. 

  988. int count20ms=0; // variable rara vinculada al temporizador
    989. 

  989. 

  990. //int temp_keys,new_keys=0,old_keys=0; // usadas para leer el pad 
    991. 

  991. 

  992. static short pcmout[2][2048];
    993. 

  993. int pcm_flip=0;
    994. 

  994. 

  995. static void audio_add_callback(int voice)
    996. 

  996. {
    997. 

  997. 	if(SND_TestVoiceBufferReady(1)==1)
    998. 

  998. 	{
    999. 

  999. 	//void mixaudio(void *unused, u8 *stream, int len)
    1000. 

  1000. 	mixaudio(NULL,  (void *) &pcmout[pcm_flip][0],2048);
    1001. 

  1001. 	if(SND_AddVoice(1, (void *) &pcmout[pcm_flip][0],2048)==0) 
    1002. 

  1002. 		{
    1003. 

  1003. 		pcm_flip^=1;
    1004. 

  1004. 		}
    1005. 

  1005. 	}
    1006. 

  1006. }
    1007. 

  1007. 

  1008. 

  1009. 

  1010. int pintor()
    1011. 

  1011. {
    1012. 

  1012. 

  1013. unsigned time1,n;
    1014. 

  1014.     
    1015. 

  1015. 

  1016. video=malloc(SIZEVIDEO);
    1017. 

  1017. //video_text=memalign(32,WIDTH*HEIGHT*4);
    1018. 

  1018. 

  1019. SND_SetVoice(1, VOICE_STEREO_16BIT, 11025*2,0, (void *) &pcmout[pcm_flip][0], 2048, 63, 63, audio_add_callback);
    1020. 

  1020. pcm_flip^=1;
    1021. 

  1021. 

  1022. 

  1023. 

  1024. /////////////////////////////////////////////////////////////
    1025. 

  1025. do
    1026. 

  1026. {
    1027. 

  1027. ACTMAP=0;
    1028. 

  1028. vidas=3;
    1029. 

  1029. puntos=0;
    1030. 

  1030. pausa=0;
    1031. 

  1031. 

  1032. do
    1033. 

  1033. {
    1034. 

  1034. copyMAP();
    1035. 

  1035. 

  1036. new_pad=old_pad=0;
    1037. 

  1037. 

  1038. while(1==1) // bucle principal donde se desarrolla toda la accion :O
    1039. 

  1039. {
    1040. 

  1040. 

  1041. if(!time4_sound && !pausa) 
    1042. 

  1042. 	{if(message_effect1) {mod_sound=0;message_effect1=0; set_sonido(127<<8,1200,125,0,1);}
    1043. 

  1043. 	 else
    1044. 

  1044. 	if(message_effect2) {mod_sound=1;message_effect2=0; set_sonido((63<<8),300,75,125,1);}
    1045. 

  1045.        else /*if(message_effect1)*/ {mod_sound=1;message_effect1=0;  set_sonido((32<<8),150,60,125,1);}
    1046. 

  1046. 	}
    1047. 

  1047. 

  1048. if(rings>=map_screen_rings[ACTMAP]) break; // pasa a sigueinte pantalla
    1049. 

  1049. 

  1050. 		
    1051. 

  1051. if(PADEVENT) 
    1052. 

  1052. 	    {
    1053. 

  1053. 		PADEVENT=0; // anula el evento (lectura cada 20ms, recuerda)
    1054. 

  1054.         
    1055. 

  1055.         #define J_DEATHZ 64 // death zone for sticks
    1056. 

  1056. 

  1057.         if(pad_alive)
    1058. 

  1058.             {
    1059. 

  1059. 		    if(paddata.ANA_R_V > (127+J_DEATHZ)) old_pad|=BUTTON_DOWN;
    1060. 

  1060.             if(paddata.ANA_R_V < (127-J_DEATHZ)) old_pad|=BUTTON_UP;
    1061. 

  1061.             if(paddata.ANA_L_V > (127+J_DEATHZ)) old_pad|=BUTTON_DOWN;
    1062. 

  1062.             if(paddata.ANA_L_V < (127-J_DEATHZ)) old_pad|=BUTTON_UP;
    1063. 

  1063. 

  1064.             if(paddata.ANA_R_H > (127+J_DEATHZ)) old_pad|=BUTTON_RIGHT;
    1065. 

  1065.             if(paddata.ANA_R_H < (127-J_DEATHZ)) old_pad|=BUTTON_LEFT;
    1066. 

  1066.             if(paddata.ANA_L_H > (127+J_DEATHZ)) old_pad|=BUTTON_RIGHT;
    1067. 

  1067.             if(paddata.ANA_L_H < (127-J_DEATHZ)) old_pad|=BUTTON_LEFT;
    1068. 

  1068. 

  1069.             pad_alive = 0;
    1070. 

  1070.             }
    1071. 

  1071. 

  1072.         /*
    1073. 

    1074. 

  1074. 		if(wmote_datas!=NULL && wmote_datas->exp.type==WPAD_EXP_CLASSIC)
    1075. 

  1075. 			{
    1076. 

  1076.  
    1077. 

  1077. 			if(temp_pad & WPAD_CLASSIC_BUTTON_UP) temp_pad|=BUTTON_RIGHT;
    1078. 

    1079. 

  1079. 			if(temp_pad & WPAD_CLASSIC_BUTTON_DOWN) temp_pad|=BUTTON_LEFT;
    1080. 

  1080. 		
    1081. 

  1081. 			if(temp_pad & WPAD_CLASSIC_BUTTON_LEFT) temp_pad|=BUTTON_UP;
    1082. 

    1083. 

  1083. 			if(temp_pad & WPAD_CLASSIC_BUTTON_RIGHT) temp_pad|=BUTTON_DOWN;
    1084. 

  1084. 			
    1085. 

  1085. 			if(new_pad & WPAD_CLASSIC_BUTTON_A) new_pad|=BUTTON_CROSS;
    1086. 

  1086. 			if(old_pad & WPAD_CLASSIC_BUTTON_A) old_pad|=BUTTON_CROSS;
    1087. 

    1088. 

  1088. 			if(new_pad & WPAD_CLASSIC_BUTTON_B) new_pad|=WPAD_BUTTON_B;
    1089. 

  1089. 			if(old_pad & WPAD_CLASSIC_BUTTON_B) old_pad|=WPAD_BUTTON_B;
    1090. 

    1091. 

  1091. 			if(new_pad & WPAD_CLASSIC_BUTTON_X) new_pad|=WPAD_BUTTON_1;
    1092. 

  1092. 			if(old_pad & WPAD_CLASSIC_BUTTON_X) old_pad|=WPAD_BUTTON_1;
    1093. 

    1094. 

  1094. 			if(new_pad & WPAD_CLASSIC_BUTTON_Y) new_pad|=WPAD_BUTTON_2;
    1095. 

  1095. 			if(old_pad & WPAD_CLASSIC_BUTTON_Y) old_pad|=WPAD_BUTTON_2;
    1096. 

    1097. 

  1097. 			if(new_pad & WPAD_CLASSIC_BUTTON_HOME) new_pad|=BUTTON_START;
    1098. 

  1098. 			if(old_pad & WPAD_CLASSIC_BUTTON_HOME) old_pad|=WPAD_BUTTON_HOME;
    1099. 

  1099. 			}
    1100. 

  1100.         */
    1101. 

  1101.         
    1102. 

  1102.         if(new_pad & BUTTON_START) {goto sal_del_juego;}
    1103. 

  1103. 

  1104.         if((new_pad & BUTTON_SQUARE)) {pause_audio^=1;PauseAudio(pause_audio);}
    1105. 

  1105. 		
    1106. 

  1106. 		if(ACTMAP==0)
    1107. 

  1107. 		{
    1108. 

  1108. 		if((new_pad & BUTTON_CROSS)) {pausa=0;rings=500;screen_count0 = -128;} // empieza
    1109. 

  1109. 		// ajusta bichos
    1110. 

  1110. 		if(new_pad & (BUTTON_UP)) {nbichos--;if(nbichos<2) nbichos=2;copyMAP();}
    1111. 

  1111. 		if(new_pad & (BUTTON_DOWN)) {nbichos++;if(nbichos>4) nbichos=4;copyMAP();}
    1112. 

  1112. 		}
    1113. 

  1113. 		// pausa
    1114. 

  1114. 		
    1115. 

  1115. 		if(new_pad & BUTTON_SELECT) pausa^=1;
    1116. 

  1116. 		
    1117. 

  1117.         
    1118. 

  1118. 		 
    1119. 

  1119. 		 }
    1120. 

  1120. time1=GetTicks();
    1121. 

  1121. count20ms=(time1-oldtime)/20;
    1122. 

  1122. //if(count20ms & 1) {
    1123. 

  1123. /*if(PADEVENT==0) 
    1124. 

  1124. 	{
    1125. 

    1126. 

  1126. 	
    1127. 

  1127. 	
    1128. 

  1128. 	PADEVENT=1;}
    1129. 

  1129. //	}
    1130. 

  1130. */
    1131. 

  1131. //if(pausa) count20ms=0;
    1132. 

  1132. 

  1133. if(count20ms>8 || pausa)
    1134. 

  1134. 	{
    1135. 

  1135. 	oldtime=time1;
    1136. 

  1136. 	
    1137. 

  1137. 	if(!pausa) Move_Prota(old_pad);DrawMAP();DrawScreen();
    1138. 

  1138. 	count20ms=0;
    1139. 

  1139. 	}
    1140. 

  1140. 

  1141. if(piok) break;
    1142. 

  1142. }
    1143. 

  1143. n=0;
    1144. 

  1144. if(piok==0) 
    1145. 

  1145. { // rutina fin de pantalla
    1146. 

  1146. message_scroll=1;
    1147. 

  1147. set_sonido(127<<8,200,100,100,-1);mod_sound=0;
    1148. 

  1148. //n=100;
    1149. 

  1149. while(n<36)
    1150. 

  1150. 	{
    1151. 

  1151. 	time1=GetTicks();
    1152. 

  1152. 	count20ms=(time1-oldtime)/20;
    1153. 

  1153. 	
    1154. 

  1154. 	if(count20ms>2)
    1155. 

  1155. 	{
    1156. 

  1156. 	oldtime=time1;
    1157. 

  1157. 	n++;scrollMAP();
    1158. 

  1158. 	count20ms=0;
    1159. 

  1159. 	}
    1160. 

  1160. 	
    1161. 

  1161. 	
    1162. 

  1162. 	DrawMAP();DrawScreen();
    1163. 

  1163. 	}
    1164. 

  1164. 	
    1165. 

  1165. ACTMAP++;mod_sound=1;time4_sound=0;
    1166. 

  1166. }
    1167. 

  1167. else
    1168. 

  1168. 	{ 
    1169. 

  1169. 		 
    1170. 

  1170. 	Borra_Prota();
    1171. 

  1171. 	mod_sound=0;
    1172. 

  1172. 

  1173. 	while(n<26)
    1174. 

  1174. 	{
    1175. 

  1175. 

  1176. 	
    1177. 

  1177. 	time1=GetTicks();   
    1178. 

  1178. 	count20ms=(time1-oldtime)/20;
    1179. 

  1179. 	
    1180. 

  1180. 	if(count20ms>2)
    1181. 

  1181. 	{
    1182. 

  1182. 	n++;set_sonido(127<<8,1900-300*n/26,50,0,1);
    1183. 

  1183. 

  1184. 	oldtime=time1;
    1185. 

  1185.     map_screen[(piok>>5) & 31][piok & 31]&=127;
    1186. 

  1186.     if(((piok>>5) & 31)<21)
    1187. 

  1187. 		{
    1188. 

  1188. 		piok+=32;
    1189. 

  1189. 		map_screen[(piok>>5) & 31][piok & 31]&=0xf8;
    1190. 

  1190. 		map_screen[(piok>>5) & 31][piok & 31]|=130;
    1191. 

  1191. 		}
    1192. 

  1192. 	count20ms=0;
    1193. 

  1193. 	}
    1194. 

  1194. 	
    1195. 

  1195. 	DrawMAP();DrawScreen();
    1196. 

  1196. 	}
    1197. 

  1197. 	mod_sound=1;time4_sound=0;
    1198. 

  1198. 	
    1199. 

  1199.     vidas--;
    1200. 

  1200. 	}
    1201. 

  1201. 	
    1202. 

  1202. if(vidas<=0) break;
    1203. 

  1203. 

  1204. if(map_screen_rings[ACTMAP]==0) ACTMAP=1;
    1205. 

  1205. }while(map_screen_rings[ACTMAP]!=0);
    1206. 

  1206. 

  1207. }while(1);
    1208. 

  1208. 

  1209. sal_del_juego:
    1210. 

  1210. 

  1211. SND_StopVoice(1);
    1212. 

  1212. if(video) free(video); video=NULL;
    1213. 

  1213. //if(video_text) free(video_text); video_text=NULL;
    1214. 

  1214. 

  1215. return 0;
    1216. 

  1216. }
    1217.