Rev 1931 | Details | Compare with Previous | Last modification | View Log
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 8 | dimkam | 1 | #include <stdio.h> |
| 2 | #include <stdlib.h> |
||
| 930 | alone | 3 | //#include <mem.h> |
| 8 | dimkam | 4 | #include <string.h> |
| 5 | |||
| 6 | #define _STRMAX 79 |
||
| 7 | |||
| 8 | #define BYTE unsigned char |
||
| 267 | alone | 9 | #define UINT unsigned int |
| 8 | dimkam | 10 | #define MAXDEFB 8 |
| 11 | |||
| 12 | #define MASKCOLOR 0x00 |
||
| 13 | |||
| 14 | BYTE filebuf[65536]; |
||
| 15 | char labelbuf[_STRMAX+1]; |
||
| 16 | char formatlabelbuf[_STRMAX+1]; |
||
| 1397 | alone | 17 | char commentlabelbuf[_STRMAX+1]; |
| 8 | dimkam | 18 | BYTE sizeword[4]; |
| 1890 | alone | 19 | BYTE pic[2048][1024]; |
| 20 | BYTE pixrow[2048/8+1][1024+1024]; |
||
| 8 | dimkam | 21 | #define PIXROWSHIFT 1024 |
| 1890 | alone | 22 | BYTE maskrow[2048/8+1][1024]; |
| 23 | //BYTE pixrowshift[2048/8][1024]; //>>4 |
||
| 24 | BYTE attrrow[2048/8+1]; |
||
| 400 | alone | 25 | BYTE pal[64]; |
| 8 | dimkam | 26 | |
| 273 | alone | 27 | #define CONVORDERSZ 1024 |
| 28 | |||
| 29 | int convorderx[CONVORDERSZ]; // |
||
| 30 | int convordery[CONVORDERSZ]; // |
||
| 31 | |||
| 1033 | alone | 32 | int sprcount; |
| 1399 | alone | 33 | int vertsprcount; |
| 1033 | alone | 34 | |
| 1397 | alone | 35 | BYTE numok; |
| 36 | |||
| 8 | dimkam | 37 | BYTE ink; |
| 38 | BYTE paper; |
||
| 39 | BYTE curink; |
||
| 40 | BYTE curpaper; |
||
| 41 | BYTE defaultcolor; |
||
| 42 | |||
| 43 | char sprformat; |
||
| 1931 | alone | 44 | char globalsprformat; |
| 1930 | alone | 45 | BYTE invattr; |
| 46 | BYTE forceattr; |
||
| 8 | dimkam | 47 | |
| 48 | int hgt; |
||
| 49 | int wid; |
||
| 50 | int bpp; |
||
| 51 | |||
| 273 | alone | 52 | void skiplf(FILE * fin) |
| 53 | { //, 0x0d , 0x0a |
||
| 54 | char c; |
||
| 55 | do{ |
||
| 56 | if (!fread(&c,1,1,fin)) break; |
||
| 57 | }while (c!=0x0a); |
||
| 58 | } |
||
| 59 | |||
| 1397 | alone | 60 | void readcomment(FILE * fin, char * s) |
| 61 | { //, 0x0d , 0x0a |
||
| 62 | char c; |
||
| 63 | unsigned int i; |
||
| 64 | i = 0; |
||
| 65 | do{ |
||
| 66 | if (!fread(&c,1,1,fin)) break; |
||
| 67 | if (i==_STRMAX) break; |
||
| 68 | s[i] = c; |
||
| 69 | i++; |
||
| 70 | }while (c!=0x0a); |
||
| 71 | s[i] = '\0'; |
||
| 72 | } |
||
| 73 | |||
| 8 | dimkam | 74 | int readnum(FILE * fin) |
| 75 | { |
||
| 76 | char c; |
||
| 77 | int num; |
||
| 273 | alone | 78 | int sign=1; |
| 8 | dimkam | 79 | num = 0; |
| 80 | do{ |
||
| 81 | if (!fread(&c,1,1,fin)) break; |
||
| 273 | alone | 82 | if (c==' ') goto skip; |
| 83 | //if (c == 0x0d) goto skip; |
||
| 84 | //if (c == 0x0a) break; |
||
| 1930 | alone | 85 | if (c=='!') {forceattr = 0xff; goto skip;}; |
| 273 | alone | 86 | if (c=='-') {sign = -1; goto skip;}; |
| 8 | dimkam | 87 | if ((c<'0')||(c>'9')) break; // 0x0a |
| 88 | num = num*10 + (int)(c-'0'); |
||
| 1397 | alone | 89 | numok = 0xff; |
| 273 | alone | 90 | skip: |
| 420 | dimkam | 91 | ; |
| 8 | dimkam | 92 | }while(1); |
| 273 | alone | 93 | num = num*sign; |
| 8 | dimkam | 94 | return num; |
| 95 | } |
||
| 96 | |||
| 97 | unsigned int readlabel(FILE * fin, char * s) |
||
| 98 | { |
||
| 99 | char c; |
||
| 100 | unsigned int i; |
||
| 101 | int iscomment; |
||
| 1033 | alone | 102 | sprcount = 0; |
| 1399 | alone | 103 | vertsprcount = 0; |
| 8 | dimkam | 104 | do{ |
| 105 | i = 0; |
||
| 106 | iscomment = 0; |
||
| 107 | do{ |
||
| 108 | if (!fread(&c,1,1,fin)) break; |
||
| 109 | if (c == ';') iscomment = -1; |
||
| 1931 | alone | 110 | if (c == '~') {invattr = 0xff; continue;} |
| 1930 | alone | 111 | if (c == '$') { // |
| 1399 | alone | 112 | if (iscomment) continue; // $ |
| 113 | while (1) { |
||
| 114 | if (!fread(&c,1,1,fin)) return 0; |
||
| 115 | if ((c < '0') || (c > '9')) break; |
||
| 116 | vertsprcount = vertsprcount*10; |
||
| 117 | vertsprcount = vertsprcount + (int)(c-'0'); |
||
| 118 | }; |
||
| 119 | }; |
||
| 1930 | alone | 120 | if (c == '#') { // |
| 1033 | alone | 121 | if (iscomment) continue; // # |
| 122 | while (1) { |
||
| 123 | if (!fread(&c,1,1,fin)) return 0; |
||
| 1399 | alone | 124 | if ((c < '0') || (c > '9')) break; |
| 1033 | alone | 125 | sprcount = sprcount*10; |
| 126 | sprcount = sprcount + (int)(c-'0'); |
||
| 127 | }; |
||
| 128 | }; |
||
| 1930 | alone | 129 | if ((c == '=')||(c == ',')) { |
| 8 | dimkam | 130 | if (iscomment) continue; // = |
| 131 | break; |
||
| 132 | }; |
||
| 133 | if (c == 0x0d) continue; |
||
| 134 | if (c == 0x0a) { |
||
| 135 | if (iscomment) break; // |
||
| 136 | continue; |
||
| 137 | }; |
||
| 138 | if (i==_STRMAX) break; |
||
| 139 | s[i] = c; |
||
| 140 | i++; |
||
| 141 | }while(1); |
||
| 142 | s[i] = '\0'; |
||
| 143 | }while(iscomment); |
||
| 144 | return i; |
||
| 145 | } |
||
| 146 | |||
| 147 | int read4b(FILE * fin) |
||
| 148 | { |
||
| 149 | fread(sizeword, 4, 1, fin); |
||
| 150 | return sizeword[0] + (sizeword[1]<<8) + (sizeword[2]<<16) + (sizeword[3]<<24); |
||
| 151 | } |
||
| 152 | |||
| 153 | BYTE colstat[256]; |
||
| 154 | |||
| 1033 | alone | 155 | char numbuf[256]; |
| 156 | |||
| 157 | UINT maxsprcount; |
||
| 158 | UINT cursprcount; |
||
| 1399 | alone | 159 | UINT maxvertsprcount; |
| 160 | UINT curvertsprcount; |
||
| 1033 | alone | 161 | |
| 162 | void putlabel(char * labelbuf, FILE * fout) |
||
| 163 | { |
||
| 164 | UINT num; |
||
| 165 | UINT i; |
||
| 166 | fputs(labelbuf, fout); |
||
| 1399 | alone | 167 | if (maxvertsprcount != 0) { |
| 168 | fputc('_', fout); |
||
| 169 | fputc('_', fout); |
||
| 170 | num = curvertsprcount; |
||
| 171 | |||
| 172 | i = 0; |
||
| 173 | do { |
||
| 174 | numbuf[i] = (char)((UINT)'0' + (num - (num/10)*10)); |
||
| 175 | num = num/10; |
||
| 176 | i++; |
||
| 177 | } while (num != 0); |
||
| 178 | |||
| 179 | do { |
||
| 180 | i--; |
||
| 181 | fputc(numbuf[i], fout); |
||
| 182 | } while (i != 0); |
||
| 183 | }; |
||
| 1033 | alone | 184 | if (maxsprcount != 0) { |
| 185 | fputc('_', fout); |
||
| 186 | num = cursprcount; |
||
| 187 | |||
| 188 | i = 0; |
||
| 189 | do { |
||
| 190 | numbuf[i] = (char)((UINT)'0' + (num - (num/10)*10)); |
||
| 191 | num = num/10; |
||
| 192 | i++; |
||
| 193 | } while (num != 0); |
||
| 194 | |||
| 195 | do { |
||
| 196 | i--; |
||
| 197 | fputc(numbuf[i], fout); |
||
| 198 | } while (i != 0); |
||
| 199 | }; |
||
| 200 | return; |
||
| 201 | } |
||
| 202 | |||
| 8 | dimkam | 203 | void findinkpaper(int x, int y) // 0x00 |
| 204 | { |
||
| 205 | //BYTE b; |
||
| 206 | int i; |
||
| 207 | int j; |
||
| 208 | BYTE col1; |
||
| 209 | BYTE col1stat; |
||
| 210 | BYTE col2; |
||
| 211 | BYTE col2stat; |
||
| 212 | BYTE col3; |
||
| 213 | BYTE col3stat; |
||
| 214 | BYTE col4; |
||
| 215 | BYTE col4stat; // : MASKCOLOR, RED, red, anothercolor |
||
| 216 | i = 0; do {colstat[i] = 0x00; i++;}while (i!=256); |
||
| 217 | |||
| 218 | //col1 = pic[x][y]; |
||
| 219 | j = y; |
||
| 220 | while (j < (y+8)) { |
||
| 221 | // b = 0x00; |
||
| 222 | i = x; |
||
| 223 | while (i < (x+8)) { |
||
| 224 | colstat[pic[i][j]]++; |
||
| 225 | //b = pic[i][j]; |
||
| 226 | //if (b!=col1) col2 = b; |
||
| 227 | i++; |
||
| 228 | }; |
||
| 229 | j++; |
||
| 230 | }; |
||
| 231 | |||
| 232 | // MASKCOLOR |
||
| 233 | col1 = MASKCOLOR; col1stat = 0; //fix 27.12.2018 |
||
| 234 | col2 = MASKCOLOR; col2stat = 0; //fix 27.12.2018 |
||
| 235 | col3 = MASKCOLOR; col3stat = 0; //fix 27.12.2018 |
||
| 236 | col4 = MASKCOLOR; col3stat = 0; //fix 27.12.2018 |
||
| 237 | i = 0; do { //fix 27.12.2018 ( MASKCOLOR!=0) |
||
| 238 | if (colstat[i] > col1stat) { |
||
| 239 | col4 = col3; |
||
| 240 | col4stat = col3stat; |
||
| 241 | col3 = col2; |
||
| 242 | col3stat = col2stat; |
||
| 243 | col2 = col1; |
||
| 244 | col2stat = col1stat; |
||
| 245 | col1 = (BYTE)i; |
||
| 246 | col1stat = colstat[i]; |
||
| 247 | }else if (colstat[i] > col2stat) { |
||
| 248 | col4 = col3; |
||
| 249 | col4stat = col3stat; |
||
| 250 | col3 = col2; |
||
| 251 | col3stat = col2stat; |
||
| 252 | col2 = (BYTE)i; |
||
| 253 | col2stat = colstat[i]; |
||
| 254 | }else if (colstat[i] > col3stat) { |
||
| 255 | col4 = col3; |
||
| 256 | col4stat = col3stat; |
||
| 257 | col3 = (BYTE)i; |
||
| 258 | col3stat = colstat[i]; |
||
| 259 | }else if (colstat[i] > col4stat) { |
||
| 260 | col4 = (BYTE)i; |
||
| 261 | col4stat = colstat[i]; |
||
| 262 | }; |
||
| 263 | i++; |
||
| 264 | }while (i!=16); //fix 27.12.2018 |
||
| 265 | |||
| 266 | //MASKCOLOR , |
||
| 267 | if (col1==MASKCOLOR) { |
||
| 268 | col1 = col2; |
||
| 269 | col2 = MASKCOLOR; |
||
| 270 | }; |
||
| 271 | if (col2==MASKCOLOR) { |
||
| 272 | col2 = col3; |
||
| 273 | col3 = MASKCOLOR; |
||
| 274 | }; |
||
| 275 | if (col3==MASKCOLOR) { |
||
| 276 | col3 = col4; |
||
| 277 | col4 = MASKCOLOR; |
||
| 278 | }; |
||
| 279 | |||
| 280 | //col1 MASKCOLOR , MASKCOLOR |
||
| 281 | // 0x00 , 0x08 0x00 ( bright) |
||
| 282 | //if ((col1&0x07)==0x00) col1 = (BYTE)(defaultcolor&0x08); //fix 27.12.2018 |
||
| 283 | //if ((col2&0x07)==0x00) col2 = (BYTE)(defaultcolor&0x08); //fix 27.12.2018 |
||
| 284 | /** if (col2 == MASKCOLOR) { |
||
| 285 | if (col1 == MASKCOLOR) { |
||
| 286 | col2 = (BYTE)((col1&0x08) | (defaultcolor&0x07)); |
||
| 287 | }else { |
||
| 288 | col2 = (BYTE)((col1&0x08) | (defaultcolor&0x07)); |
||
| 289 | }; |
||
| 290 | };*/ //fix 27.12.2018 |
||
| 291 | if (((col2&0x07)==(col1&0x07)) /**&& (col2!=0x00)*/) col2 = col3; //same colour with another bright |
||
| 292 | ink = col1; |
||
| 293 | paper = col2; // |
||
| 294 | //paper MASKCOLOR ( , ) |
||
| 295 | //ink MASKCOLOR , MASKCOLOR |
||
| 296 | } |
||
| 297 | |||
| 298 | void setcurinkpaper(BYTE* pcurink, BYTE* pcurpaper) |
||
| 299 | //paper MASKCOLOR ( , ) |
||
| 300 | //ink MASKCOLOR , MASKCOLOR |
||
| 301 | //*pcurink, *curpaper |
||
| 302 | // *pcurink, *curpaper, 0x08 0x00 ( ) |
||
| 303 | { |
||
| 304 | BYTE t; |
||
| 1647 | alone | 305 | if ((sprformat == 's')||(sprformat == 'y')||(sprformat == 'Z')||(sprformat == 'z')||(sprformat == 'W')||(sprformat == 'w')) { |
| 8 | dimkam | 306 | paper = 0x08; |
| 307 | ink = 0x0f; |
||
| 308 | }; // ( 0x00) |
||
| 1479 | alone | 309 | |
| 28 | Alone | 310 | //27.02.2019: |
| 311 | // [ ?] |
||
| 312 | // defaultcolor, |
||
| 313 | #define MINCOLORWITHBLACKBG 0x04 |
||
| 8 | dimkam | 314 | //fix 27.12.2018: |
| 315 | if (((ink&0x07)==(*pcurink&0x07)) && (ink!=MASKCOLOR)) { //ink |
||
| 316 | *pcurink = ink; |
||
| 317 | if (paper==MASKCOLOR) { |
||
| 28 | Alone | 318 | *pcurpaper = ((ink&0x07)<MINCOLORWITHBLACKBG) ? ((ink&0x07)?((defaultcolor&0x07)|(ink&0x08)):defaultcolor) : 0x00; |
| 8 | dimkam | 319 | }else { |
| 320 | *pcurpaper = paper; |
||
| 321 | }; |
||
| 322 | }else if (((paper&0x07)==(*pcurpaper&0x07)) && (paper!=MASKCOLOR)) { //paper |
||
| 323 | *pcurpaper = paper; |
||
| 324 | if (ink==MASKCOLOR) { |
||
| 28 | Alone | 325 | *pcurink = ((paper&0x07)<MINCOLORWITHBLACKBG) ? ((paper&0x07)?((defaultcolor&0x07)|(paper&0x08)):defaultcolor) : 0x00; |
| 8 | dimkam | 326 | }else { |
| 327 | *pcurink = ink; |
||
| 328 | }; |
||
| 329 | }else if (((paper&0x07)==(*pcurink&0x07)) && (paper!=MASKCOLOR)) { //paper ink |
||
| 330 | *pcurink = paper; |
||
| 331 | if (ink==MASKCOLOR) { |
||
| 28 | Alone | 332 | *pcurpaper = ((paper&0x07)<MINCOLORWITHBLACKBG) ? ((paper&0x07)?((defaultcolor&0x07)|(paper&0x08)):defaultcolor) : 0x00; |
| 8 | dimkam | 333 | }else { |
| 334 | *pcurpaper = ink; |
||
| 335 | }; |
||
| 336 | }else if (((ink&0x07)==(*pcurpaper&0x07)) && (ink!=MASKCOLOR)) { //ink paper |
||
| 337 | *pcurpaper = ink; |
||
| 338 | if (paper==MASKCOLOR) { |
||
| 28 | Alone | 339 | *pcurink = ((ink&0x07)<MINCOLORWITHBLACKBG) ? ((ink&0x07)?((defaultcolor&0x07)|(ink&0x08)):defaultcolor) : 0x00; |
| 8 | dimkam | 340 | }else { |
| 341 | *pcurink = paper; |
||
| 342 | }; |
||
| 343 | }else if ((ink==MASKCOLOR)&&(paper==MASKCOLOR)) { // MASKCOLOR |
||
| 344 | ink = defaultcolor; |
||
| 345 | paper = 0x08; |
||
| 346 | }else { // , MASKCOLOR |
||
| 28 | Alone | 347 | if (ink == MASKCOLOR) ink = ((paper&0x07)<MINCOLORWITHBLACKBG) ? ((paper&0x07)?((defaultcolor&0x07)|(paper&0x08)):defaultcolor) : 0x00; |
| 348 | if (paper == MASKCOLOR) paper = ((ink&0x07)<MINCOLORWITHBLACKBG) ? ((ink&0x07)?((defaultcolor&0x07)|(ink&0x08)):defaultcolor) : 0x00; |
||
| 8 | dimkam | 349 | if (ink > paper) { |
| 350 | *pcurink = ink; |
||
| 351 | *pcurpaper = paper; |
||
| 352 | }else { |
||
| 353 | *pcurink = paper; |
||
| 354 | *pcurpaper = ink; |
||
| 355 | }; |
||
| 356 | }; |
||
| 1479 | alone | 357 | |
| 358 | //*pcurink = ink; |
||
| 359 | //*pcurpaper = paper; |
||
| 360 | |||
| 8 | dimkam | 361 | if (*pcurpaper==0x08) *pcurpaper = 0x00; // //fix 27.12.2018 |
| 362 | if (*pcurink==0x08) *pcurink = 0x00; // //fix 27.12.2018 |
||
| 363 | // / ink paper' ( , .. , , ink-paper) |
||
| 364 | // ink=0, 1 paper=0 |
||
| 365 | if (((*pcurink&0x07)<=0x01) && ((*pcurpaper&0x07)>(*pcurink&0x07))) { /// ( , .. ink-paper) |
||
| 366 | t = *pcurpaper; |
||
| 367 | *pcurpaper = *pcurink; |
||
| 368 | *pcurink = t; |
||
| 369 | }; |
||
| 370 | } |
||
| 371 | |||
| 372 | void emitdb(BYTE b, FILE * fout) |
||
| 373 | { |
||
| 374 | fputs("\tdb ", fout); |
||
| 375 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 376 | fputs("\n", fout); |
||
| 377 | } |
||
| 378 | |||
| 267 | alone | 379 | void emitdw(UINT u, FILE * fout) |
| 380 | { |
||
| 381 | fputs("\tdw ", fout); |
||
| 382 | fprintf(fout, "0x%x%x%x%x", (u>>12)&0x0f, (u>>8)&0x0f, (u>>4)&0x0f, u&0x0f); |
||
| 383 | fputs("\n", fout); |
||
| 384 | } |
||
| 385 | |||
| 8 | dimkam | 386 | void emitnops(BYTE count, FILE * fout) |
| 387 | { |
||
| 388 | fputs("\tds ", fout); |
||
| 389 | fprintf(fout, "0x%x%x", count>>4, count&0x0f); |
||
| 390 | fputs("\n", fout); |
||
| 391 | } |
||
| 392 | |||
| 393 | void emitspr(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
||
| 1931 | alone | 394 | { //b/w sprites: wid8, hgt, (antimask, antipixels, ...) ;for DizzySE! |
| 8 | dimkam | 395 | BYTE b; |
| 396 | int i; |
||
| 397 | int j; |
||
| 398 | j = y; |
||
| 399 | while (1) { |
||
| 400 | fputs("\tdb ", fout); |
||
| 401 | i = xchr; |
||
| 402 | while (1) { |
||
| 403 | b = maskrow[i][j]; |
||
| 404 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 405 | fputs(",", fout); |
||
| 406 | b = b^pixrow[i][j]; |
||
| 407 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 408 | i++; |
||
| 409 | if (i >= (xchr+sprwid8)) break; |
||
| 410 | fputs(",", fout); |
||
| 411 | }; |
||
| 412 | fputs("\n", fout); |
||
| 413 | j++; |
||
| 414 | if (j >= (y+sprhgt)) break; |
||
| 415 | }; |
||
| 416 | } |
||
| 417 | |||
| 1931 | alone | 418 | void emitcolorspr(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
| 1934 | alone | 419 | { //coloured sprite, one row of attrchrs: (mask, antipixels, ...),attr |
| 1931 | alone | 420 | BYTE b; |
| 421 | int i; |
||
| 422 | int j; |
||
| 423 | i = xchr; |
||
| 424 | while (1) { //chrs in row |
||
| 425 | fputs("\tdb ", fout); |
||
| 426 | j = y; |
||
| 427 | while (1) { //bytes in chr |
||
| 428 | b = ~maskrow[i][j]; |
||
| 429 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 430 | fputs(",", fout); |
||
| 431 | b = b ^ pixrow[i][j] ^ invattr; |
||
| 432 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 433 | j++; |
||
| 434 | if (j >= (y+8)) break; |
||
| 435 | fputs(",", fout); |
||
| 436 | }; |
||
| 437 | b = attrrow[xchr]; //0x07; |
||
| 438 | if (invattr) b = (b&0xc0) + ((b&0x07)<<3) + ((b&0x38)>>3); |
||
| 439 | if (forceattr) b = defaultcolor; |
||
| 440 | fputs(",", fout); |
||
| 441 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 442 | fputs("\n", fout); |
||
| 443 | i++; |
||
| 444 | if (i >= (xchr+sprwid8)) break; |
||
| 445 | }; |
||
| 446 | } |
||
| 447 | |||
| 1934 | alone | 448 | void emitcolorline(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
| 449 | { //for coloured line: 8 lines of pixels (no attrs) |
||
| 450 | BYTE b; |
||
| 451 | int i; |
||
| 452 | int j; |
||
| 453 | j = y; |
||
| 454 | while (1) { //lines |
||
| 455 | fputs("\tdb ", fout); |
||
| 456 | i = xchr; |
||
| 457 | while (1) { //chrs in row |
||
| 458 | b = pixrow[i][j] ^ invattr; |
||
| 459 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 460 | i++; |
||
| 461 | if (i >= (xchr+sprwid8)) break; |
||
| 462 | fputs(",", fout); |
||
| 463 | }; |
||
| 464 | fputs("\n", fout); |
||
| 465 | j++; |
||
| 466 | if (j >= (y+8)) break; |
||
| 467 | }; |
||
| 468 | } |
||
| 469 | |||
| 470 | void emitattrline(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
||
| 471 | { |
||
| 472 | BYTE b; |
||
| 473 | int i; |
||
| 474 | fputs("\tdb ", fout); |
||
| 475 | i = xchr; |
||
| 476 | while (1) { //chrs in row |
||
| 477 | b = attrrow[i]; //0x07; |
||
| 478 | if (invattr) b = (b&0xc0) + ((b&0x07)<<3) + ((b&0x38)>>3); |
||
| 479 | if (forceattr) b = defaultcolor; |
||
| 480 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 481 | i++; |
||
| 482 | if (i >= (xchr+sprwid8)) break; |
||
| 483 | fputs(",", fout); |
||
| 484 | }; |
||
| 485 | fputs("\n", fout); |
||
| 486 | } |
||
| 487 | |||
| 1647 | alone | 488 | void emitspry(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
| 489 | { |
||
| 490 | BYTE b; |
||
| 491 | int i; |
||
| 492 | int j; |
||
| 493 | i = xchr; |
||
| 494 | while (1) { |
||
| 495 | fputs("\tdb ", fout); |
||
| 496 | j = y; |
||
| 497 | while (1) { |
||
| 498 | b = ~maskrow[i][j]; |
||
| 499 | b = b^pixrow[i][j]; |
||
| 500 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 501 | fputs(",", fout); |
||
| 502 | //b = maskrow[i][j]; |
||
| 503 | b = pixrow[i][j]; |
||
| 504 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 505 | j++; |
||
| 506 | if (j >= (y+sprhgt)) break; |
||
| 507 | fputs(",", fout); |
||
| 508 | }; |
||
| 509 | fputs("\n", fout); |
||
| 510 | i++; |
||
| 511 | if (i >= (xchr+sprwid8)) break; |
||
| 512 | }; |
||
| 513 | } |
||
| 514 | |||
| 907 | alone | 515 | void emitsprw(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
| 1621 | alone | 516 | { //antipixelsline, antimaskline |
| 517 | BYTE b; |
||
| 518 | int i; |
||
| 519 | int j; |
||
| 520 | j = y; |
||
| 521 | while (1) { |
||
| 522 | fputs("\tdb ", fout); |
||
| 523 | i = xchr; |
||
| 524 | while (1) { |
||
| 525 | b = ~maskrow[i][j]; |
||
| 526 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 527 | i++; |
||
| 528 | if (i == xchr+sprwid8) break; |
||
| 529 | fputs(",", fout); |
||
| 530 | }; |
||
| 531 | fputs("\n", fout); |
||
| 532 | fputs("\tdb ", fout); |
||
| 533 | i = xchr; |
||
| 534 | while (1) { |
||
| 535 | b = ~maskrow[i][j]; |
||
| 536 | b ^= pixrow[i][j]; |
||
| 537 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 538 | i++; |
||
| 539 | if (i == xchr+sprwid8) break; |
||
| 540 | fputs(",", fout); |
||
| 541 | }; |
||
| 542 | fputs("\n", fout); |
||
| 543 | j++; |
||
| 544 | if (j >= (y+sprhgt)) break; |
||
| 545 | }; |
||
| 546 | } |
||
| 547 | |||
| 548 | void emitsprwback(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
||
| 907 | alone | 549 | { //antipixelsw, antimaskw |
| 550 | BYTE b; |
||
| 551 | int i; |
||
| 552 | int j; |
||
| 553 | j = y; |
||
| 554 | while (1) { |
||
| 555 | fputs("\tdb ", fout); |
||
| 556 | i = xchr+sprwid8; |
||
| 557 | while (1) { |
||
| 558 | i--; |
||
| 559 | b = ~maskrow[i][j]; |
||
| 560 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 561 | if (i == xchr) break; |
||
| 562 | fputs(",", fout); |
||
| 563 | }; |
||
| 564 | fputs("\n", fout); |
||
| 565 | fputs("\tdb ", fout); |
||
| 566 | i = xchr+sprwid8; |
||
| 567 | while (1) { |
||
| 568 | i--; |
||
| 569 | b = ~maskrow[i][j]; |
||
| 570 | b ^= pixrow[i][j]; |
||
| 571 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 572 | if (i == xchr) break; |
||
| 573 | fputs(",", fout); |
||
| 574 | }; |
||
| 575 | fputs("\n", fout); |
||
| 576 | j++; |
||
| 577 | if (j >= (y+sprhgt)) break; |
||
| 578 | }; |
||
| 579 | } |
||
| 580 | |||
| 972 | alone | 581 | void emitsprwnomask(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
| 582 | { //antipixelsw |
||
| 583 | BYTE b; |
||
| 584 | int i; |
||
| 585 | int j; |
||
| 586 | j = y; |
||
| 587 | while (1) { |
||
| 588 | fputs("\tdb ", fout); |
||
| 1392 | alone | 589 | i = xchr; |
| 590 | while (1) { |
||
| 591 | b = ~maskrow[i][j]; |
||
| 592 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 593 | i++; |
||
| 594 | if (i == xchr+sprwid8) break; |
||
| 595 | fputs(",", fout); |
||
| 596 | }; |
||
| 597 | fputs("\n", fout); |
||
| 598 | j++; |
||
| 599 | if (j >= (y+sprhgt)) break; |
||
| 600 | }; |
||
| 601 | } |
||
| 602 | |||
| 603 | void emitsprwnomaskback(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
||
| 604 | { //antipixelsw |
||
| 605 | BYTE b; |
||
| 606 | int i; |
||
| 607 | int j; |
||
| 608 | j = y; |
||
| 609 | while (1) { |
||
| 610 | fputs("\tdb ", fout); |
||
| 972 | alone | 611 | i = xchr+sprwid8; |
| 612 | while (1) { |
||
| 613 | i--; |
||
| 614 | b = ~maskrow[i][j]; |
||
| 615 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 616 | if (i == xchr) break; |
||
| 617 | fputs(",", fout); |
||
| 618 | }; |
||
| 619 | fputs("\n", fout); |
||
| 620 | j++; |
||
| 621 | if (j >= (y+sprhgt)) break; |
||
| 622 | }; |
||
| 623 | } |
||
| 624 | |||
| 968 | alone | 625 | void emitimgW(int xchr, int y, int sprwid8, int sprhgt, FILE * fout) |
| 626 | { //by columns |
||
| 627 | BYTE b; |
||
| 628 | int i; |
||
| 629 | int j; |
||
| 630 | i = xchr; |
||
| 631 | while (1) { |
||
| 632 | fputs("\tdb ", fout); |
||
| 633 | j = y; |
||
| 634 | while (1) { |
||
| 635 | b = maskrow[i][j]; |
||
| 636 | //fprintf(fout, "0x%x%x ", i>>4, i&0x0f); |
||
| 637 | //fprintf(fout, "0x%x%x ", j>>4, j&0x0f); |
||
| 638 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 639 | j++; |
||
| 640 | if (j >= (y+sprhgt)) break; |
||
| 641 | fputs(",", fout); |
||
| 642 | }; |
||
| 643 | fputs("\n", fout); |
||
| 644 | i++; |
||
| 645 | if (i == (xchr+sprwid8)) break; |
||
| 646 | }; |
||
| 647 | } |
||
| 648 | |||
| 8 | dimkam | 649 | void emitchr_(int xchr, int y, FILE * fout) |
| 650 | { |
||
| 651 | BYTE b; |
||
| 652 | int j; |
||
| 653 | fputs("\tdb ", fout); |
||
| 654 | j = y; |
||
| 655 | while (1) { |
||
| 1930 | alone | 656 | b = pixrow[xchr][j] ^ invattr; |
| 8 | dimkam | 657 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
| 658 | j++; |
||
| 659 | if (j >= (y+8)) break; |
||
| 660 | fputs(",", fout); |
||
| 661 | }; |
||
| 662 | if (sprformat < 'a') { //capital letter format => attr used |
||
| 663 | b = attrrow[xchr]; //0x07; |
||
| 1930 | alone | 664 | if (invattr) b = (b&0xc0) + ((b&0x07)<<3) + ((b&0x38)>>3); |
| 665 | if (forceattr) b = defaultcolor; |
||
| 8 | dimkam | 666 | fputs(",", fout); |
| 667 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 668 | }; |
||
| 669 | fputs("\n", fout); |
||
| 670 | } |
||
| 671 | |||
| 672 | void emitchr(int xchr, int y, FILE * fout) |
||
| 673 | { |
||
| 674 | emitchr_(xchr, y, fout); |
||
| 675 | } |
||
| 676 | |||
| 677 | void emitchrshift(int xchr, int y, FILE * fout) |
||
| 678 | { |
||
| 679 | emitchr_(xchr, y+PIXROWSHIFT, fout); |
||
| 680 | } |
||
| 681 | |||
| 682 | // >>shiftbits, pixrow[sprx][y+PIXROWSHIFT] |
||
| 683 | void shiftrow(int sprx, int y, int sprwid, int rowhgt, int pixrowshift, BYTE shiftbits) |
||
| 684 | { |
||
| 685 | int j; |
||
| 686 | int x; |
||
| 687 | BYTE b; |
||
| 688 | BYTE b0; |
||
| 689 | BYTE shiftmask; |
||
| 690 | shiftmask = (BYTE)(0xff>>(0x08-shiftbits)); // shiftbits==0x01, shiftmask==0x01 |
||
| 691 | j = y; |
||
| 692 | while (j < (y+rowhgt)) { |
||
| 693 | b = 0x00; |
||
| 694 | x = sprx; |
||
| 695 | while (x < (sprx+sprwid+8)) { |
||
| 696 | b0 = pixrow[x/8][j]; |
||
| 697 | pixrow[x/8][j+pixrowshift] = (BYTE)((b<<(0x08-shiftbits)) + (b0>>shiftbits)); |
||
| 698 | b = (BYTE)(b0&shiftmask/**0x0f*/); // shiftbits==0x01, shiftmask==0x01 |
||
| 699 | x = x+8; |
||
| 700 | }; |
||
| 701 | j++; |
||
| 702 | }; |
||
| 703 | } |
||
| 704 | |||
| 705 | //data: wid8, hgt8, chrgfx, chrgfx... |
||
| 706 | void resfile(char * finname, char * fintxtname, char * foutname) |
||
| 707 | { |
||
| 708 | FILE* fin; |
||
| 709 | FILE* fintxt; |
||
| 710 | FILE* fout; |
||
| 711 | int i; |
||
| 712 | int j; |
||
| 713 | int size; |
||
| 714 | int y; |
||
| 715 | int x; |
||
| 273 | alone | 716 | int n; |
| 717 | int tiles; |
||
| 1881 | alone | 718 | int xi; |
| 719 | int yi; |
||
| 8 | dimkam | 720 | |
| 721 | BYTE b; |
||
| 722 | BYTE bmask; |
||
| 723 | BYTE b0; |
||
| 724 | |||
| 725 | int sprx; |
||
| 1399 | alone | 726 | int startsprx; |
| 8 | dimkam | 727 | int spry; |
| 728 | int sprwid; |
||
| 729 | int sprhgt; |
||
| 730 | int rowhgt; //8 for tiles, sprhgt for sprites |
||
| 731 | |||
| 400 | alone | 732 | UINT color; |
| 733 | |||
| 8 | dimkam | 734 | fin = fopen(finname, "rb"); |
| 735 | if (fin) { |
||
| 736 | fread(filebuf, 10, 1, fin); //skip to 10 (header size) |
||
| 737 | size = read4b(fin); //10 (header size) |
||
| 738 | fread(filebuf, 4, 1, fin); //skip to 18 |
||
| 739 | wid = read4b(fin); //18 |
||
| 740 | hgt = read4b(fin); //22 |
||
| 741 | fread(filebuf, 2, 1, fin); //skip to 28 |
||
| 742 | fread(&bpp, 1, 1, fin); //28 |
||
| 400 | alone | 743 | fread(filebuf, 1, 54-29, fin); //skip to pal |
| 744 | fread(pal, 1, 64, fin); // (B, G, R, 0) |
||
| 745 | if (size > (54+64)) {fread(filebuf, 1, size-(54+64), fin);}; //skip to pic |
||
| 8 | dimkam | 746 | if ((wid>0)&&(wid<=1024)&&(hgt>0)&&(hgt<=1024)&&((wid&7)==0)&&((hgt&7)==0)) { |
| 747 | y = hgt; |
||
| 748 | while (y>0) { |
||
| 749 | y--; |
||
| 750 | x = 0; |
||
| 751 | while (x<wid) { |
||
| 752 | fread(&b, 1, 1, fin); |
||
| 753 | if (bpp == 8) { |
||
| 754 | pic[x][y] = b; |
||
| 755 | x++; |
||
| 756 | }else { |
||
| 757 | pic[x][y] = (BYTE)((b&0xf0)>>4); |
||
| 758 | x++; |
||
| 759 | pic[x][y] = (BYTE)(b&0x0f); |
||
| 760 | x++; |
||
| 761 | }; |
||
| 762 | }; |
||
| 763 | }; |
||
| 764 | |||
| 765 | fintxt = fopen(fintxtname, "rb"); |
||
| 766 | if (fintxt) { |
||
| 767 | fout = fopen(foutname, "wb"); |
||
| 768 | if (fout) { |
||
| 769 | /** if (labelname[0]!='\0') { |
||
| 770 | fputs(labelname, fout); |
||
| 771 | fputs("\n", fout); |
||
| 772 | };*/ |
||
| 773 | while (1) { |
||
| 774 | size = readlabel(fintxt, labelbuf); //fread(filebuf, 1, MAXDEFB, fin); |
||
| 1399 | alone | 775 | maxvertsprcount = vertsprcount; |
| 1033 | alone | 776 | maxsprcount = sprcount; |
| 8 | dimkam | 777 | if (size == 0) break; |
| 1930 | alone | 778 | invattr = 0x00; |
| 8 | dimkam | 779 | readlabel(fintxt, formatlabelbuf); //format |
| 780 | sprformat = *formatlabelbuf; |
||
| 1931 | alone | 781 | if (globalsprformat != '\0') sprformat = globalsprformat; |
| 1399 | alone | 782 | startsprx = readnum(fintxt); |
| 8 | dimkam | 783 | spry = readnum(fintxt); |
| 784 | sprwid = readnum(fintxt); |
||
| 785 | sprhgt = readnum(fintxt); |
||
| 1397 | alone | 786 | numok = 0x00; |
| 1930 | alone | 787 | forceattr = 0x00; |
| 273 | alone | 788 | tiles = readnum(fintxt); // x |
| 789 | defaultcolor = (BYTE)tiles; // , L |
||
| 1397 | alone | 790 | *commentlabelbuf = '\0'; |
| 791 | if ((numok != 0x00) && (sprformat != 'L')) readcomment(fintxt, commentlabelbuf); |
||
| 1399 | alone | 792 | curvertsprcount = 0; |
| 793 | do { //vertsprcount |
||
| 794 | cursprcount = 0; |
||
| 795 | sprx = startsprx; |
||
| 796 | do { //sprcount |
||
| 1403 | alone | 797 | if ((sprformat == 'B')||(sprformat == 'b')) { |
| 1033 | alone | 798 | putlabel(labelbuf, fout); |
| 8 | dimkam | 799 | fputs("\n", fout); |
| 1403 | alone | 800 | //emitdb((BYTE)(sprwid>>3), fout); |
| 801 | //emitdb((BYTE)(sprhgt>>3), fout); |
||
| 8 | dimkam | 802 | rowhgt = 8; |
| 277 | alone | 803 | }else if (sprformat == 'T') { // |
| 8 | dimkam | 804 | fputs("\tds (-$)&0xff\n", fout); |
| 1033 | alone | 805 | putlabel(labelbuf, fout); |
| 8 | dimkam | 806 | fputs("\n", fout); |
| 807 | rowhgt = 8; |
||
| 277 | alone | 808 | }else if (sprformat == 'x') { // 16c |
| 267 | alone | 809 | fputs("\n", fout); |
| 1033 | alone | 810 | putlabel(labelbuf, fout); |
| 267 | alone | 811 | fputs("=$+4\n", fout); |
| 812 | fputs("\n", fout); |
||
| 813 | emitdb((BYTE)(sprwid>>1), fout); |
||
| 814 | emitdb((BYTE)(sprhgt), fout); |
||
| 815 | rowhgt = sprhgt; |
||
| 1713 | alone | 816 | }else if ((sprformat == 'i')||(sprformat == 'I')) { // 16c |
| 277 | alone | 817 | fputs("\n", fout); |
| 1033 | alone | 818 | putlabel(labelbuf, fout); |
| 277 | alone | 819 | fputs("\n", fout); |
| 820 | rowhgt = sprhgt; |
||
| 273 | alone | 821 | }else if (sprformat == 'L') { //LAND , - |
| 822 | fputs("\n", fout); |
||
| 1033 | alone | 823 | putlabel(labelbuf, fout); |
| 273 | alone | 824 | fputs("\n", fout); |
| 825 | rowhgt = sprhgt; |
||
| 400 | alone | 826 | }else if (sprformat == 'P') { //DDp palette |
| 827 | fputs("\n", fout); |
||
| 1033 | alone | 828 | putlabel(labelbuf, fout); |
| 400 | alone | 829 | fputs("\n", fout); |
| 1934 | alone | 830 | rowhgt = sprhgt; |
| 400 | alone | 831 | i = 0; |
| 832 | while (i < 64) { //DDp palette: %grbG11RB(low),%grbG11RB(high), //color = highlow |
||
| 833 | color = 0; //pal = (B, G, R, 0) |
||
| 834 | if (pal[i]&0x80) color = color | 0x0100; |
||
| 835 | if (pal[i]&0x40) color = color | 0x2000; |
||
| 836 | if (pal[i]&0x20) color = color | 0x0001; |
||
| 837 | if (pal[i]&0x10) color = color | 0x0020; |
||
| 838 | i++; |
||
| 839 | if (pal[i]&0x80) color = color | 0x1000; |
||
| 840 | if (pal[i]&0x40) color = color | 0x8000; |
||
| 841 | if (pal[i]&0x20) color = color | 0x0010; |
||
| 842 | if (pal[i]&0x10) color = color | 0x0080; |
||
| 843 | i++; |
||
| 844 | if (pal[i]&0x80) color = color | 0x0200; |
||
| 845 | if (pal[i]&0x40) color = color | 0x4000; |
||
| 846 | if (pal[i]&0x20) color = color | 0x0002; |
||
| 847 | if (pal[i]&0x10) color = color | 0x0040; |
||
| 848 | i++; |
||
| 849 | emitdw(~color, fout); |
||
| 850 | i++; |
||
| 851 | }; |
||
| 852 | fputs("\n", fout); |
||
| 1647 | alone | 853 | }else if ((sprformat == 'w')||(sprformat == 'W')||(sprformat == 'z')||(sprformat == 'Z')||(sprformat == 'y')) { |
| 1033 | alone | 854 | putlabel(labelbuf, fout); |
| 907 | alone | 855 | fputs("\n", fout); |
| 856 | rowhgt = sprhgt; |
||
| 1621 | alone | 857 | }else if (sprformat == 'c') { |
| 1033 | alone | 858 | putlabel(labelbuf, fout); |
| 968 | alone | 859 | fputs("\n", fout); |
| 860 | rowhgt = sprhgt; |
||
| 1931 | alone | 861 | }else if (sprformat == 's') { //for DizzySE |
| 1033 | alone | 862 | putlabel(labelbuf, fout); |
| 8 | dimkam | 863 | fputs("\n", fout); |
| 864 | emitdb((BYTE)(sprwid>>3), fout); |
||
| 865 | emitdb((BYTE)(sprhgt), fout); |
||
| 866 | rowhgt = sprhgt; |
||
| 1931 | alone | 867 | }else if (sprformat == 'S') { |
| 868 | putlabel(labelbuf, fout); |
||
| 869 | fputs("\n", fout); |
||
| 1934 | alone | 870 | rowhgt = 8; |
| 871 | }else if ((sprformat == 'A')||(sprformat == 'a')) { |
||
| 872 | putlabel(labelbuf, fout); |
||
| 873 | fputs("\n", fout); |
||
| 874 | rowhgt = 8; |
||
| 8 | dimkam | 875 | }; |
| 876 | |||
| 1397 | alone | 877 | //copy comment as code line |
| 878 | fputs(commentlabelbuf, fout); |
||
| 879 | //fputs("\n", fout); |
||
| 880 | |||
| 8 | dimkam | 881 | y = spry; |
| 882 | while (y < (spry+sprhgt)) { |
||
| 883 | // rowhgt |
||
| 884 | curink = 0x0f; |
||
| 885 | curpaper = 0x08; |
||
| 968 | alone | 886 | x = 0;//sprx; |
| 8 | dimkam | 887 | while (x < (sprx+sprwid)) { |
| 888 | findinkpaper(x, y); |
||
| 889 | setcurinkpaper(&curink, &curpaper); |
||
| 890 | //curink = 0x0f; |
||
| 891 | //curpaper = 0x08; |
||
| 1621 | alone | 892 | // if (sprformat == 'c') { |
| 968 | alone | 893 | // curpaper = 0; |
| 894 | // curink = 1; |
||
| 895 | // }; |
||
| 8 | dimkam | 896 | j = y; |
| 897 | while (j < (y+rowhgt)) { |
||
| 898 | b = 0x00; |
||
| 899 | bmask = 0x00; |
||
| 900 | i = x; |
||
| 901 | while (i < (x+8)) { |
||
| 902 | b = (BYTE)(b<<1); |
||
| 903 | bmask = (BYTE)(bmask<<1); |
||
| 904 | //if (sprformat != 'B') {fprintf(fout, "0x%x%x\n", (pic[i][j])>>4, (pic[i][j])&0x0f);}; |
||
| 905 | if (pic[i][j]==curink) b++; |
||
| 906 | if (pic[i][j]!=0x00) bmask++; |
||
| 1931 | alone | 907 | if (pic[i][j]==0x10) {bmask--; b++;} |
| 8 | dimkam | 908 | i++; |
| 909 | }; |
||
| 910 | pixrow[x/8][j] = b; |
||
| 911 | maskrow[x/8][j] = bmask; |
||
| 968 | alone | 912 | //fprintf(fout, "0x%x%x ", x>>4, x&0x0f); |
| 913 | //fprintf(fout, "0x%x%x ", j>>4, j&0x0f); |
||
| 914 | //fprintf(fout, "0x%x%x ", b>>4, b&0x0f); |
||
| 915 | //fprintf(fout, "0x%x%x\n", bmask>>4, bmask&0x0f); |
||
| 8 | dimkam | 916 | pixrow[(x/8)+1][j] = 0x00; // |
| 917 | j++; |
||
| 918 | }; |
||
| 919 | // 0x00 , 0x08 0x00 ( bright) |
||
| 920 | b = 0x00; if (curink!=0x08) b = curink; |
||
| 921 | b0 = 0x00; if (curpaper!=0x08) b0 = curpaper; |
||
| 922 | attrrow[x/8 ] = (BYTE)( (((b|b0)&0x08)<<3)+((curpaper&0x07)<<3)+(curink&0x07) ); |
||
| 923 | attrrow[(x/8)+1] = (BYTE)( (((b|b0)&0x08)<<3)+((curpaper&0x07)<<3)+(curink&0x07) ); // |
||
| 924 | x = x+8; |
||
| 925 | }; |
||
| 926 | // shiftrow(sprx, y, sprwid, rowhgt, PIXROWSHIFT, 0x04); // >>4, pixrow[sprx][y+PIXROWSHIFT] |
||
| 927 | |||
| 928 | // |
||
| 1403 | alone | 929 | if ((sprformat == 'B')||(sprformat == 'b')) { //tiles or bw tiles |
| 8 | dimkam | 930 | x = sprx; |
| 931 | while (x < (sprx+sprwid)) { |
||
| 932 | // emitchrshift(x/8,y,fout); |
||
| 1403 | alone | 933 | emitchr(x/8,y,fout); //checks for capital letter in sprformat |
| 8 | dimkam | 934 | x = x+8; |
| 935 | }; |
||
| 936 | // emitchrshift(x/8,y,fout); |
||
| 937 | }else if (sprformat == 'T') { |
||
| 938 | x = sprx; |
||
| 939 | while (x < (sprx+sprwid)) { |
||
| 940 | emitchr(x/8,y,fout); |
||
| 941 | x = x+8; |
||
| 942 | }; |
||
| 943 | emitnops((BYTE)(0x100-((BYTE)(sprwid>>3)*0x09)),fout); |
||
| 1881 | alone | 944 | }else if (sprformat == '%') { //mirror |
| 945 | xi = 0; |
||
| 946 | while (xi < (sprwid/2)) { |
||
| 947 | //fprintf(fout, ";0%x ", sprx+xi); |
||
| 948 | yi = y; |
||
| 949 | while (yi < (y+sprhgt)) { |
||
| 950 | b = pic[sprx+xi][yi]; //L |
||
| 951 | pic[sprx+xi][yi] = pic[sprx+sprwid-1-xi][yi]; //new R |
||
| 952 | pic[sprx+sprwid-1-xi][yi] = b; //new L |
||
| 953 | yi = yi+1; |
||
| 954 | }; |
||
| 955 | xi = xi+1; |
||
| 956 | }; |
||
| 957 | //fprintf(fout, "\n"); |
||
| 1934 | alone | 958 | }else if (sprformat == 'A') { //for coloured lines |
| 959 | emitcolorline(sprx/8,y,sprwid/8,sprhgt,fout); |
||
| 960 | }else if (sprformat == 'a') { //attr lines |
||
| 961 | emitattrline(sprx/8,y,sprwid/8,sprhgt,fout); |
||
| 267 | alone | 962 | }else if (sprformat == 's') { //sprite |
| 8 | dimkam | 963 | emitspr(sprx/8,y,sprwid/8,sprhgt,fout); |
| 1931 | alone | 964 | }else if (sprformat == 'S') { //coloured sprite |
| 965 | emitcolorspr(sprx/8,y,sprwid/8,sprhgt,fout); |
||
| 1647 | alone | 966 | }else if (sprformat == 'y') { //spritey |
| 967 | emitspry(sprx/8,y,sprwid/8,sprhgt,fout); |
||
| 1621 | alone | 968 | }else if (sprformat == 'w') { //sprite antipixels16, antimask16 right to left |
| 969 | emitsprwback(sprx/8,y,sprwid/8,sprhgt,fout); |
||
| 970 | }else if (sprformat == 'W') { //sprite antipixels16, antimask16 |
||
| 907 | alone | 971 | emitsprw(sprx/8,y,sprwid/8,sprhgt,fout); |
| 1392 | alone | 972 | }else if (sprformat == 'z') { //unmasked sprite right to left |
| 973 | emitsprwnomaskback(sprx/8,y,sprwid/8,sprhgt,fout); |
||
| 974 | }else if (sprformat == 'Z') { //unmasked sprite |
||
| 972 | alone | 975 | emitsprwnomask(sprx/8,y,sprwid/8,sprhgt,fout); |
| 1621 | alone | 976 | }else if (sprformat == 'c') { //b/w image by columns |
| 968 | alone | 977 | emitimgW(sprx/8,y,sprwid/8,sprhgt,fout); |
| 978 | //emitimgW(0,0,128,128,fout); |
||
| 8 | dimkam | 979 | }; |
| 980 | y = y+rowhgt; |
||
| 267 | alone | 981 | }; //while y |
| 8 | dimkam | 982 | |
| 267 | alone | 983 | if (sprformat == 'x') { |
| 984 | x = sprx; |
||
| 985 | while (x < (sprx+sprwid)) { |
||
| 986 | y = spry; |
||
| 987 | while (y < (spry+sprhgt)) { |
||
| 988 | b = pic[x][y]; //L |
||
| 989 | b0 = pic[x+1][y]; //R |
||
| 990 | bmask = 0; //0x47(L) 0xb8(R) , =16: |
||
| 991 | if (b == 16) {bmask = bmask + 0x47; b = 0x00;}; |
||
| 992 | if (b0 == 16) {bmask = bmask + 0xb8; b0 = 0x00;}; |
||
| 993 | b = ((b&0x08)<<3) + (b&0x07) + ((b0&0x08)<<4) + ((b0&0x07)<<3); |
||
| 994 | fputs("\tdb ", fout); |
||
| 995 | fprintf(fout, "0x%x%x", bmask>>4, bmask&0x0f); |
||
| 996 | fprintf(fout, ",0x%x%x", b>>4, b&0x0f); |
||
| 997 | fputs("\n", fout); |
||
| 998 | y = y+1; |
||
| 999 | }; |
||
| 1000 | x = x+2; |
||
| 1001 | if (x < (sprx+sprwid)) { |
||
| 1002 | emitdw(0x4000-((sprhgt-1)*40), fout); |
||
| 1003 | }else { |
||
| 1004 | emitdw(0xffff, fout); |
||
| 1005 | }; |
||
| 1006 | fputs("\n", fout); |
||
| 1007 | }; |
||
| 1008 | fputs("\tdw prsprqwid\n", fout); |
||
| 273 | alone | 1009 | }; |
| 267 | alone | 1010 | |
| 277 | alone | 1011 | if (sprformat == 'i') { |
| 1012 | x = sprx; |
||
| 1013 | while (x < (sprx+sprwid)) { |
||
| 1014 | y = spry; |
||
| 1015 | while (y < (spry+sprhgt)) { |
||
| 1016 | b = pic[x][y]; //L |
||
| 1017 | b0 = pic[x+1][y]; //R |
||
| 1018 | b = ((b&0x08)<<3) + (b&0x07) + ((b0&0x08)<<4) + ((b0&0x07)<<3); |
||
| 1019 | fprintf(fout, "\tdb 0x%x%x", b>>4, b&0x0f); |
||
| 1020 | fputs("\n", fout); |
||
| 1021 | y = y+1; |
||
| 1022 | }; |
||
| 1023 | x = x+2; |
||
| 1024 | fputs("\n", fout); |
||
| 1025 | }; |
||
| 1026 | }; |
||
| 1027 | |||
| 1713 | alone | 1028 | if (sprformat == 'I') { |
| 1029 | x = sprx; |
||
| 1030 | while (x < (sprx+sprwid)) { |
||
| 1714 | alone | 1031 | BYTE mode = 255; |
| 1713 | alone | 1032 | BYTE newmode = 0; |
| 1033 | BYTE transp; |
||
| 1034 | int count = 0; |
||
| 1035 | int sumhgt = 0; |
||
| 1036 | y = spry; |
||
| 1037 | while (1) { //y |
||
| 1038 | //fprintf(fout, "\ty=%d\n", y); |
||
| 1039 | |||
| 1040 | if (y != (spry+sprhgt)) { |
||
| 1041 | // |
||
| 1042 | transp = 0; |
||
| 1043 | xi = x; |
||
| 1044 | while (xi < (x+8)) { |
||
| 1045 | if (pic[xi][y] == 16) transp = transp+1; |
||
| 1046 | xi = xi+1; |
||
| 1047 | } |
||
| 1048 | if (transp == 0) { newmode = 1; //ld zone |
||
| 1049 | }else if (transp == 8) { newmode = 0; //empty zone |
||
| 1050 | }else { newmode = 2; //and:or zone |
||
| 1051 | } |
||
| 1714 | alone | 1052 | if (mode == 255) { mode = newmode; }; |
| 1713 | alone | 1053 | }; |
| 1054 | |||
| 1055 | if (((newmode != mode)||(y == (spry+sprhgt)))&&(count != 0)) { |
||
| 1714 | alone | 1056 | //fprintf(fout, "\ty=%d, transp=%d, count=%d, mode=%d, newmode=%d\n", y, transp, count, mode, newmode); |
| 1713 | alone | 1057 | fprintf(fout, "\tdb %d,%d\n", mode, count); |
| 1058 | sumhgt = sumhgt + count; |
||
| 1059 | yi = y-count; |
||
| 1060 | while (yi != y) { |
||
| 1061 | xi = x; |
||
| 1062 | if (mode == 1) { //ld zone |
||
| 1063 | fprintf(fout, "\tdb "); |
||
| 1064 | while (1) { |
||
| 1065 | b = pic[xi][yi]; //L |
||
| 1066 | b0 = pic[xi+1][yi]; //R |
||
| 1067 | b = ((b&0x08)<<3) + (b&0x07) + ((b0&0x08)<<4) + ((b0&0x07)<<3); |
||
| 1068 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 1069 | xi = xi+2; |
||
| 1070 | if (xi == (x+8)) break; |
||
| 1071 | fputs(",", fout); |
||
| 1072 | } |
||
| 1073 | fputs("\n", fout); |
||
| 1074 | //}else if (mode == 0) { //empty zone |
||
| 1075 | }else if (mode == 2) { //and:or zone |
||
| 1076 | fprintf(fout, "\tdb "); |
||
| 1077 | while (1) { |
||
| 1078 | b = pic[xi][yi]; //L |
||
| 1079 | b0 = pic[xi+1][yi]; //R |
||
| 1080 | bmask = 0; //0x47(L) 0xb8(R) , =16: |
||
| 1081 | if (b == 16) {bmask = bmask + 0x47; b = 0x00;}; |
||
| 1082 | if (b0 == 16) {bmask = bmask + 0xb8; b0 = 0x00;}; |
||
| 1083 | b = ((b&0x08)<<3) + (b&0x07) + ((b0&0x08)<<4) + ((b0&0x07)<<3); |
||
| 1084 | fprintf(fout, "0x%x%x", bmask>>4, bmask&0x0f); |
||
| 1085 | fprintf(fout, ",0x%x%x", b>>4, b&0x0f); |
||
| 1086 | xi = xi+2; |
||
| 1087 | if (xi == (x+8)) break; |
||
| 1088 | fputs(",", fout); |
||
| 1089 | }; |
||
| 1090 | fputs("\n", fout); |
||
| 1091 | }; |
||
| 1092 | yi = yi+1; |
||
| 1093 | }; |
||
| 1094 | mode = newmode; |
||
| 1095 | count = 0; |
||
| 1096 | }; |
||
| 1097 | count = count+1; |
||
| 1098 | |||
| 1099 | if (y >= (spry+sprhgt)) break; |
||
| 1100 | |||
| 1101 | y = y+1; |
||
| 1102 | }; |
||
| 1103 | x = x+8; |
||
| 1104 | //fprintf(fout, "\tsumhgt=%d\n", sumhgt); |
||
| 1105 | fputs("\n", fout); |
||
| 1106 | }; |
||
| 1107 | }; |
||
| 1108 | |||
| 273 | alone | 1109 | if (sprformat == 'L') { // (-1=): |
| 1110 | // -1, -1, -1,114,116,119,121,124,126,-1,-1,-1,-1,-1,-1,-1, |
||
| 1111 | // 113,118,123,115,117,120,122,125,127,-1,-1,-1,-1,-1,-1,-1 |
||
| 1112 | // |
||
| 1113 | // convorderx,y - |
||
| 1114 | // , ( ) |
||
| 1115 | n = 0; |
||
| 1116 | while (n < CONVORDERSZ) { |
||
| 1117 | convorderx[n] = 0; |
||
| 1118 | convordery[n] = 0; |
||
| 1119 | n = n+1; |
||
| 1120 | }; |
||
| 1121 | |||
| 1122 | skiplf(fintxt); |
||
| 1123 | //tiles = 0; |
||
| 1124 | |||
| 1125 | y = spry; |
||
| 1126 | while (y < (spry+sprhgt)) { |
||
| 1127 | x = sprx; |
||
| 1128 | while (x < (sprx+sprwid)) { |
||
| 1129 | n = readnum(fintxt); |
||
| 1130 | if (n != -1) { |
||
| 1131 | convorderx[n] = x; |
||
| 1132 | convordery[n] = y; |
||
| 1133 | }; |
||
| 1134 | //fprintf(fout, "\tdb %d\n", n); |
||
| 1135 | //tiles = tiles + 1; |
||
| 1136 | x = x+16; |
||
| 1137 | }; |
||
| 1138 | skiplf(fintxt); |
||
| 1139 | //fputs("\n", fout); |
||
| 1140 | y = y+16; |
||
| 1141 | }; |
||
| 1142 | |||
| 1143 | n = 0; |
||
| 1144 | while (n < tiles) { |
||
| 1145 | x = convorderx[n]; |
||
| 1146 | while (x < (convorderx[n]+16)) { |
||
| 1147 | fputs(" db ", fout); |
||
| 1148 | y = convordery[n]; |
||
| 1149 | while (1) { |
||
| 1150 | b = pic[x][y]; //L |
||
| 1151 | b0 = pic[x+1][y]; //R |
||
| 1152 | b = ((b&0x08)<<3) + (b&0x07) + ((b0&0x08)<<4) + ((b0&0x07)<<3); |
||
| 1153 | fprintf(fout, "0x%x%x", b>>4, b&0x0f); |
||
| 1154 | y = y+1; |
||
| 1155 | if (y == (convordery[n]+16)) break; |
||
| 1156 | fputs(",", fout); |
||
| 1157 | }; |
||
| 1158 | fputs("\n", fout); |
||
| 1159 | x = x+2; |
||
| 1160 | }; |
||
| 1161 | n = n+1; |
||
| 1162 | }; |
||
| 1163 | |||
| 1164 | }; |
||
| 1033 | alone | 1165 | sprx = sprx + sprwid; |
| 1166 | cursprcount++; |
||
| 1167 | } while (cursprcount<maxsprcount); //while (sprcount) |
||
| 1399 | alone | 1168 | spry = spry + sprhgt; |
| 1169 | curvertsprcount++; |
||
| 1170 | } while (curvertsprcount<maxvertsprcount); //while (vertsprcount) |
||
| 267 | alone | 1171 | }; //while (1) |
| 8 | dimkam | 1172 | fclose(fout); |
| 1173 | }else {printf("can't open %s",foutname);}; |
||
| 1174 | fclose(fintxt); |
||
| 1175 | }else {printf("can't open %s",fintxtname);}; |
||
| 1176 | }; |
||
| 1177 | fclose(fin); |
||
| 1178 | }else {printf("can't open %s",finname);}; |
||
| 1179 | } |
||
| 1180 | |||
| 1181 | int main(int argc,char* argv[]) |
||
| 1182 | { |
||
| 1183 | // int i; |
||
| 1184 | char *finname; |
||
| 1185 | char *fintxtname; |
||
| 1186 | char *foutname; |
||
| 1187 | finname = "testpic.bmp"; |
||
| 1188 | fintxtname = "testpic.txt"; |
||
| 1189 | foutname = "testpic.asm"; |
||
| 1931 | alone | 1190 | globalsprformat = '\0'; |
| 8 | dimkam | 1191 | |
| 1192 | if (argc<4) { |
||
| 1193 | printf( |
||
| 1194 | "NedoRes\n" |
||
| 1931 | alone | 1195 | "\tnedores.exe file.bmp file.dat(=txt) file.ast(=asm) [-f<format>]\n" |
| 267 | alone | 1196 | "4bpp or 8bpp\n" |
| 8 | dimkam | 1197 | ); |
| 1198 | }else { |
||
| 1199 | finname = argv[1]; |
||
| 1200 | fintxtname = argv[2]; |
||
| 1201 | foutname = argv[3]; |
||
| 1931 | alone | 1202 | if (argc > 4) if (argv[4][0] == '-') if (argv[4][1] == 'f') globalsprformat = argv[4][2]; |
| 8 | dimkam | 1203 | }; |
| 1204 | |||
| 1205 | resfile(finname, fintxtname, foutname); |
||
| 1206 | |||
| 1207 | return 0; |
||
| 930 | alone | 1208 | } |