//------------------------------------------------------------------------- /* Copyright (C) 2010 EDuke32 developers and contributors This file is part of EDuke32. EDuke32 is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License version 2 as published by the Free Software Foundation. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ //------------------------------------------------------------------------- #include "compat.h" #include "build.h" #include "editor.h" #include "pragmas.h" #include "baselayer.h" #include "names.h" #include "osd.h" #include "osdfuncs.h" #include "cache1d.h" #include "mapster32.h" #include "keys.h" #include "keyboard.h" #include "scriptfile.h" #include "crc32.h" #include "sounds_mapster32.h" #include "fx_man.h" #include "macros.h" #include "quicklz.h" #include "m32script.h" #include "m32def.h" #ifdef _WIN32 #define WIN32_LEAN_AND_MEAN #include #include #endif #include #define BUILDDATE " 20100521" static int32_t floor_over_floor; // static char *startwin_labeltext = "Starting Mapster32..."; static char setupfilename[]= "mapster32.cfg"; static char defaultduke3dgrp[BMAX_PATH] = "duke3d.grp"; static char *g_grpNamePtr = defaultduke3dgrp; static int32_t fixmapbeforesaving = 0; static int32_t lastsave = -180*60; static int32_t NoAutoLoad = 0; static int32_t spnoclip=1; static char default_tiles_cfg[] = "tiles.cfg"; static int32_t pathsearchmode_oninit; // Sound in Mapster32 static char defaultgamecon[] = "game.con"; static char *gamecon = defaultgamecon; #pragma pack(push,1) sound_t g_sounds[MAXSOUNDS]; #pragma pack(pop) static int16_t g_definedsndnum[MAXSOUNDS]; // maps parse order index to g_sounds index static int16_t g_sndnum[MAXSOUNDS]; // maps current order index to g_sounds index int32_t g_numsounds = 0; static int32_t lastupdate, mousecol, mouseadd = 1, bstatus; #if !defined(_WIN32) static int32_t usecwd = 0; #endif static struct strllist { struct strllist *next; char *str; } *CommandPaths = NULL, *CommandGrps = NULL; const char *scripthist[SCRIPTHISTSIZ]; int32_t scripthistend = 0; int32_t showambiencesounds=2; int32_t autocorruptcheck = 0; static int32_t corruptchecktimer; static int32_t curcorruptthing=-1; int32_t corruptlevel=0, numcorruptthings=0, corruptthings[MAXCORRUPTTHINGS]; static uint32_t templenrepquot; static void fixxrepeat(int16_t i, uint32_t lenrepquot) { if (lenrepquot != 0) wall[i].xrepeat = clamp(divscale12(wallength(i), lenrepquot), 1, 255); } //////////////////// Key stuff //////////////////// #define eitherALT (keystatus[KEYSC_LALT] || keystatus[KEYSC_RALT]) #define eitherCTRL (keystatus[KEYSC_LCTRL] || keystatus[KEYSC_RCTRL]) #define eitherSHIFT (keystatus[KEYSC_LSHIFT] || keystatus[KEYSC_RSHIFT]) #define PRESSED_KEYSC(Key) (keystatus[KEYSC_##Key] && !(keystatus[KEYSC_##Key]=0)) //////////////////// Aiming //////////////////// static const char *Typestr[] = { "Wall", "Ceiling", "Floor", "Sprite", "Wall" }; static const char *typestr[] = { "wall", "ceiling", "floor", "sprite", "wall" }; static const char *Typestr_wss[] = { "Wall", "Sector", "Sector", "Sprite", "Wall" }; /*static const char *typestr_wss[] = { "wall", "sector", "sector", "sprite", "wall" };*/ /** The following macros multiplex between identically named fields of sector/wall/sprite, * based on a macro parameter or the currently aimed at object (AIMED_ versions). * They can be used on either side of an assignment. */ // select wall, only makes a difference with walls that have 'swap bottom of walls' bit set #define SELECT_WALL() (AIMING_AT_WALL ? searchbottomwall : searchwall) #define SECFLD(i, Field) (sector[i].Field) #define WALFLD(i, Field) (wall[i].Field) #define SPRFLD(i, Field) (sprite[i].Field) // valid fields: z, stat, picnum, heinum, shade, pal, xpanning, ypanning #define CEILINGFLOOR(iSec, Field) (*(AIMING_AT_CEILING ? &(sector[iSec].ceiling##Field) : &(sector[iSec].floor##Field))) #define AIMED_CEILINGFLOOR(Field) CEILINGFLOOR(searchsector, Field) #define AIMED_SEL_WALL(Field) WALFLD(SELECT_WALL(), Field) // selects from wall proper or its mask #define OVR_WALL(iWal, Field) (*(AIMING_AT_WALL ? &WALFLD(iWal, Field) : &(wall[iWal].over##Field))) #define AIMED_SELOVR_WALL(Field) OVR_WALL(SELECT_WALL(), Field) // the base macro to construct field multiplexing macros: wall and sector cases undetermined #define MUXBASE(Field, SectorCase, WallCase) (*(AIMING_AT_CEILING_OR_FLOOR ? (SectorCase) : \ (AIMING_AT_WALL_OR_MASK ? (WallCase) : \ &SPRFLD(searchwall, Field)))) #define SFBASE_CF(Field, WallCase) MUXBASE(Field, &AIMED_CEILINGFLOOR(Field), WallCase) #define SFBASE_(Field, WallCase) MUXBASE(Field, &SECFLD(searchsector,Field), WallCase) #define AIMED(Field) SFBASE_(Field, &WALFLD(searchwall, Field)) #define AIMED_SEL(Field) SFBASE_(Field, &AIMED_SEL_WALL(Field)) //#define AIMED_CF(Field) SFBASE_CF(Field, &WALFLD(searchwall,Field)) #define AIMED_CF_SEL(Field) SFBASE_CF(Field, &AIMED_SEL_WALL(Field)) // OVR makes sense only with picnum //#define AIMED_OVR_PICNUM SFBASE_CF(picnum, &OVR_WALL(searchwall, picnum)) #define AIMED_SELOVR_PICNUM SFBASE_CF(picnum, &AIMED_SELOVR_WALL(picnum)) #define BTAG_MAX 65535 #define BZ_MAX 8388608 static const char *ONOFF_[] = {"OFF","ON"}; #define ONOFF(b) (ONOFF_[!!(b)]) static CACHE1D_FIND_REC *finddirs=NULL, *findfiles=NULL, *finddirshigh=NULL, *findfileshigh=NULL; static int32_t numdirs=0, numfiles=0; static int32_t currentlist=0; static int32_t tsign, mouseaction=0, mouseax=0, mouseay=0; static int32_t repeatcountx, repeatcounty; static int32_t infobox=3; // bit0: current window, bit1: mouse pointer, the variable should be renamed static char wallshades[MAXWALLS]; static char sectorshades[MAXSECTORS][2]; static char spriteshades[MAXSPRITES]; static char wallpals[MAXWALLS]; static char sectorpals[MAXSECTORS][2]; static char spritepals[MAXSPRITES]; static char wallflag[MAXWALLS]; // tile marking in tile selector for custom creation of tile groups static int16_t tilemarked[(MAXTILES+7)>>3]; #ifdef POLYMER static int16_t spritelightid[MAXSPRITES]; _prlight *spritelightptr[MAXSPRITES]; static void DeletePolymerLights() { int32_t i; for (i=0; i0; i++,col--) CLEARLINES2D(i, 1, (col<<24)|(col<<16)|(col<<8)|col); CLEARLINES2D(i, ydim-i, 0); enddrawing(); } void message(const char *fmt, ...) { char tmpstr[256]; va_list va; va_start(va, fmt); Bvsnprintf(tmpstr, 256, fmt, va); va_end(va); Bstrcpy(getmessage,tmpstr); getmessageleng = Bstrlen(getmessage); getmessagetimeoff = totalclock+120*2; lastmessagetime = totalclock; if (!mouseaction) OSD_Printf("%s\n", tmpstr); } typedef struct _mapundo { int32_t numsectors; int32_t numwalls; int32_t numsprites; sectortype *sectors; walltype *walls; spritetype *sprites; int32_t revision; uint32_t sectcrc, wallcrc, spritecrc; uint32_t sectsiz, wallsiz, spritesiz; struct _mapundo *next; // 'redo' loads this struct _mapundo *prev; // 'undo' loads this } mapundo_t; mapundo_t *mapstate = NULL; int32_t map_revision = 1; void create_map_snapshot(void) { int32_t j; uint32_t tempcrc; /* if (mapstate->prev == NULL && mapstate->next != NULL) // should be the first map version mapstate = mapstate->next; */ if (mapstate == NULL) { mapstate = (mapundo_t *)Bcalloc(1, sizeof(mapundo_t)); mapstate->revision = map_revision = 1; mapstate->prev = mapstate->next = NULL; } else { if (mapstate->next != NULL) { mapundo_t *next = mapstate->next; next->prev = NULL; while (next->next) next = next->next; do { if (next->sectors && (next->prev == NULL || (next->sectcrc != next->prev->sectcrc))) Bfree(next->sectors); if (next->walls && (next->prev == NULL || (next->wallcrc != next->prev->wallcrc))) Bfree(next->walls); if (next->sprites && (next->prev == NULL || (next->spritecrc != next->prev->spritecrc))) Bfree(next->sprites); if (!next->prev) { Bfree(next); break; } next = next->prev; Bfree(next->next); } while (next); } mapstate->next = (mapundo_t *)Bcalloc(1, sizeof(mapundo_t)); mapstate->next->prev = mapstate; mapstate = mapstate->next; mapstate->revision = ++map_revision; } fixspritesectors(); numsprites = 0; for (j=MAXSPRITES-1; j>=0; j--) { if (sprite[j].statnum != MAXSTATUS) numsprites++; } mapstate->numsectors = numsectors; mapstate->numwalls = numwalls; mapstate->numsprites = numsprites; tempcrc = crc32once((uint8_t *)§or[0],sizeof(sectortype) * numsectors); if (numsectors) { if (mapstate->prev && mapstate->prev->sectcrc == tempcrc) { mapstate->sectors = mapstate->prev->sectors; mapstate->sectsiz = mapstate->prev->sectsiz; mapstate->sectcrc = tempcrc; /* OSD_Printf("found a match between undo sectors\n"); */ } else { mapstate->sectors = (sectortype *)Bcalloc(1, sizeof(sectortype) * numsectors); mapstate->sectsiz = j = qlz_compress(§or[0], (char *)&mapstate->sectors[0], sizeof(sectortype) * numsectors, state_compress); mapstate->sectors = (sectortype *)Brealloc(mapstate->sectors, j); mapstate->sectcrc = tempcrc; } if (numwalls) { tempcrc = crc32once((uint8_t *)&wall[0],sizeof(walltype) * numwalls); if (mapstate->prev && mapstate->prev->wallcrc == tempcrc) { mapstate->walls = mapstate->prev->walls; mapstate->wallsiz = mapstate->prev->wallsiz; mapstate->wallcrc = tempcrc; /* OSD_Printf("found a match between undo walls\n"); */ } else { mapstate->walls = (walltype *)Bcalloc(1, sizeof(walltype) * numwalls); mapstate->wallsiz = j = qlz_compress(&wall[0], (char *)&mapstate->walls[0], sizeof(walltype) * numwalls, state_compress); mapstate->walls = (walltype *)Brealloc(mapstate->walls, j); mapstate->wallcrc = tempcrc; } } if (numsprites) { tempcrc = crc32once((uint8_t *)&sprite[0],sizeof(spritetype) * MAXSPRITES); if (mapstate->prev && mapstate->prev->spritecrc == tempcrc) { mapstate->sprites = mapstate->prev->sprites; mapstate->spritesiz = mapstate->prev->spritesiz; mapstate->spritecrc = tempcrc; /*OSD_Printf("found a match between undo sprites\n");*/ } else { int32_t i = 0; spritetype *tspri = (spritetype *)Bcalloc(1, sizeof(spritetype) * numsprites), *spri = &tspri[0]; mapstate->sprites = (spritetype *)Bcalloc(1, sizeof(spritetype) * numsprites); for (j=0; jspritesiz = j = qlz_compress(&tspri[0], (char *)&mapstate->sprites[0], sizeof(spritetype) * numsprites, state_compress); mapstate->sprites = (spritetype *)Brealloc(mapstate->sprites, j); mapstate->spritecrc = tempcrc; Bfree(tspri); } } } } void map_undoredo_free(void) { if (mapstate) { while (mapstate->next) mapstate = mapstate->next; while (mapstate->prev) { mapundo_t *state = mapstate->prev; if (mapstate->sectors && (mapstate->sectcrc != mapstate->prev->sectcrc)) Bfree(mapstate->sectors); if (mapstate->walls && (mapstate->wallcrc != mapstate->prev->wallcrc)) Bfree(mapstate->walls); if (mapstate->sprites && (mapstate->spritecrc != mapstate->prev->spritecrc)) Bfree(mapstate->sprites); Bfree(mapstate); mapstate = state; } if (mapstate->sectors) Bfree(mapstate->sectors); if (mapstate->walls) Bfree(mapstate->walls); if (mapstate->sprites) Bfree(mapstate->sprites); Bfree(mapstate); mapstate = NULL; } map_revision = 1; } int32_t map_undoredo(int32_t dir) { int32_t i; if (mapstate == NULL) return 1; if (dir) { if (mapstate->next == NULL || !mapstate->next->numsectors) return 1; // while (map_revision+1 != mapstate->revision && mapstate->next) mapstate = mapstate->next; } else { if (mapstate->prev == NULL || !mapstate->prev->numsectors) return 1; // while (map_revision-1 != mapstate->revision && mapstate->prev) mapstate = mapstate->prev; } numsectors = mapstate->numsectors; numwalls = mapstate->numwalls; numsprites = mapstate->numsprites; map_revision = mapstate->revision; initspritelists(); Bmemset(show2dsector, 0, sizeof(show2dsector)); Bmemset(show2dsprite, 0, sizeof(show2dsprite)); Bmemset(show2dwall, 0, sizeof(show2dwall)); if (mapstate->numsectors) { qlz_decompress((const char *)&mapstate->sectors[0], §or[0], state_decompress); if (mapstate->numwalls) qlz_decompress((const char *)&mapstate->walls[0], &wall[0], state_decompress); if (mapstate->numsprites) qlz_decompress((const char *)&mapstate->sprites[0], &sprite[0], state_decompress); } updatenumsprites(); for (i=0; inext) numdirs++; for (r = findfiles; r; r=r->next) numfiles++; finddirshigh = finddirs; findfileshigh = findfiles; currentlist = 0; if (findfileshigh) currentlist = 1; return(0); } void ExtLoadMap(const char *mapname) { int32_t i; int32_t sky=0; getmessageleng = 0; getmessagetimeoff = 0; Bstrcpy(levelname,mapname); pskyoff[0]=0; for (i=0; i<8; i++) pskyoff[i]=0; for (i=0; i= MAX_TILE_GROUPS || s_TileGroups[group].szText == NULL) { // group isn't valid. return 0; } for (temp=0; temp 10000 && lotag < 32767) Bsprintf(tempbuf,"1 TIME SOUND"); // else Bsprintf(tempbuf,"%hu",lotag); break; } return(tempbuf); } const char *ExtGetSectorCaption(int16_t sectnum) { static char tempbuf[64]; Bmemset(tempbuf, 0, sizeof(tempbuf)); if (qsetmode != 200 && ((onnames!=1 && onnames!=4 && onnames!=7) || onnames==8)) return tempbuf; if (qsetmode == 200 || (sector[sectnum].lotag|sector[sectnum].hitag)) { Bstrcpy(lo, ExtGetSectorType(sector[sectnum].lotag)); if (qsetmode != 200) Bsprintf(tempbuf,"%hu,%hu %s", sector[sectnum].hitag, sector[sectnum].lotag, lo); else Bsprintf(tempbuf,"%hu %s", sector[sectnum].lotag, lo); } return(tempbuf); } const char *ExtGetWallCaption(int16_t wallnum) { static char tempbuf[64]; Bmemset(tempbuf,0,sizeof(tempbuf)); if (wall[wallnum].cstat & (1<<14)) { Bsprintf(tempbuf,"%d", wallength(wallnum)); wall[wallnum].cstat &= ~(1<<14); return(tempbuf); } if (!(onnames==2 || onnames==4)) { tempbuf[0] = 0; return(tempbuf); } // HERE if ((wall[wallnum].lotag|wall[wallnum].hitag) == 0) tempbuf[0] = 0; else Bsprintf(tempbuf, "%hu,%hu", wall[wallnum].hitag, wall[wallnum].lotag); return(tempbuf); } //end const char *SectorEffectorTagText(int32_t lotag) { static char tempbuf[64]; static const char *tags[] = { "ROTATED SECTOR", // 0 "PIVOT SPRITE FOR SE 0", "EARTHQUAKE", "RANDOM LIGHTS AFTER SHOT OUT", "RANDOM LIGHTS", "(UNKNOWN)", // 5 "SUBWAY", "TRANSPORT", "UP OPEN DOOR LIGHTS", "DOWN OPEN DOOR LIGHTS", "DOOR AUTO CLOSE (H=DELAY)", // 10 "ROTATE SECTOR DOOR", "LIGHT SWITCH", "EXPLOSIVE", "SUBWAY CAR", "SLIDE DOOR (ST 25)", // 15 "ROTATE REACTOR SECTOR", "ELEVATOR TRANSPORT (ST 15)", "INCREMENTAL SECTOR RISE/FALL", "CEILING FALL ON EXPLOSION", "BRIDGE (ST 27)", // 20 "DROP FLOOR (ST 28)", "TEETH DOOR (ST 29)", "1-WAY SE7 DESTINATION (H=SE 7)", "CONVAYER BELT", "ENGINE", // 25 "(UNKNOWN)", "LIGHTNING (H= TILE#4890)", "CAMERA FOR PLAYBACK", "FLOAT", "2 WAY TRAIN (ST=31)", // 30 "FLOOR RISE", "CEILING FALL", "SPAWN JIB W/QUAKE", }; Bmemset(tempbuf,0,sizeof(tempbuf)); if (lotag>=0 && lotag<(int32_t)(sizeof(tags)/sizeof(tags[0]))) Bsprintf(tempbuf, "%d: %s", lotag, tags[lotag]); else switch (lotag) { case 36: Bsprintf(tempbuf,"%d: SKRINK RAY SHOOTER",lotag); break; case 49: Bsprintf(tempbuf,"%d: POINT LIGHT",lotag); break; case 50: Bsprintf(tempbuf,"%d: SPOTLIGHT",lotag); break; default: Bsprintf(tempbuf,"%d: (UNKNOWN)",lotag); break; } return (tempbuf); } const char *MusicAndSFXTagText(int32_t lotag) { static char tempbuf[16]; Bmemset(tempbuf, 0, sizeof(tempbuf)); if (g_numsounds <= 0) return tempbuf; if (lotag>0 && lotag<999 && g_sounds[lotag].definedname) return g_sounds[lotag].definedname; if (lotag>=1000 && lotag<2000) Bsprintf(tempbuf, "REVERB"); return tempbuf; } const char *SectorEffectorText(int32_t spritenum) { static char tempbuf[64]; Bmemset(tempbuf, 0, sizeof(tempbuf)); Bmemset(lo, 0, sizeof(lo)); Bstrcpy(lo, SectorEffectorTagText(sprite[spritenum].lotag)); if (!lo[5]) // tags are 5 chars or less SpriteName(spritenum, tempbuf); else Bsprintf(tempbuf, "SE %s",lo); return (tempbuf); } const char *ExtGetSpriteCaption(int16_t spritenum) { static char tempbuf[1024]; int32_t retfast = 0; Bmemset(tempbuf,0,sizeof(tempbuf)); if (!(onnames>=3 && onnames<=8) || (onnames==7 && sprite[spritenum].picnum!=SECTOREFFECTOR)) retfast = 1; if (onnames==5 && !tileInGroup(tilegroupItems, sprite[spritenum].picnum)) retfast = 1; if (onnames==6 && sprite[spritenum].picnum != sprite[cursprite].picnum) retfast = 1; if (retfast) return(tempbuf); if ((sprite[spritenum].lotag|sprite[spritenum].hitag) == 0) { SpriteName(spritenum,lo); if (lo[0]!=0) { if (sprite[spritenum].pal==1) Bsprintf(tempbuf,"%s (MULTIPLAYER)",lo); else Bsprintf(tempbuf,"%s",lo); } } else if (sprite[spritenum].picnum==SECTOREFFECTOR) { if (onnames!=8) { Bsprintf(lo,"%s",SectorEffectorText(spritenum)); Bsprintf(tempbuf,"%s, %hu",lo,sprite[spritenum].hitag); } } else { SpriteName(spritenum,lo); if (sprite[spritenum].extra != -1) Bsprintf(tempbuf,"%hu,%hu,%d %s",sprite[spritenum].hitag,sprite[spritenum].lotag,sprite[spritenum].extra,lo); else Bsprintf(tempbuf,"%hu,%hu %s",sprite[spritenum].hitag,sprite[spritenum].lotag,lo); } return(tempbuf); } //end //printext16 parameters: //printext16(int32_t xpos, int32_t ypos, int16_t col, int16_t backcol, // char name[82], char fontsize) // xpos 0-639 (top left) // ypos 0-479 (top left) // col 0-15 // backcol 0-15, -1 is transparent background // name // fontsize 0=8*8, 1=3*5 //drawline16 parameters: // drawline16(int32_t x1, int32_t y1, int32_t x2, int32_t y2, char col) // x1, x2 0-639 // y1, y2 0-143 (status bar is 144 high, origin is top-left of STATUS BAR) // col 0-15 static void PrintStatus(const char *string, int32_t num, int32_t x, int32_t y, int32_t color) { Bsprintf(tempbuf, "%s %d", string, num); printext16(x*8, ydim-STATUS2DSIZ+y*8, editorcolors[color], -1, tempbuf, 0); } void ExtShowSectorData(int16_t sectnum) //F5 { int32_t x,x2,y; int32_t i,yi; int32_t secrets=0; int32_t totalactors1=0,totalactors2=0,totalactors3=0,totalactors4=0; int32_t totalrespawn=0; UNREFERENCED_PARAMETER(sectnum); if (qsetmode==200) return; for (i=0; i=0 && sprite[i].picnum=MAXTILES) continue; switch (pic) { case CASES_LIZTROOP: numsprite[LIZTROOP]++; break; case PIGCOP: case PIGCOPSTAYPUT: case PIGCOPDIVE: numsprite[PIGCOP]++; break; case LIZMAN: case LIZMANSTAYPUT: case LIZMANSPITTING: case LIZMANFEEDING: case LIZMANJUMP: numsprite[LIZMAN]++; break; case CASES_BOSS1: if (runi==0 || sprite[i].pal==0) numsprite[BOSS1]++; else multisprite[BOSS1]++; break; case COMMANDER: case COMMANDERSTAYPUT: numsprite[COMMANDER]++; break; case OCTABRAIN: case OCTABRAINSTAYPUT: numsprite[OCTABRAIN]++; break; case RECON: case DRONE: case ROTATEGUN: case EGG: case ORGANTIC: case GREENSLIME: case BOSS2: case BOSS3: case TANK: case NEWBEAST: case NEWBEASTSTAYPUT: case BOSS4: numsprite[pic]++; break; default: break; } } #undef CASES_LIZTROOP #undef CASES_BOSS1 total=0; for (i=0; ixmax) xmax=x; } tempbuf[x]=0; if (do3d) printext256(xx*4,(y*6)+2,whitecol,-1,tempbuf,1); else printext16(xx*4,ydim-STATUS2DSIZ+(y*6)+2,editorcolors[11],-1,tempbuf,1); x=0; y++; if (y>18) { col++; y=6; xx+=xmax; xmax=0; } } enddrawing(); kclose(fp); }// end ShowFileText // PK_ vvvv typedef struct helppage_ { int32_t numlines; char line[][80]; // C99 flexible array member } helppage_t; static helppage_t **helppage=NULL; static int32_t numhelppages=0; static int32_t emptyline(const char *start) { int32_t i; for (i=0; i<80; i++) { if (start[i]=='\n' || !start[i]) break; if (start[i]!=' ' && start[i]!='\t' && start[i]!='\r') return 0; } return 1; } static int32_t newpage(const char *start) { int32_t i; for (i=80-1; i>=0; i--) { if (start[i] == '^' && start[i+1] == 'P') return 1; } return 0; } #define IHELP_INITPAGES 32 #define IHELP_INITLINES 16 static void ReadHelpFile(const char *name) { BFILE *fp; int32_t i, j, k, numallocpages; int32_t pos, charsread=0; helppage_t *hp; char skip=0; initprintf("Loading \"%s\"\n",name); if ((fp=fopenfrompath(name,"rb")) == NULL) { initprintf("Error initializing integrated help: file \"%s\" not found.\n", name); return; } helppage=Bmalloc(IHELP_INITPAGES * sizeof(helppage_t *)); numallocpages=IHELP_INITPAGES; if (!helppage) goto HELPFILE_ERROR; i=0; while (!Bfeof(fp) && !ferror(fp)) { while (!Bfeof(fp)) // skip empty lines { pos = ftell(fp); if (Bfgets(tempbuf, 80, fp) == NULL) break; charsread = ftell(fp)-pos; if (!newpage(tempbuf)) { break; } } if (Bfeof(fp) || charsread<=0) break; hp=Bcalloc(1,sizeof(helppage_t) + IHELP_INITLINES*80); if (!hp) goto HELPFILE_ERROR; hp->numlines = IHELP_INITLINES; if (charsread == 79 && tempbuf[78]!='\n') skip=1; j=0; do { if (j >= hp->numlines) { hp=Brealloc(hp, sizeof(helppage_t) + 2*hp->numlines*80); if (!hp) goto HELPFILE_ERROR; hp->numlines *= 2; } // limit the line length to 78 chars and probably get rid of the CR if (charsread>0) { tempbuf[charsread-1]=0; if (tempbuf[charsread-2]==0x0d) tempbuf[charsread-2]=0; } Bmemcpy(hp->line[j], tempbuf, 80); for (k=charsread; k<80; k++) hp->line[j][k]=0; if (skip) { while (fgetc(fp)!='\n' && !Bfeof(fp)) /*skip rest of line*/; skip=0; } pos = ftell(fp); if (Bfgets(tempbuf, 80, fp) == NULL) break; charsread = ftell(fp)-pos; if (charsread == 79 && tempbuf[78]!='\n') skip=1; j++; } while (!newpage(tempbuf) && !Bfeof(fp) && charsread>0); hp=Brealloc(hp, sizeof(helppage_t) + j*80); if (!hp) goto HELPFILE_ERROR; hp->numlines=j; if (i >= numallocpages) { helppage = Brealloc(helppage, 2*numallocpages*sizeof(helppage_t *)); numallocpages *= 2; if (!helppage) goto HELPFILE_ERROR; } helppage[i] = hp; i++; } helppage = Brealloc(helppage, i*sizeof(helppage_t *)); if (!helppage) goto HELPFILE_ERROR; numhelppages = i; Bfclose(fp); return; HELPFILE_ERROR: Bfclose(fp); initprintf("ReadHelpFile(): ERROR allocating memory.\n"); return; } // why can't MSVC allocate an array of variable size?! #define IHELP_NUMDISPLINES 110 // ((overridepm16y>>4)+(overridepm16y>>5)+(overridepm16y>>7)-2) #define IHELP_PATLEN 45 extern int32_t overridepm16y; // influences clearmidstatbar16() static void IntegratedHelp() { if (!helppage) return; overridepm16y = ydim;//3*STATUS2DSIZ; { int32_t i, j; static int32_t curhp=0, curline=0; int32_t highlighthp=-1, highlightline=-1, lasthighlighttime=0; char disptext[IHELP_NUMDISPLINES][80]; char oldpattern[IHELP_PATLEN+1]; Bmemset(oldpattern, 0, sizeof(char)); // clearmidstatbar16(); while (keystatus[KEYSC_ESC]==0 && keystatus[KEYSC_Q]==0 && keystatus[KEYSC_F1]==0) { begindrawing(); CLEARLINES2D(0, ydim, 0); enddrawing(); idle_waitevent(); if (handleevents()) quitevent = 0; // printmessage16("Help mode, press to exit"); if (PRESSED_KEYSC(T)) // goto table of contents { curhp=0; curline=0; } else if (PRESSED_KEYSC(G)) // goto arbitrary page { curhp=getnumber16("Goto page: ", 0, numhelppages-1, 0); curline=0; } else if (PRESSED_KEYSC(UP)) // scroll up { if (curline>0) curline--; } else if (PRESSED_KEYSC(DOWN)) // scroll down { if (curline + 32/*+IHELP_NUMDISPLINES*/ < helppage[curhp]->numlines) curline++; } else if (PRESSED_KEYSC(PGUP)) // scroll one page up { i=IHELP_NUMDISPLINES; while (i>0 && curline>0) i--, curline--; } else if (PRESSED_KEYSC(PGDN)) // scroll one page down { i=IHELP_NUMDISPLINES; while (i>0 && curline + 32/*+IHELP_NUMDISPLINES*/ < helppage[curhp]->numlines) i--, curline++; } else if (PRESSED_KEYSC(SPACE)) // goto next paragraph { for (i=curline, j=0; i < helppage[curhp]->numlines; i++) { if (emptyline(helppage[curhp]->line[i])) { j=1; continue; } if (j==1 && !emptyline(helppage[curhp]->line[i])) { j=2; break; } } if (j==2) { if (i + 32 /*+IHELP_NUMDISPLINES*/ < helppage[curhp]->numlines) curline=i; else if (helppage[curhp]->numlines - 32/*-IHELP_NUMDISPLINES*/ > curline) curline = helppage[curhp]->numlines - 32/*-IHELP_NUMDISPLINES*/; } } else if (PRESSED_KEYSC(BS)) // goto prev paragraph { for (i=curline-1, j=0; i>=0; i--) { if (!emptyline(helppage[curhp]->line[i])) { j=1; continue; } if (j==1 && emptyline(helppage[curhp]->line[i])) { j=2; break; } } if (j==2 || i==-1) curline=i+1; } else if (PRESSED_KEYSC(HOME)) // goto beginning of page { curline=0; } else if (PRESSED_KEYSC(END)) // goto end of page { if ((curline=helppage[curhp]->numlines - 32/*-IHELP_NUMDISPLINES*/) >= 0) /**/; else curline=0; } else if (PRESSED_KEYSC(LEFT) || PRESSED_KEYSC(LBRACK)) // prev page { if (curhp>0) { curhp--; curline=0; } } else if (PRESSED_KEYSC(RIGHT) || PRESSED_KEYSC(RBRACK)) // next page { if (curhp 0) { if (i > 0 && (ch == 8 || ch == 127)) { i--; pattern[i] = 0; } else if (i < IHELP_PATLEN && ch >= 32 && ch < 128) { pattern[i++] = ch; pattern[i] = 0; } } } if (bad==1) { keystatus[KEYSC_ESC] = keystatus[KEYSC_Q] = keystatus[KEYSC_F1] = 0; } if (bad==2) { keystatus[KEYSC_ENTER] = 0; for (i=curhp; inumlines; j++) { // entering an empty pattern will search with the last used pattern if (strstr(helppage[i]->line[j], pattern[0]?pattern:oldpattern)) { curhp = i; if ((curline=j) <= helppage[i]->numlines - 32 /*-IHELP_NUMDISPLINES*/) /**/; else if ((curline=helppage[i]->numlines- 32 /*-IHELP_NUMDISPLINES*/) >= 0) /**/; else curline=0; highlighthp = i; highlightline = j; lasthighlighttime = totalclock; goto ENDFOR1; } } } ENDFOR1: if (pattern[0]) Bmemcpy(oldpattern, pattern, IHELP_PATLEN+1); } } else // '1'-'0' on the upper row { for (i=2; i<=11; i++) if (keystatus[i]) break; if (i--<12 && inumlines) _printmessage16("%s", helppage[0]->line[curhp]); else _printmessage16("%d. (Untitled page)", curhp); for (i=0; j=(curhp==0)?(i+curline+1):(i+curline), inumlines; i++) { if (ydim-overridepm16y+28+i*9+32 >= ydim) break; Bmemcpy(disptext[i], helppage[curhp]->line[j], 80); printext16(8, ydim-overridepm16y+28+i*9, editorcolors[10], (j==highlightline && curhp==highlighthp && totalclock-lasthighlighttime<120*5) ? editorcolors[1] : -1, disptext[i], 0); } showframe(1); } overridepm16y = -1; // i=ydim16; // ydim16=ydim; // drawline16(0,ydim-STATUS2DSIZ,xdim-1,ydim-STATUS2DSIZ,editorcolors[1]); // ydim16=i; // // printmessage16(""); // showframe(1); keystatus[KEYSC_ESC] = keystatus[KEYSC_Q] = keystatus[KEYSC_F1] = 0; } } #define SOUND_NUMDISPLINES IHELP_NUMDISPLINES //extern char SoundToggle; static int32_t compare_sounds_s(int16_t k1, int16_t k2) { return (int32_t)k1 - (int32_t)k2; } static int32_t compare_sounds_d(int16_t k1, int16_t k2) { sound_t *s1 = &g_sounds[k1], *s2 = &g_sounds[k2]; char *n1 = s1->definedname, *n2 = s2->definedname; if (!n1 && !n2) return 0; if (!n1) return -1; if (!n2) return 1; return Bstrcasecmp(n1, n2); } static int32_t compare_sounds_f(int16_t k1, int16_t k2) { sound_t *s1 = &g_sounds[k1], *s2 = &g_sounds[k2]; char *n1 = s1->filename, *n2 = s2->filename; if (!n1 && !n2) return 0; if (!n1) return -1; if (!n2) return 1; return Bstrcasecmp(n1, n2); } static int32_t compare_sounds_1(int16_t k1, int16_t k2) { return (g_sounds[k2].m&1) - (g_sounds[k1].m&1); } static int32_t compare_sounds_2(int16_t k1, int16_t k2) { return (g_sounds[k2].m&2) - (g_sounds[k1].m&2); } static int32_t compare_sounds_3(int16_t k1, int16_t k2) { return (g_sounds[k2].m&4) - (g_sounds[k1].m&4); } static int32_t compare_sounds_4(int16_t k1, int16_t k2) { return (g_sounds[k2].m&8) - (g_sounds[k1].m&8); } static int32_t compare_sounds_5(int16_t k1, int16_t k2) { return (g_sounds[k2].m&16) - (g_sounds[k1].m&16); } static int32_t sort_sounds(int32_t how) { int32_t (*compare_sounds)(int16_t, int16_t) = NULL; int32_t ms, ofs, l, lb, r, rb, d, n, k1, k2; int16_t *src, *dst, *source, *dest, *tmp; n = g_numsounds; src = source = g_sndnum; dest = Bmalloc(sizeof(int16_t) * n); dst = dest; if (!dest) return -1; switch (how) { case 'g': // restore original order Bmemcpy(g_sndnum, g_definedsndnum, sizeof(int16_t)*n); return 0; case 's': compare_sounds = compare_sounds_s; break; case 'd': compare_sounds = compare_sounds_d; break; case 'f': compare_sounds = compare_sounds_f; break; case '1': compare_sounds = compare_sounds_1; break; case '2': compare_sounds = compare_sounds_2; break; case '3': compare_sounds = compare_sounds_3; break; case '4': compare_sounds = compare_sounds_4; break; case '5': compare_sounds = compare_sounds_5; break; default: return -2; } for (ms=1; ms= lb) { dst[d++] = src[r++]; continue; } if (r >= rb) { dst[d++] = src[l++]; continue; } k1 = src[l]; k2 = src[r]; if (compare_sounds(k1, k2) <= 0) { dst[d++] = src[l++]; continue; } dst[d++] = src[r++]; } } tmp = src; src = dst; dst = tmp; } if (src != source) Bmemcpy(source, src, sizeof(int16_t) * n); Bfree(dest); return 0; } static void SoundDisplay() { if (g_numsounds <= 0) return; overridepm16y = ydim;//3*STATUS2DSIZ; { int32_t i, j; // cursnd is the first displayed line, cursnd+curofs is where the cursor is static int32_t cursnd=0, curofs=0; char disptext[SOUND_NUMDISPLINES][80]; // SoundToggle = 1; while (keystatus[KEYSC_ESC]==0 && keystatus[KEYSC_Q]==0 && keystatus[KEYSC_F2]==0 && keystatus[buildkeys[BK_MODE2D_3D]]==0) // quickjump to 3d mode { begindrawing(); CLEARLINES2D(0, ydim16, 0); enddrawing(); idle_waitevent(); if (handleevents()) quitevent = 0; // drawgradient(); begindrawing(); printext16(9, ydim2d-overridepm16y+9, editorcolors[4], -1, "Sound Index", 0); printext16(8, ydim2d-overridepm16y+8, editorcolors[12], -1, "Sound Index", 0); printext16(8 + 11*8 + 2*8, ydim2d-overridepm16y+8, editorcolors[15], -1, "(SPACE:play, S:sort)", 0); enddrawing(); if (PRESSED_KEYSC(G)) // goto specified sound# { _printmessage16(" "); j = getnumber16("Goto sound#: ", 0, g_numsounds-1, 0); for (i=0; i=g_numsounds- 32/*SOUND_NUMDISPLINES*/) cursnd = g_numsounds-32/*SOUND_NUMDISPLINES*/, curofs = i-cursnd; else curofs = 32/*SOUND_NUMDISPLINES*//2, cursnd = i-curofs; } } else if (PRESSED_KEYSC(UP)) // scroll up { if (curofs>0) curofs--; else if (cursnd>0) cursnd--; } else if (PRESSED_KEYSC(DOWN)) // scroll down { if (curofs<32/*SOUND_NUMDISPLINES*/-1 && cursnd+curofs0 && curofs>0) i--, curofs--; while (i>0 && cursnd>0) i--, cursnd--; } else if (PRESSED_KEYSC(PGDN)) // scroll one page down { i=SOUND_NUMDISPLINES; while (i>0 && curofs<32/*SOUND_NUMDISPLINES*/-1 && cursnd+curofs0 && cursnd+32/*SOUND_NUMDISPLINES*/ < g_numsounds) i--, cursnd++; } else if (PRESSED_KEYSC(SPACE) || PRESSED_KEYSC(ENTER)) // play/stop sound { int32_t j = cursnd+curofs; int32_t k = g_sndnum[j]; if (S_CheckSoundPlaying(0, k) > 0) S_StopSound(k); else S_PlaySound(k); } else if (PRESSED_KEYSC(HOME)) // goto first sound# { cursnd = curofs = 0; } else if (PRESSED_KEYSC(END)) // goto last sound# { if ((cursnd=g_numsounds-32/*SOUND_NUMDISPLINES*/) >= 0) curofs=32/*SOUND_NUMDISPLINES*/-1; else { cursnd = 0; curofs = g_numsounds-1; } } _printmessage16(" FILE NAME PITCH RANGE PRI FLAGS VOLUME"); for (i=0; j=cursnd+i, i= ydim) break; Bsprintf(disptext[i], "%4d .................... ................ %6d:%-6d %3d %c%c%c%c%c %6d", // 5678901234567890X23456789012345678901234567 k, snd->ps, snd->pe, snd->pr, snd->m&1 ? 'R':'-', snd->m&2 ? 'M':'-', snd->m&4 ? 'D':'-', snd->m&8 ? 'P':'-', snd->m&16 ? 'G':'-', snd->vo); for (l = Bsnprintf(disptext[i]+5, 20, "%s", snd->definedname); l<20; l++) disptext[i][5+l] = ' '; if (snd->filename) { l = Bstrlen(snd->filename); if (l<=16) cp = snd->filename; else cp = snd->filename + l-15; for (m = Bsnprintf(disptext[i]+26, 16, "%s", cp); m<16; m++) disptext[i][26+m] = ' '; if (l>16) disptext[i][26] = disptext[i][27] = disptext[i][28] = '.'; } printext16(8, ydim-overridepm16y+28+i*9, keystatus[KEYSC_S]?editorcolors[8] : (S_CheckSoundPlaying(-1, k) ? editorcolors[2] : editorcolors[10]), j==cursnd+curofs ? editorcolors[1] : -1, disptext[i], 0); } if (keystatus[KEYSC_S]) // sorting { char ch, bad=0; _printmessage16("Sort by: (S)oundnum (D)ef (F)ile ori(g) or flags (12345)"); showframe(1); i=0; bflushchars(); while (bad == 0) { idle_waitevent(); if (handleevents()) quitevent = 0; ch = bgetchar(); if (keystatus[1]) bad = 1; else if (ch == 's' || ch == 'd' || ch == 'f' || ch == 'g' || ch == '1' || ch == '2' || ch == '3' || ch == '4' || ch == '5') { bad = 2; sort_sounds(ch); } } if (bad==1) { keystatus[KEYSC_ESC] = keystatus[KEYSC_Q] = keystatus[KEYSC_F2] = 0; } if (bad==2) { keystatus[KEYSC_S] = keystatus[KEYSC_D] = keystatus[KEYSC_F] = 0; keystatus[KEYSC_G] = keystatus[KEYSC_1] = keystatus[KEYSC_2] = 0; keystatus[KEYSC_3] = keystatus[KEYSC_4] = keystatus[KEYSC_5] = 0; } } else showframe(1); } overridepm16y = -1; // i=ydim16; // ydim16=ydim; // drawline16(0,ydim-STATUS2DSIZ,xdim-1,ydim-STATUS2DSIZ,editorcolors[1]); // ydim16=i; // // printmessage16(""); // showframe(1); FX_StopAllSounds(); S_ClearSoundLocks(); // SoundToggle = 0; keystatus[KEYSC_ESC] = keystatus[KEYSC_Q] = keystatus[KEYSC_F2] = 0; } } // PK_ ^^^^ // from sector.c static int32_t dist(spritetype *s1,spritetype *s2) { int32_t x = klabs(s1->x-s2->x); int32_t y = klabs(s1->y-s2->y); int32_t z = klabs((s1->z-s2->z)>>4); if (x>4) + (t>>2) + (t>>3)); } } extern int32_t NumVoices; extern int32_t g_numEnvSoundsPlaying; int32_t AmbienceToggle = 1; //SoundToggle; int32_t ParentalLock = 0; #undef T1 #define T1 (s->filler) // adapted from actors.c static void M32_MoveFX(void) { int32_t i, j; int32_t x, ht; spritetype *s; for (i=headspritestat[0]; i>=0; i=nextspritestat[i]) { s = &sprite[i]; if (s->picnum != MUSICANDSFX) { if (T1&1) { T1 &= (~1); S_StopEnvSound(s->lotag, i); } } else if (s->sectnum>=0) { ht = s->hitag; if (s->lotag < 999 && (unsigned)sector[s->sectnum].lotag < 9 && AmbienceToggle && sector[s->sectnum].floorz != sector[s->sectnum].ceilingz) { if ((g_sounds[s->lotag].m&2)) { x = dist((spritetype *)&pos,s); if (x < ht && (T1&1) == 0 && FX_VoiceAvailable(g_sounds[s->lotag].pr-1)) { if (g_numEnvSoundsPlaying == NumVoices) { for (j = headspritestat[0]; j >= 0; j = nextspritestat[j]) { if (s->picnum == MUSICANDSFX && j != i && sprite[j].lotag < 999 && (sprite[j].filler&1) == 1 && dist(&sprite[j],(spritetype *)&pos) > x) { S_StopEnvSound(sprite[j].lotag,j); break; } } if (j == -1) continue; } A_PlaySound(s->lotag,i); T1 |= 1; } if (x >= ht && (T1&1) == 1) { T1 &= (~1); S_StopEnvSound(s->lotag,i); } } } } } } #undef T1 ///__ShowHelpText__ void ExtShowSpriteData(int16_t spritenum) //F6 { UNREFERENCED_PARAMETER(spritenum); if (qsetmode != 200) ShowFileText("sehelp.hlp", 0); /* if (qsetmode == 200) // In 3D mode return; while (KEY_PRESSED(KEYSC_F6)); ResetKeys(); ContextHelp(spritenum); // Get context sensitive help */ }// end ExtShowSpriteData // Floor Over Floor (duke3d) // If standing in sector with SE42 or SE44 // then draw viewing to SE41 and raise all =hi SE43 cielings. // If standing in sector with SE43 or SE45 // then draw viewing to SE40 and lower all =hi SE42 floors. static int32_t fofsizex = -1; static int32_t fofsizey = -1; #if 0 static void ResetFOFSize() { if (fofsizex != -1) tilesizx[FOF] = fofsizex; if (fofsizey != -1) tilesizy[FOF] = fofsizey; } #endif static void ExtSE40Draw(int32_t spnum,int32_t x,int32_t y,int32_t z,int16_t a,int16_t h) { static int32_t tempsectorz[MAXSECTORS]; static int32_t tempsectorpicnum[MAXSECTORS]; int32_t i=0,j=0,k=0; int32_t floor1=0,floor2=0,ok=0,fofmode=0,draw_both=0; int32_t offx,offy,offz; if (sprite[spnum].ang!=512) return; // Things are a little different now, as we allow for masked transparent // floors and ceilings. So the FOF textures is no longer required // if (!(gotpic[FOF>>3]&(1<<(FOF&7)))) // return; // gotpic[FOF>>3] &= ~(1<<(FOF&7)); if (tilesizx[562]) { fofsizex = tilesizx[562]; tilesizx[562] = 0; } if (tilesizy[562]) { fofsizey = tilesizy[562]; tilesizy[562] = 0; } floor1=spnum; if (sprite[spnum].lotag==42) fofmode=40; if (sprite[spnum].lotag==43) fofmode=41; if (sprite[spnum].lotag==44) fofmode=40; if (sprite[spnum].lotag==45) fofmode=41; // fofmode=sprite[spnum].lotag-2; // sectnum=sprite[j].sectnum; // sectnum=cursectnum; ok++; /* recursive? for(j=0;j= 1024) offz = sprite[floor2].z; else if (fofmode==41) offz = SPRITESEC(floor2).floorz; else offz = SPRITESEC(floor2).ceilingz; if (sprite[floor1].ang >= 1024) offz -= sprite[floor1].z; else if (fofmode==40) offz -= SPRITESEC(floor1).floorz; else offz -= SPRITESEC(floor1).ceilingz; // if(ok==2) { Message("no floor2",RED); return; } for (j=0; j lastupdate) { mousecol += mouseadd; if (mousecol >= 30 || mousecol <= 0) { mouseadd = -mouseadd; mousecol += mouseadd; } lastupdate = totalclock + 3; } switch (whitecol) { case 1: // Shadow Warrior col = whitecol+mousecol; break; case 31: // Duke Nukem 3D col = whitecol-mousecol; break; default: col = whitecol; break; } if (col != whitecol) { for (i=((xdim > 640)?3:2); i<=((xdim > 640)?7:3); i++) { plotpixel(searchx+i,searchy,col); plotpixel(searchx-i,searchy,col); plotpixel(searchx,searchy-i,col); plotpixel(searchx,searchy+i,col); } for (i=1; i<=((xdim > 640)?2:1); i++) { plotpixel(searchx+i,searchy,whitecol); plotpixel(searchx-i,searchy,whitecol); plotpixel(searchx,searchy-i,whitecol); plotpixel(searchx,searchy+i,whitecol); } i = (xdim > 640)?8:4; plotpixel(searchx+i,searchy,0); plotpixel(searchx-i,searchy,0); plotpixel(searchx,searchy-i,0); plotpixel(searchx,searchy+i,0); } if (xdim > 640) { for (i=1; i<=4; i++) { plotpixel(searchx+i,searchy,whitecol); plotpixel(searchx-i,searchy,whitecol); plotpixel(searchx,searchy-i,whitecol); plotpixel(searchx,searchy+i,whitecol); } } } static int32_t AskIfSure(const char *text) { int32_t retval=1; if (qsetmode == 200) { begindrawing(); //{{{ printext256(0,0,whitecol,0,text?text:"Are you sure you want to proceed?",0); enddrawing(); //}}} } else { _printmessage16("%s", text?text:"Are you sure you want to proceed?"); } showframe(1); while ((keystatus[KEYSC_ESC]|keystatus[KEYSC_ENTER]|keystatus[KEYSC_SPACE]|keystatus[KEYSC_N]) == 0) { idle_waitevent(); if (handleevents()) { if (quitevent) { retval = 1; break; } } if (PRESSED_KEYSC(Y) || PRESSED_KEYSC(ENTER)) { retval = 0; break; } } if (PRESSED_KEYSC(ESC)) retval = 1; return(retval); } static int32_t IsValidTile(int32_t idTile) { return (idTile>=0 && idTile= 0) { int32_t tempint; tempint = localartfreq[temp]; localartfreq[temp] = localartfreq[temp+gap]; localartfreq[temp+gap] = tempint; tempint = localartlookup[temp]; localartlookup[temp] = localartlookup[temp+gap]; localartlookup[temp+gap] = tempint; if (iTile == temp) iTile = temp + gap; else if (iTile == temp + gap) iTile = temp; temp -= gap; } } gap >>= 1; } while (gap > 0); // // Set up count of number of used tiles // localartlookupnum = 0; while (localartfreq[localartlookupnum] > 0) localartlookupnum++; // // Check : If no tiles used at all then switch to displaying all tiles // if (!localartfreq[0]) { localartlookupnum = MAXTILES; for (i = 0; i < MAXTILES; i++) { localartlookup[i] = i; localartfreq[i] = 0; // Terrible bodge : zero tilefreq's not displayed in tile view. Still, when in Rome ... :-) } iTile = idInitialTile; } // // // iTopLeftTile = iTile - (iTile % nXTiles); iTopLeftTile = clamp(iTopLeftTile, 0, MAXTILES-nDisplayedTiles); zoomsz = ZoomToThumbSize[s_Zoom]; searchx = ((iTile-iTopLeftTile)%nXTiles)*zoomsz + zoomsz/2; searchy = ((iTile-iTopLeftTile)/nXTiles)*zoomsz + zoomsz/2; //////////////////////////////// // Start of key handling code // //////////////////////////////// while ((keystatus[KEYSC_ENTER]|keystatus[KEYSC_ESC]|(bstatus&1)) == 0) // <- Presumably one of these is escape key ?? { zoomsz = ZoomToThumbSize[s_Zoom]; DrawTiles(iTopLeftTile, (iTile >= localartlookupnum) ? localartlookupnum-1 : iTile, nXTiles, nYTiles, zoomsz, moffset, (tilesel_showerr && (iTile==iLastTile || (tilesel_showerr=0)))); iLastTile = iTile; idle_waitevent_timeout(500); // SDL seems to miss mousewheel events when rotated slowly. // These kludgy things seem to make it better, but I'm not sure. if (handleevents()) quitevent = 0; getmousevalues(&mousedx,&mousedy,&bstatus); searchx += mousedx; searchy += mousedy; if (bstatus&2) { moffset += mousedy*2; searchy += mousedy; searchx -= mousedx; if ((moffset < 0 && iTopLeftTile > localartlookupnum-nDisplayedTiles-1) || (moffset > 0 && iTopLeftTile==0)) { moffset=0; searchy -= mousedy*2; } while (moffset > zoomsz) { iTopLeftTile -= nXTiles; moffset -= zoomsz; } while (moffset < -zoomsz) { iTopLeftTile += nXTiles; moffset += zoomsz; } } // Keep the pointer visible at all times. temp = min(zoomsz/2, 12); searchx = clamp(searchx, temp, xdim-temp); searchy = clamp(searchy, temp, ydim-temp); scrollmode = !(eitherCTRL^revertCTRL); if (bstatus&16 && scrollmode && iTopLeftTile > 0) { mouseb &= ~16; iTopLeftTile -= (nXTiles*scrollamount); } else if (bstatus&32 && scrollmode && iTopLeftTile < localartlookupnum-nDisplayedTiles-1) { mouseb &= ~32; iTopLeftTile += (nXTiles*scrollamount); } mtile = iTile = searchx/zoomsz + ((searchy-moffset)/zoomsz)*nXTiles + iTopLeftTile; while (iTile >= iTopLeftTile + nDisplayedTiles) { iTile -= nXTiles; mtile = iTile; } // These two lines are so obvious I don't need to comment them ...;-) synctics = totalclock-lockclock; lockclock += synctics; // Zoom in / out using numeric key pad's / and * keys if (((keystatus[KEYSC_gSLASH] || (!scrollmode && bstatus&16)) && s_Zoom<(signed)(NUM_ZOOMS-1)) || ((keystatus[KEYSC_gSTAR] || (!scrollmode && bstatus&32)) && s_Zoom>0)) { if (PRESSED_KEYSC(gSLASH) || (!scrollmode && bstatus&16)) { mouseb &= ~16; bstatus &= ~16; // Watch out : If editor window is small, then the next zoom level // might get so large that even one tile might not fit ! if (ZoomToThumbSize[s_Zoom+1]<=xdim && ZoomToThumbSize[s_Zoom+1]<=ydim) { // Phew, plenty of room. s_Zoom++; } } else { keystatus[KEYSC_gSTAR] = 0; mouseb &= ~32; bstatus &= ~32; s_Zoom--; } zoomsz = ZoomToThumbSize[s_Zoom]; if (iTile >= localartlookupnum) iTile = localartlookupnum-1; // Calculate new num of tiles to display nXTiles = xdim / zoomsz; nYTiles = ydim / zoomsz; // Refuse to draw less than half of a row. if (zoomsz/2 < 12) nYTiles--; nDisplayedTiles = nXTiles * nYTiles; // Determine if the top-left displayed tile needs to // alter in order to display selected tile iTopLeftTile = iTile - (iTile % nXTiles); iTopLeftTile = clamp(iTopLeftTile, 0, MAXTILES - nDisplayedTiles); // scroll window so mouse points the same tile as it was before zooming iTopLeftTile -= searchx/zoomsz + ((searchy-moffset)/zoomsz)*nXTiles + iTopLeftTile-iTile; } if (PRESSED_KEYSC(LEFT)) { if (eitherCTRL) // same as HOME, for consistency with CTRL-UP/DOWN iTile = (iTile/nXTiles)*nXTiles; else iTile--; } if (PRESSED_KEYSC(RIGHT)) { if (eitherCTRL) // same as END, for consistency with CTRL-UP/DOWN iTile = ((iTile+nXTiles)/nXTiles)*nXTiles - 1; else iTile++; } if (PRESSED_KEYSC(UP)) { if (eitherCTRL) while (iTile-nXTiles >= iTopLeftTile) iTile -= nXTiles; else iTile -= nXTiles; } if (PRESSED_KEYSC(DOWN)) { if (eitherCTRL) while (iTile+nXTiles < iTopLeftTile + nDisplayedTiles) iTile += nXTiles; else iTile += nXTiles; } if (PRESSED_KEYSC(PGUP)) { if (eitherCTRL) iTile = 0; else iTile -= nDisplayedTiles; } if (PRESSED_KEYSC(PGDN)) { if (eitherCTRL) iTile = localartlookupnum-1; else iTile += nDisplayedTiles; } if (PRESSED_KEYSC(HOME)) { if (eitherCTRL) iTile = iTopLeftTile; else iTile = (iTile/nXTiles)*nXTiles; } if (PRESSED_KEYSC(END)) { if (eitherCTRL) iTile = iTopLeftTile + nDisplayedTiles - 1; else iTile = ((iTile+nXTiles)/nXTiles)*nXTiles - 1; } // 'V' KEYPRESS if (PRESSED_KEYSC(V)) iTile = SelectAllTiles(iTile); // 'G' KEYPRESS - Goto frame if (PRESSED_KEYSC(G)) { if (eitherCTRL) { if (OnSaveTileGroup() == 0) { // iTile = SelectAllTiles(iTile); Bmemset(tilemarked, 0, sizeof(tilemarked)); mark_lastk = -1; noTilesMarked = 1; } } else iTile = OnGotoTile(iTile); } // 'U' KEYPRESS : go straight to user defined art if (PRESSED_KEYSC(U)) { SelectAllTiles(iTile); iTile = FIRST_USER_ART_TILE; } // 'A' KEYPRESS : Go straight to start of Atomic edition's art if (PRESSED_KEYSC(A)) { SelectAllTiles(iTile); iTile = FIRST_ATOMIC_TILE; } // 'E' KEYPRESS : Go straight to start of extended art if (PRESSED_KEYSC(E)) { SelectAllTiles(iTile); if (iTile == FIRST_EXTENDED_TILE) iTile = SECOND_EXTENDED_TILE; else iTile = FIRST_EXTENDED_TILE; } // 'T' KEYPRESS = Select from pre-defined tileset if (PRESSED_KEYSC(T)) iTile = OnSelectTile(iTile); if (PRESSED_KEYSC(Z)) s_TileZoom = !s_TileZoom; // // Ensure tilenum is within valid range // iTile = clamp(iTile, 0, min(MAXTILES-1, localartlookupnum+nDisplayedTiles-1)); // 'S' KEYPRESS: search for named tile if (PRESSED_KEYSC(S)) { static char laststr[25] = ""; const char *searchstr = getstring_simple("Search for tile name: ", laststr, MAXTILES-1); static char buf[2][25]; if (searchstr && searchstr[0]) { int32_t i, i0, slen=Bstrlen(searchstr)-1; Bstrncpy(laststr, searchstr, 25); laststr[24] = 0; i0 = localartlookup[iTile]; Bmemcpy(buf[0], laststr, 25); Bstrupr(buf[0]); for (i=(i0+1)%MAXTILES; i!=i0; i=(i+1)%MAXTILES) { Bmemcpy(buf[1], names[i], 25); buf[1][24]=0; Bstrupr(buf[1]); if ((searchstr[0]=='^' && !Bstrncmp(buf[1], buf[0]+1, slen)) || (searchstr[0]!='^' && strstr(buf[1], buf[0]))) { SelectAllTiles(i); iTile = i; break; } } } } // // Adjust top-left to ensure tilenum is within displayed range of tiles // while (iTile < iTopLeftTile - (moffset<0)?nXTiles:0) iTopLeftTile -= nXTiles; while (iTile >= iTopLeftTile + nDisplayedTiles) iTopLeftTile += nXTiles; iTopLeftTile = clamp(iTopLeftTile, 0, MAXTILES - nDisplayedTiles); // SPACE keypress: mark/unmark selected tile if (PRESSED_KEYSC(SPACE)) { if (iTile < localartlookupnum && IsValidTile(localartlookup[iTile])) { if (keystatus[KEYSC_LCTRL] && keystatus[KEYSC_RSHIFT]) { Bmemset(tilemarked, 0, sizeof(tilemarked)); mark_lastk = -1; noTilesMarked = 1; } else { int32_t k=iTile, kend, dir; if (noTilesMarked) { noTilesMarked = 0; TMPERRMSG_PRINT("Beginning marking tiles. To group, press Ctrl-G. To reset, press LCtrl-RShift-SPACE."); } if (mark_lastk>=0 && eitherCTRL) { kend = mark_lastk; dir = ksgn(mark_lastk-k); } else { kend = k; dir = 0; } mark_lastk = k; for (; dir==0 || dir*(kend-k)>=1; k+=dir) { tilemarked[localartlookup[k]>>3] ^= (1<<(localartlookup[k]&7)); if (dir==0) break; } } } } if ((keystatus[KEYSC_ENTER] || (bstatus&1)) == 0) // uh ? Not escape key ? { idSelectedTile = idInitialTile; } else { if (iTile < localartlookupnum) { // Convert tile num from index to actual tile num idSelectedTile = localartlookup[iTile]; // Check : if invalid tile selected, return original tile num if (!IsValidTile(idSelectedTile)) idSelectedTile = idInitialTile; } else { idSelectedTile = idInitialTile; } } if (mtile!=iTile) // if changed by keyboard, update mouse cursor { searchx = ((iTile-iTopLeftTile)%nXTiles) * zoomsz + zoomsz/2; searchy = ((iTile-iTopLeftTile)/nXTiles) * zoomsz + zoomsz/2 + moffset; } } searchx=omousex; searchy=omousey; keystatus[KEYSC_ESC] = 0; keystatus[KEYSC_ENTER] = 0; return idSelectedTile; } // Dir = 0 (zoom out) or 1 (zoom in) //void OnZoomInOut( int32_t *pZoom, int32_t Dir /*0*/ ) //{ //} static int32_t OnSaveTileGroup() { int32_t i, n=0; char hotkey; const char *cp, *name; if (tile_groups==MAX_TILE_GROUPS) TMPERRMSG_RETURN("Cannot save tile group: maximum number of groups (%d) exceeded.", MAX_TILE_GROUPS); for (i=0; i>3]&(1<<(i&7))); if (n==0) TMPERRMSG_RETURN("Cannot save tile group: no tiles marked."); else if (n > MAX_TILE_GROUP_ENTRIES) TMPERRMSG_RETURN("Cannot save tile group: too many tiles in group. Have %d, max is %d.", n, MAX_TILE_GROUP_ENTRIES); cp = getstring_simple("Hotkey for new group: ", "", 1); if (!cp || !*cp) return 1; hotkey = Btoupper(cp[0]); if (!isalpha(hotkey)) TMPERRMSG_RETURN("Hotkey must be alphabetic."); for (i=0; i>3]&(1<<((i)&7)))) Bfprintf(fp, "\n"); Bfprintf(fp, "tilegroup \"%s\"\n{\n", name); Bfprintf(fp, TTAB "hotkey \"%c\"\n\n", hotkey); if (!(s_TileGroups[tile_groups].pIds = Bmalloc(n * sizeof(s_TileGroups[tile_groups].pIds[0])))) TMPERRMSG_RETURN("Out of memory."); j = 0; // tileranges for consecutive runs of 3 or more tiles for (i=0; i=0 && !TBITCHK(i)) { if (names[lasti][0] && names[i-1][0]) Bfprintf(fp, TTAB "tilerange %s %s\n", names[lasti], names[i-1]); else Bfprintf(fp, TTAB "tilerange %d %d\n", lasti, i-1); for (k=lasti; k>3] &= ~(1<<(k&7)); } lasti = -1; } else if (lasti==-1 && TBITCHK(i)) { if (TBITCHK(i+1) && TBITCHK(i+2)) { lasti = i; i += 2; } } } if (lasti>=0 && lasti<=MAXTILES-3) { for (k=lasti; k>3] &= ~(1<<(k&7)); } Bfprintf(fp, TTAB "tilerange %d %d\n", lasti, MAXTILES-1); } Bfprintf(fp, "\n"); // throw them all in a tiles{...} group else Bfprintf(fp, TTAB "tiles\n" TTAB "{\n"); for (i=0; i80) { Bfprintf(fp, "\n"); col = 0; } } } if (col>0) Bfprintf(fp, "\n"); Bfprintf(fp, TTAB "}\n"); #undef TBITCHK #undef TTAB Bfprintf(fp, "}\n"); Bfclose(fp); if (!(s_TileGroups[tile_groups].szText = Bstrdup(name))) { Bfree(s_TileGroups[tile_groups].pIds); TMPERRMSG_RETURN("Out of memory."); } s_TileGroups[tile_groups].nIds = n; s_TileGroups[tile_groups].key1 = Btoupper(hotkey); s_TileGroups[tile_groups].key2 = Btolower(hotkey); s_TileGroups[tile_groups].color1 = s_TileGroups[tile_groups].color2 = 0; tile_groups++; TMPERRMSG_PRINT("Wrote and installed new tile group."); } return 0; } static int32_t OnGotoTile(int32_t iTile) { int32_t iTemp, iNewTile; char ch; char szTemp[128]; //Automatically press 'V' iTile = SelectAllTiles(iTile); bflushchars(); iNewTile = iTemp = 0; //iTile; //PK while (keystatus[KEYSC_ESC] == 0) { if (handleevents()) quitevent = 0; idle_waitevent(); ch = bgetchar(); Bsprintf(szTemp, "Goto tile: %d_ ", iNewTile); printext256(0, 0, whitecol, 0, szTemp, 0); showframe(1); if (ch >= '0' && ch <= '9') { iTemp = (iNewTile*10) + (ch-'0'); if (iTemp < MAXTILES) iNewTile = iTemp; } else if (ch == 8) { iNewTile /= 10; } else if (ch == 13) { iTile = iNewTile; break; } } clearkeys(); return iTile; } static int32_t LoadTileSet(const int32_t idCurrentTile, const int32_t *pIds, const int32_t nIds) { int32_t iNewTile = 0; int32_t i; localartlookupnum = nIds; for (i = 0; i < localartlookupnum; i++) { localartlookup[i] = pIds[i]; // REM : Could we still utilise localartfreq[] to mark // which tiles are currently used in the map ? Set to 0xFFFF perhaps ? localartfreq[i] = 0; if (idCurrentTile == pIds[i]) iNewTile = i; } return iNewTile; } static int32_t OnSelectTile(int32_t iTile) { int32_t bDone = 0; int32_t i; char ch; if (tile_groups <= 0) { TMPERRMSG_PRINT("No tile groups loaded. Check for existence of `%s'.", default_tiles_cfg); return iTile; } SelectAllTiles(iTile); bflushchars(); setpolymost2dview(); clearview(0); // // Await appropriate selection keypress. // bDone = 0; while (keystatus[KEYSC_ESC] == 0 && !bDone) { if (handleevents()) quitevent = 0; idle_waitevent(); // // Display the description strings for each available tile group // for (i = 0; i < tile_groups; i++) { if (s_TileGroups[i].szText != NULL) { if ((i+2)*16 > ydimgame) break; Bsprintf(tempbuf,"(%c) %s",s_TileGroups[i].key1,s_TileGroups[i].szText); printext256(10L, (i+1)*16, whitecol, -1, tempbuf, 0); } } showframe(1); ch = bgetchar(); for (i = 0; i < tile_groups; i++) { if (s_TileGroups[i].pIds != NULL && s_TileGroups[i].key1) if ((ch == s_TileGroups[i].key1) || (ch == s_TileGroups[i].key2)) { iTile = LoadTileSet(iTile, s_TileGroups[i].pIds, s_TileGroups[i].nIds); bDone = 1; } } } showframe(1); clearkeys(); return iTile; } static const char *GetTilePixels(int32_t idTile) { char *pPixelData = 0; if (idTile >= 0 && idTile < MAXTILES) { if (!waloff[idTile]) loadtile(idTile); if (IsValidTile(idTile)) pPixelData = (char *)waloff[idTile]; } return pPixelData; } static int32_t DrawTiles(int32_t iTopLeft, int32_t iSelected, int32_t nXTiles, int32_t nYTiles, int32_t TileDim, int32_t offset, int32_t showmsg) { int32_t XTile, YTile; int32_t iTile, idTile; int32_t XPos, YPos; int32_t XOffset, YOffset; int32_t i, marked; const char *pRawPixels; int32_t TileSizeX, TileSizeY; int32_t DivInc,MulInc; char *pScreen; char szT[128]; begindrawing(); setpolymost2dview(); clearview(0); for (YTile = 0-(offset>0); YTile < nYTiles+(offset<0)+1; YTile++) { for (XTile = 0; XTile < nXTiles; XTile++) { iTile = iTopLeft + XTile + (YTile * nXTiles); if (iTile>=0 && iTile < localartlookupnum) { idTile = localartlookup[ iTile ]; // Get pointer to tile's raw pixel data pRawPixels = GetTilePixels(idTile); if (pRawPixels != NULL) { XPos = XTile * TileDim; YPos = YTile * TileDim+offset; if (polymost_drawtilescreen(XPos, YPos, idTile, TileDim, s_TileZoom)) { TileSizeX = tilesizx[ idTile ]; TileSizeY = tilesizy[ idTile ]; DivInc = 1; MulInc = 1; while ((TileSizeX/DivInc > TileDim) || (TileSizeY/DivInc) > TileDim) { DivInc++; } if (DivInc == 1 && s_TileZoom) { while ((TileSizeX*(MulInc+1)) <= TileDim && (TileSizeY*(MulInc+1)) <= TileDim) { MulInc++; } } TileSizeX = (TileSizeX / DivInc) * MulInc; TileSizeY = (TileSizeY / DivInc) * MulInc; for (YOffset = 0; YOffset < TileSizeY; YOffset++) { int32_t y=YPos+YOffset; if (y>=0 && y= 0 && YPos <= ydim-20) { Bsprintf(szT, "%d", localartfreq[iTile]); printext256(XPos, YPos, whitecol, -1, szT, 1); } } marked = (IsValidTile(idTile) && tilemarked[idTile>>3]&(1<<(idTile&7))); // // Draw white box around currently selected tile or marked tile // p1=(x1, y1), p2=(x1+TileDim-1, y1+TileDim-1) // if (iTile == iSelected || marked) { int32_t x1 = ((iTile-iTopLeft) % nXTiles)*TileDim; int32_t y1 = ((iTile - ((iTile-iTopLeft) % nXTiles) - iTopLeft)/nXTiles)*TileDim + offset; int32_t x2 = x1+TileDim-1; int32_t y2 = y1+TileDim-1; char markedcol = editorcolors[14]; setpolymost2dview(); y1=max(y1, 0); y2=min(y2, ydim-1); // box { int32_t xx[] = {x1, x1, x2, x2, x1}; int32_t yy[] = {y1, y2, y2, y1, y1}; plotlines2d(xx, yy, 5, iTile==iSelected ? whitecol : markedcol); } // cross if (marked) { int32_t xx[] = {x1, x2}; int32_t yy[] = {y1, y2}; plotlines2d(xx, yy, 2, markedcol); swaplong(&yy[0], &yy[1]); plotlines2d(xx, yy, 2, markedcol); } } } } } if (iSelected < 0 || iSelected >= MAXTILES) { enddrawing(); return 1; } idTile = localartlookup[ iSelected ]; // Draw info bar at bottom. // Clear out behind the text for improved visibility. //drawline256(0, (ydim-12)<<12, xdim<<12, (ydim-12)<<12, whitecol); for (i=ydim-12; i>2,ydim-10,whitecol,-1,szT,0); // EditArt animation flags. Bsprintf(szT,"%d, %d",(picanm[idTile]>>8)&0xFF,(picanm[idTile]>>16)&0xFF); printext256((xdim>>2)+100,ydim-10,whitecol,-1,szT,0); if (showmsg) TMPERRMSG_SHOW(0); m32_showmouse(); enddrawing(); showframe(1); return(0); } #undef TMPERRMSG_SHOW #undef TMPERRMSG_PRINT #undef TMPERRMSG_RETURN static int32_t spriteonceilingz(int32_t searchwall) { // int32_t z=sprite[searchwall].z; int32_t z = getceilzofslope(searchsector,sprite[searchwall].x,sprite[searchwall].y); if (sprite[searchwall].cstat&128) z -= ((tilesizy[sprite[searchwall].picnum]*sprite[searchwall].yrepeat)<<1); if ((sprite[searchwall].cstat&48) != 32) z += ((tilesizy[sprite[searchwall].picnum]*sprite[searchwall].yrepeat)<<2); return z; } static int32_t spriteongroundz(int32_t searchwall) { // int32_t z=sprite[searchwall].z; int32_t z = getflorzofslope(searchsector,sprite[searchwall].x,sprite[searchwall].y); if (sprite[searchwall].cstat&128) z -= ((tilesizy[sprite[searchwall].picnum]*sprite[searchwall].yrepeat)<<1); return z; } #define WIND1X 3 #define WIND1Y 150 static void tileinfo_doprint(int32_t x, int32_t y, char *buf, const char *label, int32_t value, int32_t pos) { int32_t small = (xdimgame<=640), i = ydimgame>>6; Bsprintf(buf,"%s:%4d",label,value); printext256(x+2, y+2+i*pos, 0, -1, buf, small); printext256(x, y+i*pos, whitecol, -1, buf, small); } static void drawtileinfo(const char *title,int32_t x,int32_t y,int32_t picnum,int32_t shade,int32_t pal,int32_t cstat,int32_t lotag,int32_t hitag,int32_t extra) { char buf[64]; int32_t small = (xdimgame<=640); int32_t scale=65536; int32_t x1; int32_t oviewingrange=viewingrange, oyxaspect=yxaspect; x1 = x+80; if (small) x1 /= 2; x1 *= 320.0/xdimgame; scale /= (max(tilesizx[picnum],tilesizy[picnum])/24.0); setaspect(65536L, (int32_t)divscale16(ydim*320L,xdim*200L)); // +1024: prevents rotatesprite from setting aspect itself rotatesprite((x1+13)<<16,(y+11)<<16,scale,0, picnum,shade,pal, 2+1024, 0,0,xdim-1,ydim-1); setaspect(oviewingrange, oyxaspect); x *= xdimgame/320.0; y *= ydimgame/200.0; begindrawing(); printext256(x+2,y+2,0,-1,title,small); printext256(x,y,255-13,-1,title,small); tileinfo_doprint(x, y, buf, "Pic", picnum, 1); tileinfo_doprint(x, y, buf, "Shd", shade, 2); tileinfo_doprint(x, y, buf, "Pal", pal, 3); tileinfo_doprint(x, y, buf, "Cst", cstat, 4); tileinfo_doprint(x, y, buf, "Lot", lotag, 5); tileinfo_doprint(x, y, buf, "Hit", hitag, 6); tileinfo_doprint(x, y, buf, "Ext", extra, 7); enddrawing(); } //int32_t snap=0; //int32_t saveval1,saveval2,saveval3; static inline void getnumber_dochar(char *ptr, int32_t num) { *ptr = (char) num; } static inline void getnumber_doint16_t(int16_t *ptr, int32_t num) { *ptr = (int16_t) num; } static inline void getnumber_doint32(int32_t *ptr, int32_t num) { *ptr = (int32_t) num; } static inline void getnumber_doint64(int64_t *ptr, int32_t num) { *ptr = (int64_t) num; } static void getnumberptr256(const char *namestart, void *num, int32_t bytes, int32_t maxnumber, char sign, void *(func)(int32_t)) { char buffer[80], ch; int32_t n, danum = 0, oldnum; switch (bytes) { case 1: danum = *(char *)num; break; case 2: danum = *(int16_t *)num; break; case 4: danum = *(int32_t *)num; break; case 8: danum = *(int64_t *)num; break; } oldnum = danum; bflushchars(); while (keystatus[0x1] == 0) { if (handleevents()) quitevent = 0; drawrooms(pos.x,pos.y,pos.z,ang,horiz,cursectnum); #ifdef SUPERBUILD ExtAnalyzeSprites(); #endif drawmasks(); #ifdef POLYMER if (rendmode == 4 && searchit == 2) { polymer_editorpick(); drawrooms(pos.x,pos.y,pos.z,ang,horiz,cursectnum); ExtAnalyzeSprites(); drawmasks(); } #endif ch = bgetchar(); if (keystatus[0x1]) break; clearkeys(); mouseb = 0; searchx = osearchx; searchy = osearchy; ExtCheckKeys(); Bsprintf(buffer,"%s%d",namestart,danum); if (totalclock & 32) Bstrcat(buffer,"_ "); printmessage256(0, 0, buffer); if (func != NULL) { Bsprintf(buffer,"%s",(char *)func((int32_t)danum)); printmessage256(0, 9, buffer); } showframe(1); if (ch >= '0' && ch <= '9') { if (danum >= 0) { n = (danum*10)+(ch-'0'); if (n <= maxnumber) danum = n; } else if (sign) { n = (danum*10)-(ch-'0'); if (n >= -maxnumber) danum = n; } } else if (ch == 8 || ch == 127) // backspace { danum /= 10; } else if (ch == 13) { if (danum != oldnum) asksave = 1; oldnum = danum; break; } else if (ch == '-' && sign) // negate { danum = -danum; } switch (bytes) { case 1: getnumber_dochar(num, danum); break; case 2: getnumber_doint16_t(num, danum); break; case 4: getnumber_doint32(num, danum); break; case 8: getnumber_doint64(num, danum); break; } } clearkeys(); lockclock = totalclock; //Reset timing switch (bytes) { case 1: getnumber_dochar(num, oldnum); break; case 2: getnumber_doint16_t(num, oldnum); break; case 4: getnumber_doint32(num, oldnum); break; case 8: getnumber_doint64(num, oldnum); break; } } static void DoSpriteOrnament(int32_t i) { int32_t j, hitw; hitdata_t hitinfo; hitscan((const vec3_t *)&sprite[i],sprite[i].sectnum, sintable[(sprite[i].ang+1536)&2047], sintable[(sprite[i].ang+1024)&2047], 0, &hitinfo,CLIPMASK1); sprite[i].x = hitinfo.pos.x; sprite[i].y = hitinfo.pos.y; sprite[i].z = hitinfo.pos.z; changespritesect(i,hitinfo.hitsect); hitw = hitinfo.hitwall; if (hitw >= 0) sprite[i].ang = (getangle(POINT2(hitw).x-wall[hitw].x, POINT2(hitw).y-wall[hitw].y)+512)&2047; //Make sure sprite's in right sector if (inside(sprite[i].x,sprite[i].y,sprite[i].sectnum) == 0) { j = wall[hitw].point2; sprite[i].x -= ksgn(wall[j].y-wall[hitw].y); sprite[i].y += ksgn(wall[j].x-wall[hitw].x); } } #if 0 int64_t ldistsqr(spritetype *s1,spritetype *s2) { return (((int64_t)(s2->x - s1->x))*((int64_t)(s2->x - s1->x)) + ((int64_t)(s2->y - s1->y))*((int64_t)(s2->y - s1->y))); } #endif static void TextEntryMode(int16_t startspr) { char ch, buffer[80], doingspace=0; int16_t daang = 0, t, alphidx, basetile, linebegspr, curspr, cursor; int32_t i, j, k, dax = 0, day = 0; static uint8_t hgap=0, vgap=4; static uint8_t spcgap[MAX_ALPHABETS], firstrun=1; spritetype *sp; int16_t *spritenums; int32_t stackallocsize=32, numletters=0; if (firstrun) { firstrun=0; for (i=0; i=MAXSPRITES || sprite[startspr].statnum == MAXSTATUS) return; if (numalphabets == 0) { message("Alphabet configuration not read."); return; } if ((sprite[startspr].cstat&16) == 0) { message("Must point at a wall-aligned text sprite."); return; } t = sprite[startspr].picnum; alphidx = -1; for (i=0; i>8)&255); sprite[startspr].yoffset = -(((picanm[t])>>16)&255); spritenums = Bmalloc(stackallocsize * sizeof(int16_t)); if (!spritenums) goto ERROR_NOMEMORY; cursor = insertsprite(sprite[startspr].sectnum,0); if (cursor < 0) goto ERROR_TOOMANYSPRITES; updatenumsprites(); sp = &sprite[cursor]; Bmemcpy(sp, &sprite[startspr], sizeof(spritetype)); sp->yoffset = 0; sp->picnum = SMALLFNTCURSOR; sp->xrepeat = clamp(sp->xrepeat/tilesizx[sp->picnum], 2, 255); sp->yrepeat = clamp((sp->yrepeat*tilesizy[sprite[startspr].picnum])/tilesizy[sp->picnum], 4, 255); sp->pal = 0; sp->cstat = 18; bflushchars(); while (keystatus[0x1] == 0) { if (handleevents()) quitevent = 0; if (PRESSED_KEYSC(UP)) // vertical gap in pixels (32 x-units) vgap += (vgap<255); if (PRESSED_KEYSC(DOWN)) vgap -= (vgap>0); if (PRESSED_KEYSC(RIGHT)) // horizontal gap in half pixels hgap += (hgap<255); if (PRESSED_KEYSC(LEFT)) hgap -= (hgap>0); if (PRESSED_KEYSC(INSERT)) // space gap in half pixels spcgap[alphidx] += (spcgap[alphidx]<255); if (PRESSED_KEYSC(DELETE)) spcgap[alphidx] -= (spcgap[alphidx]>1); if (PRESSED_KEYSC(HOME)) // shade sprite[linebegspr].shade += (sprite[linebegspr].shade<127); if (PRESSED_KEYSC(END)) sprite[linebegspr].shade -= (sprite[linebegspr].shade>-128); if (PRESSED_KEYSC(PGUP)) // pal sprite[linebegspr].pal += (sprite[linebegspr].pal<255); if (PRESSED_KEYSC(PGDN)) sprite[linebegspr].pal -= (sprite[linebegspr].pal>0); drawrooms(pos.x,pos.y,pos.z,ang,horiz,cursectnum); #ifdef SUPERBUILD ExtAnalyzeSprites(); #endif drawmasks(); #ifdef POLYMER if (rendmode == 4 && searchit == 2) { polymer_editorpick(); drawrooms(pos.x,pos.y,pos.z,ang,horiz,cursectnum); ExtAnalyzeSprites(); drawmasks(); } #endif ch = bgetchar(); if (keystatus[0x1]) break; clearkeys(); mouseb = 0; searchx = osearchx; searchy = osearchy; ExtCheckKeys(); printmessage256(0,0,"^251Text entry mode.^31 Navigation keys change vars."); Bsprintf(buffer, "Hgap=%d, Vgap=%d, SPCgap=%d, Shd=%d, Pal=%d", hgap, vgap, spcgap[alphidx], sprite[linebegspr].shade, sprite[linebegspr].pal); printmessage256(0, 9, buffer); showframe(1); // --- sp = &sprite[curspr]; if (!doingspace) { dax = sp->x; day = sp->y; daang = sp->ang; } j = sp->xrepeat*(hgap+tilesizx[sp->picnum]+2); { vec3_t vect; vect.x = dax + ((j*sintable[daang])>>17); vect.y = day - ((j*sintable[(daang+512)&2047])>>17); vect.z = sp->z; setsprite(cursor,&vect); } if (ch>=33 && ch<=126 && alphabets[alphidx].pic[ch-33] >= 0) { int16_t sect; // mapping char->tilenum t = alphabets[alphidx].pic[ch-33]; j = sp->xrepeat*(hgap+tilesizx[sp->picnum]+tilesizx[t]); dax += (j*sintable[daang])>>17; day -= (j*sintable[(daang+512)&2047])>>17; dax += (j*sintable[(sprite[curspr].ang+2560)&2047])>>17; day += (j*sintable[(sprite[curspr].ang+2048)&2047])>>17; sect = sprite[curspr].sectnum; updatesector(dax,day,§); if (numsprites < MAXSPRITES && sect >= 0) { i = insertsprite(sect,0); Bmemcpy(&sprite[i], &sprite[linebegspr], sizeof(spritetype)); sprite[i].sectnum = sect; sprite[i].x = dax, sprite[i].y = day; sprite[i].picnum = t; sprite[i].ang = daang; sprite[i].xoffset = -(((picanm[sprite[i].picnum])>>8)&255); sprite[i].yoffset = -(((picanm[sprite[i].picnum])>>16)&255); sprite[i].xoffset += alphabets[alphidx].xofs[(int32_t)ch-33]; sprite[i].yoffset += alphabets[alphidx].yofs[(int32_t)ch-33]; DoSpriteOrnament(i); for (k=0; k= stackallocsize) { stackallocsize *= 2; spritenums = Brealloc(spritenums, stackallocsize*sizeof(int16_t)); if (!spritenums) goto ERROR_NOMEMORY; } spritenums[numletters++] = i; } } else if (ch == 32) { dax += ((sp->xrepeat*spcgap[alphidx]*sintable[daang])>>17); day -= ((sp->xrepeat*spcgap[alphidx]*sintable[(daang+512)&2047])>>17); doingspace = 1; } else if (ch == 8) // backspace { if (doingspace) doingspace = 0; else if (numletters > 0) { int16_t last = spritenums[numletters-1]; if (sprite[last].z != sprite[linebegspr].z) // only "delete" line break { sprite[linebegspr].z = sprite[last].z; curspr = last; } else if (numletters > 1) { int16_t sectolast = spritenums[numletters-2]; if (sprite[last].z == sprite[sectolast].z) curspr = sectolast; else // if we delete the first letter on the line curspr = linebegspr; numletters--; deletesprite(last); updatenumsprites(); asksave = 1; } else { numletters--; deletesprite(last); curspr = linebegspr; updatenumsprites(); asksave = 1; } } else { sprite[linebegspr].z -= ((sprite[linebegspr].yrepeat*(vgap+tilesizy[basetile]))<<2); asksave = 1; } } else if (ch == 13) // enter { sprite[linebegspr].z += ((sprite[linebegspr].yrepeat*(vgap+tilesizy[basetile]))<<2); curspr = linebegspr; doingspace = 0; asksave = 1; } } ERROR_TOOMANYSPRITES: if (cursor < 0) message("Too many sprites in map!"); else deletesprite(cursor); updatenumsprites(); ERROR_NOMEMORY: if (spritenums) Bfree(spritenums); else message("Out of memory!"); clearkeys(); lockclock = totalclock; //Reset timing } static void mouseaction_movesprites(int32_t *sumxvect, int32_t *sumyvect, int32_t yangofs, int32_t mousexory) { int32_t xvect,yvect, daxvect,dayvect, ii, spi; int32_t units, gridlock = (eitherCTRL && grid > 0 && grid < 9); spritetype *sp = &sprite[searchwall]; int16_t tsect = sp->sectnum; vec3_t tvec = { sp->x, sp->y, sp->z }; xvect = -((mousexory*(int32_t)sintable[(ang+yangofs+512)&2047])<<3); yvect = -((mousexory*(int32_t)sintable[(ang+yangofs)&2047])<<3); if (gridlock) { units = 1<<(11-grid); if ((tvec.x & (units-1)) || (tvec.y & (units-1))) { daxvect = ((tvec.x & ~(units-1)) - tvec.x)<<14; dayvect = ((tvec.y & ~(units-1)) - tvec.y)<<14; } else { units <<= 14; *sumxvect += xvect; *sumyvect += yvect; if (klabs(*sumxvect) >= units) { daxvect = ((*sumxvect)/units)*units; *sumxvect %= units; } else daxvect = 0; if (klabs(*sumyvect) >= units) { dayvect = ((*sumyvect)/units)*units; *sumyvect %= units; } else dayvect = 0; } } else { daxvect = xvect; dayvect = yvect; } if (highlightcnt<=0 || (show2dsprite[searchwall>>3] & (1<<(searchwall&7)))==0) { clipmove(&tvec, &tsect, daxvect,dayvect, sp->clipdist,64<<4,64<<4, spnoclip?1:CLIPMASK0); setsprite(searchwall, &tvec); } else { xvect = daxvect; yvect = dayvect; for (ii=0; ii 0 && AmbienceToggle) { M32_MoveFX(); S_Update(); } if (usedcount && !helpon) { #if 0 if (!AIMING_AT_SPRITE) { count=0; for (i=0; i -1 && searchsector < numsectors) { char lines[8][64]; int32_t dist, height1=0,height2=0,height3=0, num=0; int32_t x,y; int16_t w; if (infobox&1) { height2 = sector[searchsector].floorz - sector[searchsector].ceilingz; switch (searchstat) { case SEARCH_WALL: case SEARCH_MASKWALL: w = SELECT_WALL(); drawtileinfo("Current", WIND1X,WIND1Y, AIMING_AT_WALL ? wall[w].picnum : wall[w].overpicnum, wall[w].shade, wall[w].pal, wall[searchwall].cstat, wall[searchwall].lotag, wall[searchwall].hitag,wall[searchwall].extra); dist = wallength(searchwall); if (wall[searchwall].nextsector >= 0 && wall[searchwall].nextsector < numsectors) { int32_t nextsect = wall[searchwall].nextsector; height1 = sector[searchsector].floorz - sector[nextsect].floorz; height2 = sector[nextsect].floorz - sector[nextsect].ceilingz; height3 = sector[nextsect].ceilingz - sector[searchsector].ceilingz; } Bsprintf(lines[num++],"Panning: %d, %d", wall[w].xpanning, wall[w].ypanning); Bsprintf(lines[num++],"Repeat: %d, %d", wall[searchwall].xrepeat, wall[searchwall].yrepeat); Bsprintf(lines[num++],"Overpic: %d", wall[searchwall].overpicnum); lines[num++][0]=0; if (getmessageleng) break; Bsprintf(lines[num++],"^251Wall %d^31", searchwall); if (wall[searchwall].nextsector!=-1) Bsprintf(lines[num++],"LoHeight:%d, HiHeight:%d, Length:%d",height1,height3,dist); else Bsprintf(lines[num++],"Height:%d, Length:%d",height2,dist); break; case SEARCH_CEILING: case SEARCH_FLOOR: drawtileinfo("Current", WIND1X, WIND1Y, AIMED_CEILINGFLOOR(picnum), AIMED_CEILINGFLOOR(shade), AIMED_CEILINGFLOOR(pal), AIMED_CEILINGFLOOR(stat), sector[searchsector].lotag, sector[searchsector].hitag, sector[searchsector].extra); Bsprintf(lines[num++],"Panning: %d, %d", AIMED_CEILINGFLOOR(xpanning), AIMED_CEILINGFLOOR(ypanning)); Bsprintf(lines[num++],"%sZ: %d", Typestr[searchstat], AIMED_CEILINGFLOOR(z)); Bsprintf(lines[num++],"Slope: %d", AIMED_CEILINGFLOOR(heinum)); lines[num++][0]=0; if (getmessageleng) break; Bsprintf(lines[num++],"^251Sector %d^31 %s, Lotag:%s", searchsector, typestr[searchstat], ExtGetSectorCaption(searchsector)); Bsprintf(lines[num++],"Height: %d, Visibility:%d", height2, sector[searchsector].visibility); break; case SEARCH_SPRITE: drawtileinfo("Current", WIND1X, WIND1Y, sprite[searchwall].picnum, sprite[searchwall].shade, sprite[searchwall].pal, sprite[searchwall].cstat, sprite[searchwall].lotag, sprite[searchwall].hitag, sprite[searchwall].extra); Bsprintf(lines[num++], "Repeat: %d,%d", sprite[searchwall].xrepeat, sprite[searchwall].yrepeat); Bsprintf(lines[num++], "PosXY: %d,%d", sprite[searchwall].x, sprite[searchwall].y); Bsprintf(lines[num++], "PosZ: "" %d", sprite[searchwall].z);// prevents tab character lines[num++][0]=0; if (getmessageleng) break; if (names[sprite[searchwall].picnum][0]) { if (sprite[searchwall].picnum==SECTOREFFECTOR) Bsprintf(lines[num++],"^251Sprite %d^31 %s", searchwall, SectorEffectorText(searchwall)); else Bsprintf(lines[num++],"^251Sprite %d^31 %s", searchwall, names[sprite[searchwall].picnum]); } else Bsprintf(lines[num++],"^251Sprite %d^31, picnum %d", searchwall, sprite[searchwall].picnum); Bsprintf(lines[num++], "Elevation:%d", getflorzofslope(searchsector, sprite[searchwall].x, sprite[searchwall].y) - sprite[searchwall].z); break; } } x = WIND1X*(xdimgame/320.); y = WIND1Y*(ydimgame/200.); y += (ydimgame>>6)*8; if (getmessageleng) { while (num < 4) lines[num++][0] = 0; Bsprintf(lines[num++],"^251%s",getmessage); } begindrawing(); for (i=0; i>6; } enddrawing(); } VM_OnEvent(EVENT_PREKEYS3D, -1); if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(V)) // ' V { if (AIMING_AT_CEILING_OR_FLOOR) getnumberptr256("Sector visibility: ", §or[searchsector].visibility, sizeof(sector[0].visibility), 255, 0, NULL); } if (keystatus[KEYSC_SEMI] && PRESSED_KEYSC(V)) // ; V { int16_t currsector; uint8_t visval; if (highlightsectorcnt == -1) { message("You didn't select any sectors!"); return; } visval = getnumber256("Visibility of selected sectors: ", sector[searchsector].visibility, 255, 0); if (AskIfSure(0)) return; for (i=0; i= 0) NEXTWALL(searchwall).overpicnum = tempint; if (oldtile != tempint) asksave = 1; } } if (PRESSED_KEYSC(3)) /* 3 (toggle floor-over-floor (cduke3d only) */ { floor_over_floor = !floor_over_floor; // if (!floor_over_floor) ResetFOFSize(); message("Floor-over-floor display %s",floor_over_floor?"enabled":"disabled"); } if (PRESSED_KEYSC(F3)) { mlook = !mlook; message("Mouselook: %s",mlook?"enabled":"disabled"); } if (PRESSED_KEYSC(F4)) { AmbienceToggle = !AmbienceToggle; message("Ambience sounds: %s",AmbienceToggle?"enabled":"disabled"); if (!AmbienceToggle) { FX_StopAllSounds(); S_ClearSoundLocks(); } } // PK if (PRESSED_KEYSC(F5)) { unrealedlook = !unrealedlook; message("UnrealEd mouse navigation: %s",unrealedlook?"enabled":"disabled"); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(DELETE)) // ' del { if (AIMING_AT_WALL_OR_MASK) { wall[searchwall].cstat = 0; message("Wall %d cstat = 0", searchwall); } else if (AIMING_AT_SPRITE) { sprite[searchwall].cstat = 0; message("Sprite %d cstat = 0", searchwall); } } // 'P and ;P - Will copy palette to all sectors/walls/sprites highlighted with R-Alt key if ((keystatus[KEYSC_QUOTE] || keystatus[KEYSC_SEMI]) && PRESSED_KEYSC(P)) // ' P ; P { int16_t w, start_wall, end_wall, currsector; int8_t pal[4]; if (highlightsectorcnt == -1) { message("You didn't select any sectors!"); return; } if (keystatus[KEYSC_QUOTE]) { pal[0] = getnumber256("Ceiling palette: ", -1, MAXPALOOKUPS-1, 1); pal[1] = getnumber256("Floor palette: ", -1, MAXPALOOKUPS-1, 1); pal[2] = getnumber256("Wall palette: ", -1, MAXPALOOKUPS-1, 1); pal[3] = getnumber256("Sprite palette: ", -1, MAXPALOOKUPS-1, 1); } else { pal[0] = getnumber256("Global palette: ", 0, MAXPALOOKUPS-1, 0); pal[1] = pal[2] = pal[3] = pal[0]; } if (AskIfSure(0)) return; for (i = 0; i < highlightsectorcnt; i++) { currsector = highlightsector[i]; if (pal[0] > -1) sector[currsector].ceilingpal = pal[0]; if (pal[1] > -1) sector[currsector].floorpal = pal[1]; // Do all the walls in the sector start_wall = sector[currsector].wallptr; end_wall = start_wall + sector[currsector].wallnum; if (pal[2] > -1) for (w = start_wall; w < end_wall; w++) wall[w].pal = pal[2]; if (pal[3] > -1) { for (k=0; k= 0) { j = nextspritesect[w]; sprite[w].pal = pal[3]; w = j; } } } } message("Palettes changed"); } if (PRESSED_KEYSC(DELETE)) { if (AIMING_AT_SPRITE) { deletesprite(searchwall); updatenumsprites(); message("Sprite %d deleted",searchwall); if (AmbienceToggle) { sprite[searchwall].filler &= (~1); S_StopEnvSound(sprite[searchwall].lotag, searchwall); } asksave = 1; } } if (PRESSED_KEYSC(F6)) //F6 { autospritehelp = !autospritehelp; message("Automatic SECTOREFFECTOR help %s", autospritehelp?"enabled":"disabled"); } if (PRESSED_KEYSC(F7)) //F7 { autosecthelp = !autosecthelp; message("Automatic sector tag help %s", autosecthelp?"enabled":"disabled"); } if (autospritehelp && helpon==0) { if (AIMING_AT_SPRITE && sprite[searchwall].picnum==SECTOREFFECTOR) ShowFileText("sehelp.hlp", 1); else if (AIMING_AT_CEILING_OR_FLOOR) ShowFileText("sthelp.hlp", 1); } if (AIMING_AT_WALL_OR_MASK && PRESSED_KEYSC(PERIOD)) { AutoAlignWalls((int32_t)searchwall, 0); message("Wall %d autoalign", searchwall); } tsign = 0; tsign -= PRESSED_KEYSC(COMMA); tsign += PRESSED_KEYSC(PERIOD); if (tsign) // , . Search & fix panning to the left/right (3D) { if (AIMING_AT_SPRITE) { sprite[searchwall].ang += tsign<<(!eitherSHIFT*7); sprite[searchwall].ang &= 2047; message("Sprite %d angle: %d", searchwall, sprite[searchwall].ang); } } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(L)) // ' L { i = noclip; noclip = 1; switch (searchstat) { case SEARCH_CEILING: getnumberptr256("Sector ceilingz: ", §or[searchsector].ceilingz, sizeof(sector[0].ceilingz), BZ_MAX, 1, NULL); if (!(sector[searchsector].ceilingstat&2)) { sector[searchsector].ceilingstat |= 2; sector[searchsector].ceilingheinum = 0; } getnumberptr256("Sector ceiling slope: ", §or[searchsector].ceilingheinum, sizeof(sector[0].ceilingheinum), 65536, 1, NULL); break; case SEARCH_FLOOR: getnumberptr256("Sector floorz: ", §or[searchsector].floorz, sizeof(sector[0].floorz), BZ_MAX, 1, NULL); if (!(sector[searchsector].floorstat&2)) { sector[searchsector].floorheinum = 0; sector[searchsector].floorstat |= 2; } getnumberptr256("Sector floor slope: ", §or[searchsector].floorheinum, sizeof(sector[0].floorheinum), 65536, 1, NULL); break; case SEARCH_SPRITE: getnumberptr256("Sprite x: ", &sprite[searchwall].x, sizeof(sprite[0].x), editorgridextent-1, 1, NULL); getnumberptr256("Sprite y: ", &sprite[searchwall].y, sizeof(sprite[0].y), editorgridextent-1, 1, NULL); getnumberptr256("Sprite z: ", &sprite[searchwall].z, sizeof(sprite[0].z), BZ_MAX, 1, NULL); getnumberptr256("Sprite angle: ", &sprite[searchwall].ang, sizeof(sprite[0].ang), 2047, 0, NULL); break; } if (sector[searchsector].ceilingheinum == 0) sector[searchsector].ceilingstat &= ~2; else sector[searchsector].ceilingstat |= 2; if (sector[searchsector].floorheinum == 0) sector[searchsector].floorstat &= ~2; else sector[searchsector].floorstat |= 2; asksave = 1; noclip = i; } getzrange(&pos, cursectnum, &hiz, &hihit, &loz, &lohit, 128L, CLIPMASK0); if (PRESSED_KEYSC(CAPS) || (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(Z))) // CAPS LOCK { zmode = (zmode+1)%3; if (zmode == 1) zlock = (loz-pos.z)&0xfffffc00; switch (zmode) { case 0: message("Zmode = Gravity"); break; case 1: message("Zmode = Locked/Sector"); break; case 2: message("Zmode = Locked/Free"); break; } } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(M)) // 'M { if (ASSERT_AIMING) { Bsprintf(tempbuf, "%s extra: ", Typestr_wss[searchstat]); getnumberptr256(tempbuf, &AIMED(extra), sizeof(int16_t), BTAG_MAX, 1, NULL); asksave = 1; } } if (PRESSED_KEYSC(1) && ASSERT_AIMING) // 1 (make 1-way wall) { if (!AIMING_AT_SPRITE) { wall[searchwall].cstat ^= 32; message("Wall %d one side masking bit %s", searchwall, ONOFF(wall[searchwall].cstat&32)); } else { i = sprite[searchwall].cstat; i ^= 64; if ((i&48) == 32) { i &= ~8; if ((i&64) && pos.z>sprite[searchwall].z) i |= 8; } message("Sprite %d one sided bit %s", searchwall, ONOFF(i&64)); sprite[searchwall].cstat = i; } asksave = 1; } if (PRESSED_KEYSC(2)) // 2 (bottom wall swapping) { if (searchstat != SEARCH_SPRITE) { wall[searchwall].cstat ^= 2; message("Wall %d bottom texture swap bit %s", searchwall, ONOFF(wall[searchwall].cstat&2)); asksave = 1; } } if (PRESSED_KEYSC(O)) // O (top/bottom orientation - for doors) { if (AIMING_AT_WALL_OR_MASK) { int16_t w = SELECT_WALL(); wall[w].cstat ^= 4; message("Wall %d %s orientation", w, wall[w].cstat&4?"bottom":"top"); asksave = 1; } else if (AIMING_AT_SPRITE) // O (ornament onto wall) (2D) { DoSpriteOrnament(searchwall); message("Sprite %d ornament onto wall", searchwall); asksave = 1; } } if (PRESSED_KEYSC(M)) // M (masking walls) { if (!AIMING_AT_SPRITE && ASSERT_AIMING) { int16_t next = wall[searchwall].nextwall; if (next >= 0) { wall[searchwall].cstat ^= 16; message("Wall %d masking bit %s", searchwall, ONOFF(wall[searchwall].cstat&16)); wall[searchwall].cstat &= ~8; if (wall[searchwall].cstat&16) { if (!eitherSHIFT) { wall[next].cstat |= 8; //auto other-side flip wall[next].cstat |= 16; wall[next].overpicnum = wall[searchwall].overpicnum; } } else { if (!eitherSHIFT) { wall[next].cstat &= ~8; //auto other-side unflip wall[next].cstat &= ~16; } } wall[searchwall].cstat &= ~32; if (!eitherSHIFT) wall[next].cstat &= ~32; asksave = 1; } } } if (PRESSED_KEYSC(H)) // H (hitscan sensitivity) { if (keystatus[KEYSC_QUOTE]) { if (ASSERT_AIMING) { Bsprintf(tempbuf, "%s hitag: ", Typestr_wss[searchstat]); getnumberptr256(tempbuf, &AIMED(hitag), sizeof(int16_t), BTAG_MAX, 0, NULL); } } else { if (AIMING_AT_SPRITE) { sprite[searchwall].cstat ^= 256; message("Sprite %d hitscan sensitivity bit %s", searchwall, ONOFF(sprite[searchwall].cstat&256)); asksave = 1; } else { wall[searchwall].cstat ^= 64; if (wall[searchwall].nextwall >= 0 && !eitherSHIFT) { NEXTWALL(searchwall).cstat &= ~64; NEXTWALL(searchwall).cstat |= (wall[searchwall].cstat&64); } message("Wall %d hitscan sensitivity bit %s", searchwall, ONOFF(wall[searchwall].cstat&64)); asksave = 1; } } } smooshyalign = keystatus[KEYSC_gKP5]; repeatpanalign = eitherSHIFT || eitherALT || (bstatus&2); if (mlook == 2) mlook = 0; if (!unrealedlook && (bstatus&4)) mlook = 2; // PK: no btn: wheel changes shade if ((bstatus&(16|32) && !(bstatus&(1|2|4))) || keystatus[KEYSC_gMINUS] || keystatus[KEYSC_gPLUS]) { // if (bstatus&1) // mlook = 2; tsign = 0; if (bstatus&32 || PRESSED_KEYSC(gMINUS)) // - tsign = 1; if (bstatus&16 || PRESSED_KEYSC(gPLUS)) // + tsign = -1; if (tsign) { mouseb &= ~(16|32); bstatus &= ~(16|32); if (eitherALT) //ALT { if (eitherCTRL) //CTRL { if (tsign==1) visibility <<= (visibility < 16384); else visibility >>= (visibility > 32); message("Global visibility %d", visibility); } else { k=eitherSHIFT?1:16; if (highlightsectorcnt >= 0) for (i=0; i 0) { for (i=0; i 0) { sector[searchsector].visibility += tsign; if (tsign==1) { if (sector[searchsector].visibility == 240) sector[searchsector].visibility = 239; } else if (sector[searchsector].visibility == 239) sector[searchsector].visibility = 240; k--; } message("Sector %d visibility %d",searchsector,sector[searchsector].visibility); asksave = 1; } } else // if !eitherALT { k = 0; if (highlightsectorcnt >= 0) { for (i=0; i1->3->2->0 i = wall[searchbottomwall].cstat; i = ((i>>3)&1)+((i>>7)&2); //3-x,8-y i = next[i]; message("Wall %d flip %d",searchwall,i); i = ((i&1)<<3)+((i&2)<<7); wall[searchbottomwall].cstat &= ~0x0108; wall[searchbottomwall].cstat |= i; asksave = 1; } else if (AIMING_AT_CEILING_OR_FLOOR) //8-way ceiling/floor flipping (bits 2,4,5) { static const int32_t next[8] = { 6, 7, 4, 5, 0, 1, 3, 2 }; // 0->6->3->5->1->7->2->4->0 int16_t *stat = AIMING_AT_CEILING ? §or[searchsector].ceilingstat : §or[searchsector].floorstat; i = *stat; i = (i&0x4)+((i>>4)&3); i = next[i]; message("Sector %d flip %d", searchsector, i); i = (i&0x4)+((i&3)<<4); *stat &= ~0x34; *stat |= i; asksave = 1; } else if (AIMING_AT_SPRITE) { i = sprite[searchwall].cstat; if (((i&48) == 32) && ((i&64) == 0)) { sprite[searchwall].cstat &= ~0xc; sprite[searchwall].cstat |= ((i&4)^4); message("Sprite %d flip bit %s",searchwall, ONOFF(sprite[searchwall].cstat&4)); } else { int32_t next[4] = { 1, 3, 0, 2 }; // 0->1->3->2->0 i = ((i>>2)&3); i = next[i]; message("Sprite %d flip %d",searchwall,i); sprite[searchwall].cstat &= ~0xc; sprite[searchwall].cstat |= (i<<2); } asksave = 1; } } } if (keystatus[KEYSC_HOME]) updownunits = 256; else if (keystatus[KEYSC_END]) updownunits = 512; else updownunits = 1024; mouseaction=0; if (eitherALT && (bstatus&1)) { mousex=0; mskip=1; if (mousey!=0) { updownunits=klabs(mousey*128); mouseaction=1; } } tsign = 0; if (ASSERT_AIMING) { // PK: PGUP/PGDN, rmb only & mwheel tsign -= (PRESSED_KEYSC(PGUP) || (mouseaction && mousey<0) || ((bstatus&18)==18 && !(bstatus&1))); tsign += (PRESSED_KEYSC(PGDN) || (mouseaction && mousey>0) || ((bstatus&34)==34 && !(bstatus&1))); } if (tsign) { k = 0; if (highlightsectorcnt >= 0) { for (i=0; i=0 && (eitherALT && !(bstatus&1))) ? wall[searchwall].nextsector : searchsector); for (j=0; j<(k?k:1); j++, sect=highlightsector[j]) { i = headspritesect[sect]; while (i != -1) { tempint = getceilzofslope(sect, sprite[i].x, sprite[i].y); tempint += (tilesizy[sprite[i].picnum]*sprite[i].yrepeat)<<2; if (sprite[i].cstat&128) tempint += (tilesizy[sprite[i].picnum]*sprite[i].yrepeat)<<1; if (sprite[i].z == tempint) sprite[i].z += tsign * (updownunits << (eitherCTRL<<1)); // JBF 20031128 i = nextspritesect[i]; } sector[sect].ceilingz += tsign * (updownunits << (eitherCTRL<<1)); // JBF 20031128 message("Sector %d ceilingz = %d", sect, sector[sect].ceilingz); } } else if (AIMING_AT_FLOOR) { int16_t sect = k ? highlightsector[0] : searchsector; for (j=0; j<(k?k:1); j++, sect=highlightsector[j]) { i = headspritesect[sect]; while (i != -1) { tempint = getflorzofslope(sect,sprite[i].x,sprite[i].y); if (sprite[i].cstat&128) tempint += ((tilesizy[sprite[i].picnum]*sprite[i].yrepeat)<<1); if (sprite[i].z == tempint) sprite[i].z += tsign * (updownunits << (eitherCTRL<<1)); // JBF 20031128 i = nextspritesect[i]; } sector[sect].floorz += tsign * (updownunits << (eitherCTRL<<1)); // JBF 20031128 message("Sector %d floorz = %d",sect,sector[sect].floorz); } } if (sector[searchsector].floorz < sector[searchsector].ceilingz) { if (tsign==-1) sector[searchsector].floorz = sector[searchsector].ceilingz; else sector[searchsector].ceilingz = sector[searchsector].floorz; } if (AIMING_AT_SPRITE) { if (eitherCTRL && !eitherALT) //CTRL - put sprite on ceiling/floor { if (tsign==-1) sprite[searchwall].z = spriteonceilingz(searchwall); else sprite[searchwall].z = spriteongroundz(searchwall); } else { k = 0; if (highlightcnt >= 0) for (i=0; i= 0) { int32_t thisSec = ms/1000; int32_t x = (xdim <= 640); int32_t chars = Bsprintf(tempbuf, "%2u ms (%3u fps)", howlong, LastCount); if (!x) { printext256(windowx2-(chars<<3)+1,windowy1+2,0,-1,tempbuf,x); printext256(windowx2-(chars<<3),windowy1+1,COLOR_WHITE,-1,tempbuf,x); } else { printext256(windowx2-(chars<<2)+1,windowy1+2,0,-1,tempbuf,x); printext256(windowx2-(chars<<2),windowy1+1,COLOR_WHITE,-1,tempbuf,x); } if (LastSec < thisSec) { LastCount = FrameCount / (thisSec - LastSec); LastSec = thisSec; FrameCount = 0; } FrameCount++; } LastMS = ms; } tempbuf[0] = 0; if ((bstatus&(4|2|1))==4 && !unrealedlook) //PK Bsprintf(tempbuf,"VIEW"); else if ((bstatus&(2|1))==2) Bsprintf(tempbuf,"Z%s", keystatus[KEYSC_HOME]?" 256":keystatus[KEYSC_END]?" 512":""); else if ((bstatus&(2|1))==1) Bsprintf(tempbuf,"LOCK"); if (bstatus&1) { Bsprintf(tempbuf,"LOCK"); switch (searchstat) { case SEARCH_WALL: case SEARCH_MASKWALL: if (eitherALT) Bsprintf(tempbuf,"CEILING Z %s", eitherCTRL?"512":""); else if (eitherSHIFT) Bsprintf(tempbuf,"PAN %s", eitherCTRL?"8":""); else if (eitherCTRL) Bsprintf(tempbuf,"SCALE"); break; case SEARCH_CEILING: case SEARCH_FLOOR: if (eitherALT) Bsprintf(tempbuf,"%s Z %s", AIMING_AT_CEILING?"CEILING":"FLOOR", eitherCTRL?"512":""); else if (eitherSHIFT) Bsprintf(tempbuf,"PAN"); else if (eitherCTRL) Bsprintf(tempbuf,"SLOPE"); break; case SEARCH_SPRITE: if (eitherALT) Bsprintf(tempbuf,"MOVE Z %s", eitherCTRL?"1024":""); else if (eitherSHIFT) Bsprintf(tempbuf,"MOVE XY %s", eitherCTRL?"GRID":""); else if (eitherCTRL) Bsprintf(tempbuf,"SIZE"); break; } } if (tempbuf[0] != 0) { i = (Bstrlen(tempbuf)<<3)+6; i = max((searchx+i)-(xdim-1), 0); j = max((searchy+16)-(ydim-1), 0); // printext16(searchx+6-i,searchy+6-j,11,-1,tempbuf,0); printext256(searchx+4+2-i, searchy+4+2-j, 0,-1,tempbuf,!(xdimgame > 640)); printext256(searchx+4-i, searchy+4-j, whitecol,-1,tempbuf,!(xdimgame > 640)); // printext256(searchx+4+2,searchy+4+2,0,-1,tempbuf,!(xdimgame > 640)); // printext256(searchx+4,searchy+4,whitecol,-1,tempbuf,!(xdimgame > 640)); } if (helpon==1) { int32_t small = !(xdimgame > 640); for (i=0; i=0 && sector[cursectnum].lotag==2) { if (sector[cursectnum].ceilingpicnum==FLOORSLIME) SetSLIMEPalette(); else SetWATERPalette(); } else SetGAMEPalette(); if (keystatus[buildkeys[BK_MODE2D_3D]]) // Enter { SetGAMEPalette(); FX_StopAllSounds(); S_ClearSoundLocks(); #ifdef POLYMER DeletePolymerLights(); #endif } //Stick this in 3D part of ExtCheckKeys //Also choose your own key scan codes if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(D)) // ' d /* { ShowHelpText("SectorEffector"); } */ { skill = (skill+1)%MAXSKILL; message("%s", SKILLMODE[skill]); // printext256(1*4,1*8,11,-1,tempbuf,0); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(I)) // ' i { showinvisibility = !showinvisibility; message("Invisible sprite preview %s", showinvisibility?"enabled":"disabled"); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(X)) // ' x { shadepreview = !shadepreview; message("Map shade preview %s", shadepreview?"enabled":"disabled"); #ifdef POLYMER DeletePolymerLights(); #endif } /* if (keystatus[KEYSC_QUOTE] && keystatus[KEYSC_G]) // ' g { keystatus[KEYSC_G] = 0; tabgraphic++; if (tabgraphic > 2) tabgraphic = 0; if (tabgraphic) message("Graphics ON"); else message("Graphics OFF"); }*/ /* if (keystatus[KEYSC_QUOTE] && keystatus[KEYSC_R]) // ' r { keystatus[KEYSC_R] = 0; framerateon=!framerateon; if (framerateon) message("Framerate ON"); else message("Framerate OFF"); }*/ if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(W)) // ' w { nosprites = (nosprites+1)%MAXNOSPRITES; message("%s", SPRDSPMODE[nosprites]); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(Y)) // ' y { purpleon = !purpleon; if (nosprites>3) nosprites=0; message("Purple %s", ONOFF(purpleon)); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(C)) // ' C { if (AIMING_AT_WALL_OR_MASK) { for (i=0; i= 0) && !eitherSHIFT) { NEXTWALL(searchwall).cstat &= ~(1+64); NEXTWALL(searchwall).cstat |= (wall[searchwall].cstat&1); } message("Wall %d blocking bit %s", searchwall, ONOFF(wall[searchwall].cstat&1)); asksave = 1; } } // N (set "spritenoshade" bit) if (PRESSED_KEYSC(N) && !eitherCTRL && !keystatus[KEYSC_QUOTE]) { if (AIMING_AT_SPRITE) { sprite[searchwall].cstat ^= 2048; message("Sprite %d spritenoshade bit: %s", searchwall, ONOFF(sprite[searchwall].cstat&2048)); } } if (PRESSED_KEYSC(T)) // T (transluscence for sprites/masked walls) { if (AIMING_AT_CEILING_OR_FLOOR) //Set masked/transluscent ceilings/floors { int32_t nexti[4] = { 128, 256, 384, 0 }; int16_t *stat = &AIMED_CEILINGFLOOR(stat); i = (*stat&(128+256))>>7; i = nexti[i]; *stat &= ~(128+256); *stat |= i; asksave = 1; } if (keystatus[KEYSC_QUOTE]) { if (ASSERT_AIMING) { Bsprintf(tempbuf, "%s lotag: ", Typestr_wss[searchstat]); AIMED(lotag) = getnumber256(tempbuf, AIMED(lotag), BTAG_MAX, 0); } } else if (eitherCTRL) { if (AIMING_AT_SPRITE) TextEntryMode(searchwall); } else { if (AIMING_AT_SPRITE) { if ((sprite[searchwall].cstat&2) == 0) sprite[searchwall].cstat |= 2; else if ((sprite[searchwall].cstat&512) == 0) sprite[searchwall].cstat |= 512; else sprite[searchwall].cstat &= ~(2+512); asksave = 1; } else if (AIMING_AT_MASKWALL) { if ((wall[searchwall].cstat&128) == 0) wall[searchwall].cstat |= 128; else if ((wall[searchwall].cstat&512) == 0) wall[searchwall].cstat |= 512; else wall[searchwall].cstat &= ~(128+512); if (wall[searchwall].nextwall >= 0) { NEXTWALL(searchwall).cstat &= ~(128+512); NEXTWALL(searchwall).cstat |= (wall[searchwall].cstat&(128+512)); } asksave = 1; } } } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(ENTER)) // ' ENTER { AIMED_SELOVR_PICNUM = temppicnum; message("Pasted picnum only"); } i = 512; if (keystatus[KEYSC_RSHIFT]) i = 8; if (keystatus[KEYSC_LSHIFT]) i = 1; mouseaction=0; if (eitherCTRL && !eitherSHIFT && (bstatus&1) && AIMING_AT_CEILING_OR_FLOOR) { mousex=0; mskip=1; if (mousey) { i=klabs(mousey*2); mouseaction=1; } } tsign = 0; if (ASSERT_AIMING) { tsign -= (PRESSED_KEYSC(LBRACK) || (mouseaction && mousey<0)); // [ tsign += (PRESSED_KEYSC(RBRACK) || (mouseaction && mousey>0)); // ] } if (tsign) { if (eitherALT) { int32_t ns=wall[searchwall].nextsector, sx=wall[searchwall].x, sy=wall[searchwall].y; if (ns >= 0 && !mouseaction) { if (AIMING_AT_CEILING || (tsign < 0 && AIMING_AT_WALL_OR_MASK)) { alignceilslope(searchsector, sx, sy, getceilzofslope(ns, sx, sy)); message("Sector %d align ceiling to wall %d", searchsector, searchwall); } if (AIMING_AT_FLOOR || (tsign > 0 && AIMING_AT_WALL_OR_MASK)) { alignflorslope(searchsector, sx, sy, getflorzofslope(ns, sx, sy)); message("Sector %d align floor to wall %d", searchsector, searchwall); } } } else { if (AIMING_AT_CEILING_OR_FLOOR) { if (!(AIMED_CEILINGFLOOR(stat)&2)) AIMED_CEILINGFLOOR(heinum) = 0; AIMED_CEILINGFLOOR(heinum) = clamp(AIMED_CEILINGFLOOR(heinum) + tsign*i, -32768, 32767); message("Sector %d ceiling slope = %d",searchsector,AIMED_CEILINGFLOOR(heinum)); } } if (sector[searchsector].ceilingheinum == 0) sector[searchsector].ceilingstat &= ~2; else sector[searchsector].ceilingstat |= 2; if (sector[searchsector].floorheinum == 0) sector[searchsector].floorstat &= ~2; else sector[searchsector].floorstat |= 2; asksave = 1; } if ((bstatus&1) && eitherSHIFT) mskip=1; if ((bstatus&1) && eitherSHIFT && AIMING_AT_CEILING_OR_FLOOR && (mousex|mousey)) { int32_t fw,x1,y1,x2,y2,stat,ma,a=0; stat = AIMING_AT_FLOOR ? sector[searchsector].floorstat : sector[searchsector].ceilingstat; if (stat&64) // align to first wall { fw=sector[searchsector].wallptr; x1=wall[fw].x,y1=wall[fw].y; x2=POINT2(fw).x,y2=POINT2(fw).y; a=getangle(x1-x2,y1-y2); } mouseax+=mousex; mouseay+=mousey; ma=getangle(mouseax,mouseay); ma+=ang-a; i = stat; i = (i&0x4)+((i>>4)&3); if (stat&64) // align to first wall switch (i) { case 0:break; case 1:ma=-ma; break; case 2:ma=1024-ma; break; case 3:ma+=1024; break; case 4:ma=-512-ma; break; case 5:ma+=512; break; case 6:ma-=512; break; case 7:ma=512-ma; break; } else switch (i) { case 0:ma=-ma; break; case 1:break; case 2:ma+=1024; break; case 3:ma=1024-ma; break; case 4:ma-=512; break; case 5:ma=512-ma; break; case 6:ma=-512-ma; break; case 7:ma+=512; break; } a = ksqrt(mouseax*mouseax + mouseay*mouseay); if (a) { int32_t mult = (stat&8) ? 8192 : 8192*2; x1 = -a*sintable[(ma+2048)&2047]/mult; y1 = -a*sintable[(ma+1536)&2047]/mult; if (x1||y1) { mouseax=0; mouseay=0; if (AIMING_AT_CEILING_OR_FLOOR) { changedir = 1-2*(x1<0); x1 = klabs(x1); while (x1--) AIMED_CEILINGFLOOR(xpanning) = changechar(AIMED_CEILINGFLOOR(xpanning),changedir,0,0); changedir = 1-2*(y1<0); y1 = klabs(y1); while (y1--) AIMED_CEILINGFLOOR(ypanning) = changechar(AIMED_CEILINGFLOOR(ypanning),changedir,0,0); message("Sector %d %s panning: %d, %d", searchsector, typestr[searchstat], AIMED_CEILINGFLOOR(xpanning), AIMED_CEILINGFLOOR(ypanning)); } asksave=1; } } mousex=0; mousey=0; } smooshyalign = keystatus[KEYSC_gKP5]; repeatpanalign = eitherSHIFT || eitherALT; //////////////////// updownunits=1; mouseaction=0; if (!mouseb) { mouseax=0; mouseay=0; } if ((bstatus&1) && searchstat != SEARCH_CEILING && searchstat != SEARCH_FLOOR) { if (eitherSHIFT) { mskip=1; if (mousex) { mouseaction = 1; mouseax += mousex; updownunits = klabs((int32_t)(mouseax/2.)); if (updownunits) mouseax=0; } } else if (eitherCTRL && !eitherALT) { mskip=1; if (mousex) { mouseaction = 2; repeatpanalign = 0; updownunits = klabs(mouseax+=mousex)/(16 - 12*AIMING_AT_SPRITE); if (updownunits) mouseax=0; } } } if (keystatus[KEYSC_gLEFT] || keystatus[KEYSC_gRIGHT] || mouseaction) // 4 & 6 (keypad) { if (repeatcountx == 0 || repeatcountx > 32 || mouseaction) { changedir = 0; if (keystatus[KEYSC_gLEFT] || mousex>0) changedir = -1; if (keystatus[KEYSC_gRIGHT] || mousex<0) changedir = 1; if (AIMING_AT_WALL_OR_MASK) { if (repeatpanalign == 0) { while (updownunits--) wall[searchwall].xrepeat = changechar(wall[searchwall].xrepeat, changedir, smooshyalign, 1); message("Wall %d repeat: %d, %d", searchwall, wall[searchwall].xrepeat, wall[searchwall].yrepeat); } else { int16_t w = SELECT_WALL(); if (mouseaction) { i=wall[w].cstat; i=((i>>3)&1)+((i>>7)&2); if (i==1||i==3) changedir*=-1; if (eitherCTRL) updownunits *= 8; } while (updownunits--) wall[w].xpanning = changechar(wall[w].xpanning, changedir, smooshyalign, 0); message("Wall %d panning: %d, %d", w, wall[w].xpanning, wall[w].ypanning); } asksave = 1; } else if (AIMING_AT_CEILING_OR_FLOOR) { while (updownunits--) AIMED_CEILINGFLOOR(xpanning) = changechar(AIMED_CEILINGFLOOR(xpanning), changedir, smooshyalign, 0); message("Sector %d %s panning: %d, %d", searchsector, typestr[searchstat], AIMED_CEILINGFLOOR(xpanning), AIMED_CEILINGFLOOR(ypanning)); asksave = 1; } else if (AIMING_AT_SPRITE) { static int32_t sumxvect=0, sumyvect=0; if (mouseaction==1) mouseaction_movesprites(&sumxvect, &sumyvect, 1536, mousex); else { sumxvect = sumyvect = 0; if (mouseaction==2) changedir *= -1; while (updownunits--) sprite[searchwall].xrepeat = changechar(sprite[searchwall].xrepeat, changedir, smooshyalign, 1); if (sprite[searchwall].xrepeat < 4) sprite[searchwall].xrepeat = 4; message("Sprite %d repeat: %d, %d", searchwall, sprite[searchwall].xrepeat, sprite[searchwall].yrepeat); } } asksave = 1; repeatcountx = max(1,repeatcountx-2); } repeatcountx += synctics; } else repeatcountx = 0; //////////////////// updownunits=1; mouseaction=0; if ((bstatus&1) && !AIMING_AT_CEILING_OR_FLOOR) { if (eitherSHIFT) { mskip=1; if (mousey) { mouseaction = 1; updownunits = klabs(mousey); if (!AIMING_AT_SPRITE) updownunits = klabs((int32_t)(mousey*128./tilesizy[wall[searchwall].picnum])); } } else if (eitherCTRL && !eitherALT) { mskip=1; if (mousey) { mouseaction = 2; repeatpanalign = 0; mouseay += mousey; updownunits = klabs(mouseay)/(32 - 28*AIMING_AT_SPRITE); if (updownunits) mouseay=0; } } } if (!mouseb) { mouseax=0; mouseay=0; } if (keystatus[KEYSC_gUP] || keystatus[KEYSC_gDOWN] || mouseaction) // 2 & 8 (keypad) { if (repeatcounty == 0 || repeatcounty > 32 || mouseaction) { changedir = 0; if (keystatus[KEYSC_gUP] || mousey>0) changedir = -1; if (keystatus[KEYSC_gDOWN] || mousey<0) changedir = 1; if (AIMING_AT_WALL_OR_MASK) { if (repeatpanalign == 0) { while (updownunits--) wall[searchwall].yrepeat = changechar(wall[searchwall].yrepeat, changedir, smooshyalign, 1); message("Wall %d repeat: %d, %d", searchwall, wall[searchwall].xrepeat, wall[searchwall].yrepeat); } else { int16_t w = AIMING_AT_WALL?searchbottomwall:searchwall; if (mouseaction && eitherCTRL) updownunits *= 8; while (updownunits--) wall[w].ypanning = changechar(wall[w].ypanning, changedir, smooshyalign, 0); message("Wall %d panning: %d, %d", w, wall[w].xpanning, wall[w].ypanning); } } else if (AIMING_AT_CEILING_OR_FLOOR) { while (updownunits--) AIMED_CEILINGFLOOR(ypanning) = changechar(AIMED_CEILINGFLOOR(ypanning), changedir, smooshyalign, 0); message("Sector %d %s panning: %d, %d", searchsector, typestr[searchstat], AIMED_CEILINGFLOOR(xpanning), AIMED_CEILINGFLOOR(ypanning)); asksave = 1; } else if (AIMING_AT_SPRITE) { static int32_t sumxvect=0, sumyvect=0; if (mouseaction==1) mouseaction_movesprites(&sumxvect, &sumyvect, 2048, mousey); else { sumxvect = sumyvect = 0; while (updownunits--) sprite[searchwall].yrepeat = changechar(sprite[searchwall].yrepeat, changedir, smooshyalign, 1); if (sprite[searchwall].yrepeat < 4) sprite[searchwall].yrepeat = 4; message("Sprite %d repeat: %d, %d", searchwall, sprite[searchwall].xrepeat, sprite[searchwall].yrepeat); } } asksave = 1; repeatcounty = max(1,repeatcounty-2); } repeatcounty += synctics; } else repeatcounty = 0; //////////////////// if (PRESSED_KEYSC(F11)) //F11 - brightness { static int16_t brightness = -1; if (brightness==-1) brightness = ((int16_t)((vid_gamma-1.0)*10.0))&15; brightness = brightness + (1-2*eitherSHIFT); brightness &= 15; vid_gamma = 1.0 + ((float)brightness / 10.0); setbrightness(brightness, 0, 0); message("Brightness: %d/16", brightness+1); } if (PRESSED_KEYSC(TAB)) //TAB { if (ASSERT_AIMING) { tempshade = AIMED_CF_SEL(shade); temppal = AIMED_CF_SEL(pal); templotag = AIMED_SEL(lotag); temphitag = AIMED_SEL(hitag); tempextra = AIMED_SEL(extra); if (AIMING_AT_WALL_OR_MASK) { temppicnum = AIMED_SELOVR_WALL(picnum); tempxrepeat = AIMED_SEL_WALL(xrepeat); tempxrepeat = max(1, tempxrepeat); tempyrepeat = AIMED_SEL_WALL(yrepeat); tempcstat = AIMED_SEL_WALL(cstat); templenrepquot = divscale12(wallength(searchwall), tempxrepeat); } else if (AIMING_AT_CEILING_OR_FLOOR) { temppicnum = AIMED_CEILINGFLOOR(picnum); tempvis = sector[searchsector].visibility; tempxrepeat = AIMED_CEILINGFLOOR(xpanning); tempyrepeat = AIMED_CEILINGFLOOR(ypanning); tempcstat = AIMED_CEILINGFLOOR(stat); } else if (AIMING_AT_SPRITE) { temppicnum = sprite[searchwall].picnum; tempxrepeat = sprite[searchwall].xrepeat; tempyrepeat = sprite[searchwall].yrepeat; tempcstat = sprite[searchwall].cstat; tempxvel = sprite[searchwall].xvel; tempyvel = sprite[searchwall].yvel; tempzvel = sprite[searchwall].zvel; } somethingintab = searchstat; } } if (PRESSED_KEYSC(ENTER)) // ENTER -- paste clipboard contents { extern char pskysearch[MAXSECTORS]; int16_t daang; int32_t dashade[2]; if (eitherSHIFT) { if (AIMING_AT_WALL_OR_MASK && eitherCTRL) //Ctrl-shift Enter (auto-shade) { dashade[0] = 127; dashade[1] = -128; i = searchwall; do { if (dashade[0] > (int32_t)wall[i].shade) dashade[0] = wall[i].shade; if (dashade[1] < (int32_t)wall[i].shade) dashade[1] = wall[i].shade; i = wall[i].point2; } while (i != searchwall); daang = getangle(POINT2(searchwall).x-wall[searchwall].x, POINT2(searchwall).y-wall[searchwall].y); i = searchwall; do { j = getangle(POINT2(i).x-wall[i].x,POINT2(i).y-wall[i].y); k = (j+2048-daang)&2047; if (k > 1024) k = 2048-k; wall[i].shade = dashade[0]+mulscale10(k, dashade[1]-dashade[0]); i = wall[i].point2; } while (i != searchwall); message("Wall %d auto-shaded", searchwall); } else if (somethingintab < 255) { if (ASSERT_AIMING) { AIMED_CF_SEL(shade) = tempshade; AIMED_CF_SEL(pal) = temppal; if (AIMING_AT_CEILING_OR_FLOOR) { if (somethingintab == SEARCH_CEILING || somethingintab == SEARCH_FLOOR) sector[searchsector].visibility = tempvis; } message("Pasted shading+pal"); asksave = 1; } } } else if (AIMING_AT_WALL_OR_MASK && eitherCTRL && somethingintab < 255) //Either ctrl key { i = searchwall; do { wall[i].picnum = temppicnum; wall[i].shade = tempshade; wall[i].pal = temppal; if (somethingintab == SEARCH_WALL || somethingintab == SEARCH_MASKWALL) { wall[i].xrepeat = tempxrepeat; wall[i].yrepeat = tempyrepeat; wall[i].cstat = tempcstat; fixxrepeat(i, templenrepquot); } i = wall[i].point2; } while (i != searchwall); message("Pasted picnum+shading+pal"); asksave = 1; } else if (AIMING_AT_CEILING_OR_FLOOR && eitherCTRL && somethingintab < 255) //Either ctrl key { Bmemset(pskysearch, 0, numsectors); i = searchsector; if (CEILINGFLOOR(i, stat)&1) pskysearch[i] = 1; while (pskysearch[i] == 1) { CEILINGFLOOR(i, picnum) = temppicnum; CEILINGFLOOR(i, shade) = tempshade; CEILINGFLOOR(i, pal) = temppal; if (somethingintab == SEARCH_CEILING || somethingintab == SEARCH_FLOOR) { CEILINGFLOOR(i, xpanning) = tempxrepeat; CEILINGFLOOR(i, ypanning) = tempyrepeat; CEILINGFLOOR(i, stat) = tempcstat; } pskysearch[i] = 2; startwall = sector[i].wallptr; endwall = startwall + sector[i].wallnum - 1; for (j=startwall; j<=endwall; j++) { k = wall[j].nextsector; if (k >= 0) if ((CEILINGFLOOR(k, stat)&1) > 0) if (pskysearch[k] == 0) pskysearch[k] = 1; } for (j=0; j= 0) NEXTWALL(searchwall).overpicnum = temppicnum; wall[searchwall].shade = tempshade; wall[searchwall].pal = temppal; if (somethingintab == SEARCH_MASKWALL) { wall[searchwall].xrepeat = tempxrepeat; wall[searchwall].yrepeat = tempyrepeat; wall[searchwall].cstat = tempcstat; wall[searchwall].lotag = templotag; wall[searchwall].hitag = temphitag; wall[searchwall].extra = tempextra; fixxrepeat(searchwall, templenrepquot); } asksave = 1; } else if (AIMING_AT_CEILING_OR_FLOOR) { AIMED_CEILINGFLOOR(picnum) = temppicnum; AIMED_CEILINGFLOOR(shade) = tempshade; AIMED_CEILINGFLOOR(pal) = temppal; if (somethingintab == SEARCH_CEILING || somethingintab == SEARCH_FLOOR) { AIMED_CEILINGFLOOR(xpanning) = tempxrepeat; AIMED_CEILINGFLOOR(ypanning) = tempyrepeat; AIMED_CEILINGFLOOR(stat) = tempcstat; sector[searchsector].visibility = tempvis; sector[searchsector].lotag = templotag; sector[searchsector].hitag = temphitag; sector[searchsector].extra = tempextra; } asksave = 1; } else if (AIMING_AT_SPRITE) { sprite[searchwall].picnum = temppicnum; if (tilesizx[temppicnum] <= 0 || tilesizy[temppicnum] <= 0) { j = 0; for (k=0; k 0 && tilesizy[k] > 0) { j = k; break; } sprite[searchwall].picnum = j; } sprite[searchwall].shade = tempshade; sprite[searchwall].pal = temppal; if (somethingintab == SEARCH_SPRITE) { sprite[searchwall].xrepeat = max(tempxrepeat, 1); sprite[searchwall].yrepeat = max(tempyrepeat, 1); sprite[searchwall].cstat = tempcstat; sprite[searchwall].lotag = templotag; sprite[searchwall].hitag = temphitag; sprite[searchwall].extra = tempextra; sprite[searchwall].xvel = tempxvel; sprite[searchwall].yvel = tempyvel; sprite[searchwall].zvel = tempzvel; } } message("Pasted clipboard"); asksave = 1; } } if (PRESSED_KEYSC(C)) { if (eitherALT) // Alt-C picnum replacer { if (somethingintab < 255) { switch (searchstat) { case SEARCH_WALL: j = wall[searchbottomwall].picnum; for (i=0; i=0: forwards { char did_wrap = 0, outofgrid=0; int32_t i, j, k = 0; dir = 1-2*(dir<0); for (gs_cursprite += dir;; gs_cursprite += dir) { if (gs_cursprite < 0 || gs_cursprite >= MAXSPRITES) { if (did_wrap) break; did_wrap = 1; gs_cursprite &= (MAXSPRITES-1); } if (sprite[gs_cursprite].statnum == MAXSTATUS) continue; for (i=0; i<3; i++) for (j=0; i==1 ? j<6 : j<7; j++) { if (!gs_spriteTagInterested[i][j]) continue; if (i==0) { switch (j) { case 0: k = sprite[gs_cursprite].x; break; case 1: k = sprite[gs_cursprite].y; break; case 2: k = sprite[gs_cursprite].z; break; case 3: k = sprite[gs_cursprite].sectnum; break; case 4: k = sprite[gs_cursprite].statnum; break; case 5: k = (uint16_t)sprite[gs_cursprite].hitag; break; case 6: k = (uint16_t)sprite[gs_cursprite].lotag; break; } } else if (i==1) { switch (j) { case 0: k = sprite[gs_cursprite].cstat; k &= gs_spriteTagValue[1][0]; break; case 1: k = sprite[gs_cursprite].shade; break; case 2: k = sprite[gs_cursprite].pal; break; case 3: k = gs_spriteTagValue[1][3]; if (k != sprite[gs_cursprite].xrepeat && k != sprite[gs_cursprite].yrepeat) goto NEXTSPRITE; break; case 4: k = gs_spriteTagValue[1][4]; if (k != sprite[gs_cursprite].xoffset && k != sprite[gs_cursprite].yoffset) goto NEXTSPRITE; break; case 5: k = sprite[gs_cursprite].picnum; break; } } else if (i==2) { switch (j) { case 0: k = sprite[gs_cursprite].ang; break; case 1: k = (uint16_t)sprite[gs_cursprite].xvel; break; case 2: k = (uint16_t)sprite[gs_cursprite].yvel; break; case 3: k = (uint16_t)sprite[gs_cursprite].zvel; break; case 4: k = (uint16_t)sprite[gs_cursprite].owner; break; case 5: k = sprite[gs_cursprite].clipdist; break; case 6: k = sprite[gs_cursprite].extra; break; } } if (k != gs_spriteTagValue[i][j]) goto NEXTSPRITE; } // found matching sprite if (pos.x >= -editorgridextent && pos.x <= editorgridextent && pos.y >= -editorgridextent && pos.y <= editorgridextent) { pos.x = sprite[gs_cursprite].x; pos.y = sprite[gs_cursprite].y; if (pos.z >= -editorgridextent<<4 && pos.z <= editorgridextent<<4) pos.z = sprite[gs_cursprite].z; ang = sprite[gs_cursprite].ang; } else outofgrid = 1; printmessage16("%s Sprite seach%s: found sprite %d%s", dir<0 ? "<" : ">", did_wrap ? " (wrap)" : "", gs_cursprite, outofgrid?"(outside grid)":""); did_wrap = 0; return; NEXTSPRITE: ; } printmessage16("%s Sprite search: none found", dir<0 ? "<" : ">"); } extern int32_t graphicsmode; static void Keys2d(void) { int32_t i=0, j, k; int32_t smooshy, changedir; static int32_t repeatcnt[2] = {0,0}; // was repeatcountx, repeatcounty int32_t tcursectornum; // for(i=0;i<0x50;i++) if(keystatus[i]==1) Bsprintf(tempbuf,"key %d",i); printmessage16(tempbuf); tcursectornum = -1; for (i=0; i= 16384) { drawgradient(); showspritedata(pointhighlight&16383, 0); } else if (linehighlight >= 0 /* && ((bstatus&1) || sectorofwall(linehighlight)==tcursectornum)*/) { drawgradient(); showwalldata(linehighlight, 0); } } else if (tcursectornum >= 0) { drawgradient(); showsectordata(tcursectornum, 0); } } else if (!(keystatus[KEYSC_F5]|keystatus[KEYSC_F6]|keystatus[KEYSC_F7]|keystatus[KEYSC_F8]) && !eitherSHIFT) { static int32_t counter = 0; static int32_t omx = 0, omy = 0; /* static int32_t opointhighlight, olinehighlight, ocursectornum; if (pointhighlight == opointhighlight && linehighlight == olinehighlight && tcursectornum == ocursectornum) */ if (omx == mousxplc && omy == mousyplc) { if (counter < 6) counter++; } else if (counter > 0) counter--; omx = mousxplc; omy = mousyplc; /* opointhighlight = pointhighlight; olinehighlight = linehighlight; ocursectornum = tcursectornum; */ if (totalclock < lastpm16time + 120*2) _printmessage16("%s", lastpm16buf); else if (counter >= 2 && totalclock >= 120*6) { if (pointhighlight >= 16384) { i = pointhighlight-16384; showspritedata(i, 1); if (sprite[i].picnum==SECTOREFFECTOR) _printmessage16("^10%s", SectorEffectorText(i)); } else if (linehighlight >= 0 && ((bstatus&1) || sectorofwall(linehighlight)==tcursectornum)) showwalldata(linehighlight, 1); else if (tcursectornum >= 0) showsectordata(tcursectornum, 1); } } ///__bigcomment__ if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(Z)) // ' z { editorzrange[0] = getnumber16("Upper Z range: ", editorzrange[0], INT32_MAX, 1); editorzrange[1] = getnumber16("Lower Z range: ", editorzrange[1], INT32_MAX, 1); // printmessage16(""); } if (PRESSED_KEYSC(T)) // T (tag) { char buffer[80]; if (eitherCTRL) //Ctrl-T { extern int32_t showtags; showtags ^= 1; printmessage16("Show tags %s", ONOFF(showtags)); } else if (eitherALT) //ALT { if (pointhighlight >= 16384) { i = pointhighlight-16384; Bsprintf(buffer,"Sprite (%d) Lo-tag: ", i); sprite[i].lotag = _getnumber16(buffer, sprite[i].lotag, BTAG_MAX, 0, sprite[i].picnum==SECTOREFFECTOR ? (void *)SectorEffectorTagText : NULL); } else if (linehighlight >= 0) { i = linehighlight; Bsprintf(buffer,"Wall (%d) Lo-tag: ", i); wall[i].lotag = getnumber16(buffer, wall[i].lotag, BTAG_MAX, 0); } } else { for (i=0; i0) { m32_setkeyfilter(0); IntegratedHelp(); m32_setkeyfilter(1); } else printmessage16("m32help.hlp invalid or not found!"); } if (PRESSED_KEYSC(F2)) if (g_numsounds > 0) { m32_setkeyfilter(0); SoundDisplay(); m32_setkeyfilter(1); } // F3: side view toggle (handled in build.c) getpoint(searchx,searchy, &mousxplc,&mousyplc); ppointhighlight = getpointhighlight(mousxplc,mousyplc, ppointhighlight); if ((ppointhighlight&0xc000) == 16384) { // sprite[ppointhighlight&16383].cstat ^= 1; cursprite = ppointhighlight&16383; } if (keystatus[KEYSC_F9]) // F9 f1=3b ShowFileText("sthelp.hlp", 0); /* start Mapster32 */ if (PRESSED_KEYSC(F4)) { showfirstwall = !showfirstwall; message("Sector firstwall highlight %s", showfirstwall?"enabled":"disabled"); } if (PRESSED_KEYSC(M)) // M (tag) { if (eitherALT) //ALT { if (pointhighlight >= 16384) { i = pointhighlight-16384; Bsprintf(tempbuf, "Sprite %d Extra: ", i); sprite[i].extra = getnumber16(tempbuf, sprite[i].extra, BTAG_MAX, 1); } else if (linehighlight >= 0) { i = linehighlight; Bsprintf(tempbuf,"Wall %d Extra: ",i); wall[i].extra = getnumber16(tempbuf,wall[i].extra,BTAG_MAX,1); } } else { for (i=0; i 32) { changedir = 1-(j&2); if ((ppointhighlight&0xc000) == 16384 && (sprite[cursprite].cstat & 48)) { uint8_t *repeat = (k==0) ? &sprite[cursprite].xrepeat : &sprite[cursprite].yrepeat; *repeat = max(4, changechar(*repeat, changedir, smooshy, 1)); message("Sprite %d repeat: %d, %d", cursprite, sprite[cursprite].xrepeat, sprite[cursprite].yrepeat); } else { for (i=0; i= 16384) { const char *aligntype[4] = { "view", "wall", "floor", "???" }; i = sprite[cursprite].cstat; if ((i&48) < 32) i += 16; else i &= ~48; sprite[cursprite].cstat = i; message("Sprite %d now %s aligned", cursprite, aligntype[(i&48)/16]); asksave = 1; } } if (keystatus[KEYSC_QUOTE] && keystatus[KEYSC_S]) // ' S { if (pointhighlight >= 16384) { keystatus[KEYSC_S] = 0; Bsprintf(tempbuf, "Sprite %d xrepeat: ", cursprite); sprite[cursprite].xrepeat = getnumber16(tempbuf, sprite[cursprite].xrepeat, 255, 0); Bsprintf(tempbuf, "Sprite %d yrepeat: ", cursprite); sprite[cursprite].yrepeat = getnumber16(tempbuf, sprite[cursprite].yrepeat, 255, 0); printmessage16("Sprite %d updated", i); } } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(F)) // ' F { FuncMenu(); } tsign = 0; if (PRESSED_KEYSC(LBRACK)) // [ search backward tsign = -1; if (PRESSED_KEYSC(RBRACK)) // ] search forward tsign = +1; if (tsign) { if (eitherALT && numcorruptthings>0) { int32_t wrap=0, x, y, z; if (curcorruptthing<0 || curcorruptthing>=numcorruptthings) curcorruptthing = 0; else { curcorruptthing += tsign; wrap = (curcorruptthing<0 || curcorruptthing>=numcorruptthings); curcorruptthing += numcorruptthings; curcorruptthing %= numcorruptthings; } k = corruptthings[curcorruptthing]; j = -1; switch (k&CORRUPT_MASK) { case 0: printmessage16("MAP LIMITS EXCEEDED!"); x = y = z = 0; break; case CORRUPT_SECTOR: i = k&(MAXSECTORS-1); j = 0; x = wall[sector[i].wallptr].x; y = wall[sector[i].wallptr].y; z = pos.z; break; case CORRUPT_WALL: i = k&(MAXWALLS-1); j = 1; x = wall[i].x; y = wall[i].y; z = pos.z; break; case CORRUPT_SPRITE: i = k&(MAXSPRITES-1); j = 2; x = sprite[i].x; y = sprite[i].y; z = sprite[i].z; break; default: k = 0; x = y = z = 0; break; } if (k) { static const char *secwalspr[3] = {"sector", "wall", "sprite"}; if (x>=-editorgridextent && x<=editorgridextent && y>=-editorgridextent && y<=editorgridextent) { pos.x = x; pos.y = y; pos.z = z; } else x=editorgridextent+1; printmessage16("#%d: %s Corrupt %s %d%s", curcorruptthing+1, tsign<0?"<":">", secwalspr[j], i, (x==editorgridextent+1) ? " (outside grid)" : (wrap ? " (wrap)" : "")); } } else if (wallsprite==0) SearchSectors(tsign); else if (wallsprite==1) { if ((tsign<0 && curwallnum>0) || (tsign>0 && curwallnum=0 && i"); return; } curwallnum--; } printmessage16("%s Wall search: none found", tsign<0?"<":">"); } else if (wallsprite==2) DoSpriteSearch(tsign); ///__old_sprite_search_1__ ///__old_sprite_search_2__ } if (PRESSED_KEYSC(G)) // G (grid on/off) { if (autogrid) { grid = 0; if (eitherSHIFT) grid = 8; autogrid = 0; } else { grid += (1-2*eitherSHIFT); if (grid == -1 || grid == 9) { autogrid = 1; grid = 0; } } if (autogrid) printmessage16("Grid size: 9 (autosize)"); else if (!grid) printmessage16("Grid off"); else printmessage16("Grid size: %d (%d units)", grid, 2048>>grid); } if (autogrid) { grid = min(zoom+512, 65536); grid = scale(grid, 6, 6144); grid = clamp(grid, 0, 7); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(L)) // ' L (set sprite/wall coordinates) { if (pointhighlight >= 16384) { i = pointhighlight - 16384; Bsprintf(tempbuf, "Sprite %d x: ", i); sprite[i].x = getnumber16(tempbuf, sprite[i].x, editorgridextent-1, 1); Bsprintf(tempbuf, "Sprite %d y: ", i); sprite[i].y = getnumber16(tempbuf, sprite[i].y, editorgridextent-1, 1); Bsprintf(tempbuf, "Sprite %d z: ", i); sprite[i].z = getnumber16(tempbuf, sprite[i].z, BZ_MAX, 1); Bsprintf(tempbuf, "Sprite %d angle: ", i); sprite[i].ang = getnumber16(tempbuf, sprite[i].ang, 2048, 1); sprite[i].ang &= 2047; printmessage16("Sprite %d updated", i); } else if (pointhighlight >= 0 /*<= 16383*/) { i = linehighlight; j = wall[i].x; k = wall[i].y; Bsprintf(tempbuf, "Wall %d x: ", i); j = getnumber16(tempbuf, j, editorgridextent, 1); Bsprintf(tempbuf, "Wall %d y: ", i); k = getnumber16(tempbuf, k, editorgridextent, 1); dragpoint(i, j, k); printmessage16("Wall %d updated", i); } } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(3)) // ' 3 { onnames = (onnames+1)%8; printmessage16("Mode %d %s", onnames, SpriteMode[onnames]); // clearmidstatbar16(); // for(i=0;i= 16384) { swapshort(&sprite[cursprite].lotag, &sprite[cursprite].hitag); printmessage16("Sprite %d tags swapped", cursprite); } else if (linehighlight >= 0) { swapshort(&wall[linehighlight].lotag, &wall[linehighlight].hitag); printmessage16("Wall %d tags swapped", linehighlight); } } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(J)) // ' J { pos.x = getnumber16("X-coordinate: ", pos.x, editorgridextent, 1); pos.y = getnumber16("Y-coordinate: ", pos.y, editorgridextent, 1); printmessage16("Current pos now (%d, %d)", pos.x, pos.y); } }// end key2d static void InitCustomColors(void) { /* blue */ /* vgapal16[9*4+0] = 63; vgapal16[9*4+1] = 31; vgapal16[9*4+2] = 7; */ int32_t i; palette_t *edcol; /* char vgapal16[4*256] = { 00,00,00,00, 42,00,00,00, 00,42,00,00, 42,42,00,00, 00,00,42,00, 42,00,42,00, 00,21,42,00, 42,42,42,00, 21,21,21,00, 63,21,21,00, 21,63,21,00, 63,63,21,00, 21,21,63,00, 63,21,63,00, 21,63,63,00, 63,63,63,00 }; */ /* editorcolors[0] = getclosestcol(0,0,0); editorcolors[1] = getclosestcol(0,0,42); editorcolors[2] = getclosestcol(0,42,0); editorcolors[3] = getclosestcol(0,42,42); editorcolors[4] = getclosestcol(42,0,0); editorcolors[5] = getclosestcol(0,0,0); */ vgapal16[9*4+0] = 63; vgapal16[9*4+1] = 31; vgapal16[9*4+2] = 7; /* orange */ vgapal16[31*4+0] = 20; // blue vgapal16[31*4+1] = 45; // green vgapal16[31*4+2] = 60; // red vgapal16[39*4+0] = 36; vgapal16[39*4+1] = 53; vgapal16[39*4+2] = 63; /* light yellow */ vgapal16[22*4+0] = 51; vgapal16[22*4+1] = 63; vgapal16[22*4+2] = 63; /* grey */ vgapal16[23*4+0] = 45; vgapal16[23*4+1] = 45; vgapal16[23*4+2] = 45; /* blue */ vgapal16[24*4+0] = 51; vgapal16[24*4+1] = 41; vgapal16[24*4+2] = 12; vgapal16[32*4+0] = 60; vgapal16[32*4+1] = 50; vgapal16[32*4+2] = 21; // grid color vgapal16[25*4+0] = 19; vgapal16[25*4+1] = 17; vgapal16[25*4+2] = 17; vgapal16[26*4+0] = 24; vgapal16[26*4+1] = 24; vgapal16[26*4+2] = 24; vgapal16[33*4+0] = 0;//15; // blue vgapal16[33*4+1] = 0;//30; // green vgapal16[33*4+2] = 48;//45; // red vgapal16[41*4+0] = 0;//24; vgapal16[41*4+1] = 0;//40; vgapal16[41*4+2] = 63;//48; for (i = 0; i<256; i++) { edcol = (palette_t *)&vgapal16[4*i]; editorcolors[i] = getclosestcol(edcol->b,edcol->g,edcol->r); } } void ExtPreSaveMap(void) { if (fixmapbeforesaving) { int32_t i, startwall, j, endwall; for (i=0; i=0; i--) sector[i].wallnum = sector[i+1].wallptr-sector[i].wallptr; sector[numsectors-1].wallnum = numwalls - sector[numsectors-1].wallptr; for (i=0; istr = Bstrdup(buffer); if (CommandPaths) { struct strllist *t; for (t = CommandPaths; t->next; t=t->next) ; t->next = s; return; } CommandPaths = s; } static void G_AddGroup(const char *buffer) { struct strllist *s; s = (struct strllist *)Bcalloc(1,sizeof(struct strllist)); s->str = Bstrdup(buffer); if (Bstrchr(s->str,'.') == 0) Bstrcat(s->str,".grp"); if (CommandGrps) { struct strllist *t; for (t = CommandGrps; t->next; t=t->next) ; t->next = s; return; } CommandGrps = s; } #define COPYARG(i) \ Bmemcpy(&testplay_addparam[j], argv[i], lengths[i]); \ j += lengths[i]; \ testplay_addparam[j++] = ' '; #if defined(RENDERTYPEWIN) && defined(USE_OPENGL) extern char forcegl; #endif static void G_CheckCommandLine(int32_t argc, const char **argv) { int32_t i = 1, j, maxlen=0, *lengths; char *c, *k; mapster32_fullpath = (char *)argv[0]; if (argc > 1) { lengths = Bmalloc(argc*sizeof(int32_t)); for (j=1; j i+1) { G_AddGroup(argv[i+1]); COPYARG(i); COPYARG(i+1); i++; } i++; continue; } if (!Bstrcasecmp(c+1,"game_dir")) { if (argc > i+1) { #if defined(POLYMOST) && defined(USE_OPENGL) extern char TEXCACHEFILE[BMAX_PATH]; Bsprintf(tempbuf,"%s/%s",argv[i+1],TEXCACHEFILE); Bstrcpy(TEXCACHEFILE,tempbuf); #endif AddGamePath(argv[i+1]); COPYARG(i); COPYARG(i+1); i++; } i++; continue; } if (!Bstrcasecmp(c+1,"cfg")) { if (argc > i+1) { Bstrcpy(setupfilename,argv[i+1]); i++; } i++; continue; } if (!Bstrcasecmp(c+1,"gamegrp")) { if (argc > i+1) { Bstrcpy(defaultduke3dgrp,argv[i+1]); COPYARG(i); COPYARG(i+1); i++; } i++; continue; } if (!Bstrcasecmp(c+1,"nam")) { Bstrcpy(g_grpNamePtr, "nam.grp"); COPYARG(i); i++; continue; } if (!Bstrcasecmp(c+1,"ww2gi")) { Bstrcpy(g_grpNamePtr, "ww2gi.grp"); COPYARG(i); i++; continue; } if (!Bstrcasecmp(c+1,"check")) { initprintf("Map pointer checking on saving enabled\n"); fixmapbeforesaving = 1; i++; continue; } if (!Bstrcasecmp(c+1,"nocheck")) { initprintf("Map pointer checking disabled\n"); fixmapbeforesaving = 0; i++; continue; } if (!Bstrcasecmp(c+1,"noautoload")) { initprintf("Autoload disabled\n"); NoAutoLoad = 1; COPYARG(i); i++; continue; } #if !defined(_WIN32) if (!Bstrcasecmp(c+1,"usecwd")) { usecwd = 1; COPYARG(i); i++; continue; } #endif #if defined(RENDERTYPEWIN) && defined(USE_OPENGL) if (!Bstrcasecmp(c+1,"forcegl")) { forcegl = 1; i++; continue; } #endif } if ((*c == '-') #ifdef _WIN32 || (*c == '/') #endif ) { c++; switch (*c) { case 'h': case 'H': c++; if (*c) { defsfilename = c; COPYARG(i); initprintf("Using DEF file: %s.\n",defsfilename); } break; case 'j': case 'J': c++; if (!*c) break; AddGamePath(c); COPYARG(i); break; case 'g': case 'G': c++; if (!*c) break; G_AddGroup(c); COPYARG(i); break; case 'x': case 'X': c++; if (!*c) break; gamecon = c; COPYARG(i); break; } } else { k = Bstrrchr(c,'.'); if (k) { if (!Bstrcasecmp(k,".grp") || !Bstrcasecmp(k,".zip")) { COPYARG(i); G_AddGroup(argv[i++]); continue; } else if (!Bstrcasecmp(k,".def")) { COPYARG(i); defsfilename = (char *)argv[i++]; initprintf("Using DEF file: %s.\n",defsfilename); continue; } else if (!Bstrcasecmp(k,".con")) { COPYARG(i); gamecon = (char *)argv[i++]; continue; } } } i++; } Bfree(lengths); if (j > 0) { testplay_addparam[j-1] = 0; testplay_addparam = Brealloc(testplay_addparam, j*sizeof(char)); } else { Bfree(testplay_addparam); testplay_addparam = NULL; } } } #undef COPYARG int32_t ExtPreInit(int32_t argc,const char **argv) { wm_setapptitle("Mapster32"); #ifdef _WIN32 tempbuf[GetModuleFileName(NULL,tempbuf,BMAX_PATH)] = 0; Bcorrectfilename(tempbuf,1); //chdir(tempbuf); #endif OSD_SetLogFile("mapster32.log"); OSD_SetVersion("Mapster32"VERSION,0,2); initprintf("Mapster32"VERSION BUILDDATE"\n"); // initprintf("Copyright (c) 2008 EDuke32 team\n"); G_CheckCommandLine(argc,argv); return 0; } static int32_t atoi_safe(const char *str) { return (int32_t)strtol(str, NULL, 10); } static int32_t osdcmd_quit(const osdfuncparm_t *parm) { UNREFERENCED_PARAMETER(parm); clearfilenames(); ExtUnInit(); uninitengine(); exit(0); } static int32_t osdcmd_editorgridextent(const osdfuncparm_t *parm) { int32_t i; extern int32_t editorgridextent; if (parm->numparms == 0) { OSD_Printf("\"editorgridextent\" is \"%d\"\n", editorgridextent); return OSDCMD_SHOWHELP; } else if (parm->numparms != 1) return OSDCMD_SHOWHELP; i = Batol(parm->parms[0]); if (i >= 65536 && i <= BXY_MAX) { editorgridextent = i; OSD_Printf("editorgridextent %d\n", editorgridextent); } else OSD_Printf("editorgridextent: value out of range (65536 to %d)\n", BXY_MAX); return OSDCMD_OK; } static int32_t osdcmd_addpath(const osdfuncparm_t *parm) { char pathname[BMAX_PATH]; if (parm->numparms != 1) return OSDCMD_SHOWHELP; Bstrcpy(pathname,parm->parms[0]); addsearchpath(pathname); return OSDCMD_OK; } static int32_t osdcmd_initgroupfile(const osdfuncparm_t *parm) { char file[BMAX_PATH]; if (parm->numparms != 1) return OSDCMD_SHOWHELP; Bstrcpy(file,parm->parms[0]); initgroupfile(file); return OSDCMD_OK; } static int32_t osdcmd_sensitivity(const osdfuncparm_t *parm) { if (parm->numparms != 1) { OSD_Printf("\"sensitivity\" is \"%.2f\"\n",msens); return OSDCMD_SHOWHELP; } msens = atof(parm->parms[0]); OSD_Printf("sensitivity %.2f\n",msens); return OSDCMD_OK; } static int32_t osdcmd_noclip(const osdfuncparm_t *parm) { UNREFERENCED_PARAMETER(parm); noclip = !noclip; OSD_Printf("Clipping %s\n", noclip?"disabled":"enabled"); return OSDCMD_OK; } static int32_t osdcmd_testplay_addparam(const osdfuncparm_t *parm) { int32_t slen; if (parm->numparms != 1) { OSD_Printf("additional parameters for test playing: %s%s%s\n", testplay_addparam ? "\"" : "", testplay_addparam ? testplay_addparam : "", testplay_addparam ? "\"" : ""); return OSDCMD_OK; } slen = Bstrlen(parm->parms[0]); if (slen > 0) { if (!testplay_addparam) testplay_addparam = Bmalloc(slen+1); else testplay_addparam = Brealloc(testplay_addparam, slen+1); Bmemcpy(testplay_addparam, parm->parms[0], slen); testplay_addparam[slen] = 0; } else { if (testplay_addparam) { Bfree(testplay_addparam); testplay_addparam = NULL; } } return OSDCMD_OK; } //PK vvv ------------ static int32_t osdcmd_vars_pk(const osdfuncparm_t *parm) { int32_t showval = (parm->numparms < 1); // this is something of a misnomer, since it's actually accel+decel if (!Bstrcasecmp(parm->name, "pk_turnaccel")) { if (showval) OSD_Printf("Turning acceleration+declaration is %d\n", pk_turnaccel); else { pk_turnaccel = atoi_safe(parm->parms[0]); pk_turnaccel = pk_turnaccel<=pk_turndecel ? (pk_turndecel+1):pk_turnaccel; pk_turnaccel = pk_turnaccel>256 ? 256:pk_turnaccel; } } else if (!Bstrcasecmp(parm->name, "pk_turndecel")) { if (showval) OSD_Printf("Turning deceleration is %d\n", pk_turndecel); else { pk_turndecel = atoi_safe(parm->parms[0]); pk_turndecel = pk_turndecel<=0 ? 1:pk_turndecel; pk_turndecel = pk_turndecel>=pk_turnaccel ? (pk_turnaccel-1):pk_turndecel; pk_turndecel = pk_turndecel>128 ? 128:pk_turndecel; } } else if (!Bstrcasecmp(parm->name, "pk_quickmapcycling")) { OSD_Printf("Quick map cycling ((LShift-)Ctrl-X): %s\n", (quickmapcycling = !quickmapcycling) ? "enabled":"disabled"); } else if (!Bstrcasecmp(parm->name, "pk_uedaccel")) { if (parm->numparms==1) { pk_uedaccel = atoi_safe(parm->parms[0]); pk_uedaccel = pk_uedaccel<0 ? 0:pk_uedaccel; pk_uedaccel = pk_uedaccel>5 ? 5:pk_uedaccel; } if (parm->numparms <= 1) OSD_Printf("UnrealEd mouse navigation acceleration is %d\n", pk_uedaccel); else return OSDCMD_SHOWHELP; } else if (!Bstrcasecmp(parm->name, "osd_tryscript")) { m32_osd_tryscript = !m32_osd_tryscript; OSD_Printf("Try M32 script execution on invalid OSD command: %s\n", m32_osd_tryscript?"on":"off"); } else if (!Bstrcasecmp(parm->name, "sideview_reversehorizrot")) { sideview_reversehrot = !sideview_reversehrot; OSD_Printf("Side view reverse horizontal rotation: %s\n", sideview_reversehrot?"on":"off"); } else if (!Bstrcasecmp(parm->name, "script_expertmode")) { m32_script_expertmode = !m32_script_expertmode; if (m32_script_expertmode) OSD_Printf("M32 Script expert mode ENABLED. Be sure to know what you are doing!\n"); else OSD_Printf("M32 Script expert mode DISABLED.\n"); } else if (!Bstrcasecmp(parm->name, "show_heightindicators")) { static const char *how[3] = {"none", "two-sided walls only", "all"}; if (parm->numparms == 1) showheightindicators = clamp(atoi_safe(parm->parms[0]), 0, 2); if (parm->numparms <= 1) OSD_Printf("height indicators: %s\n", how[showheightindicators]); else return OSDCMD_SHOWHELP; } else if (!Bstrcasecmp(parm->name, "show_ambiencesounds")) { static const char *how[3] = {"none", "current sector only", "all"}; if (parm->numparms == 1) showambiencesounds = clamp(atoi_safe(parm->parms[0]), 0, 2); if (parm->numparms <= 1) OSD_Printf("ambience sound circles: %s\n", how[showambiencesounds]); else return OSDCMD_SHOWHELP; } else if (!Bstrcasecmp(parm->name, "corruptcheck")) { int32_t tryfix = parm->numparms>=1 && !Bstrcasecmp(parm->parms[0], "tryfix"); if (parm->numparms == 1 || tryfix) { if (!Bstrcasecmp(parm->parms[0], "now")) { if (CheckMapCorruption(1, 0)==0) OSD_Printf("All OK.\n"); return OSDCMD_OK; } else if (tryfix) { uint64_t whicherrs = parm->numparms==1 ? ULONG_LONG_MAX : 0; if (whicherrs==0) { int32_t i, n, m; char *endptr; for (i=1; inumparms; i++) { n = (int32_t)Bstrtol(parm->parms[i], &endptr, 10); if (endptr != parm->parms[i]) { if (*endptr=='-') { m = (int32_t)Bstrtol(endptr+1, NULL, 10); if (n>=1 && n<=m && m<=MAXCORRUPTTHINGS) { uint64_t mask = ULONG_LONG_MAX; m = m-n+1; mask >>= (MAXCORRUPTTHINGS-m); mask <<= (n-1); whicherrs |= mask; } } else { if (n>=1 && n<=MAXCORRUPTTHINGS) whicherrs |= (1ull<<(n-1)); } } } } CheckMapCorruption(3, whicherrs); return OSDCMD_OK; } else if (isdigit(parm->parms[0][0])) { autocorruptcheck = clamp(atoi_safe(parm->parms[0]), 0, 3600); corruptchecktimer = totalclock + 120*autocorruptcheck; } } if (parm->numparms <= 1) { if (autocorruptcheck) OSD_Printf("auto corruption check: %d seconds\n", autocorruptcheck); else OSD_Printf("auto corruption check: off\n"); } else if (!tryfix) return OSDCMD_SHOWHELP; } return OSDCMD_OK; } #ifdef POLYMOST static int32_t osdcmd_tint(const osdfuncparm_t *parm) { int32_t i; palette_t *p; if (parm->numparms==1) { i = atoi_safe(parm->parms[0]); if (i>=0 && ir, p->g, p->b, p->f); } } else if (parm->numparms==0) { OSD_Printf("Hightile tintings:\n"); for (i=0,p=&hictinting[0]; ir, p->g, p->b, p->f); } else if (parm->numparms>=2) { i = atoi_safe(parm->parms[0]); if (i<0 || i>=MAXPALOOKUPS-RESERVEDPALS) return OSDCMD_SHOWHELP; p = &hictinting[i]; p->r = atoi_safe(parm->parms[1]); p->g = (parm->numparms>=3) ? atoi_safe(parm->parms[2]) : 255; p->b = (parm->numparms>=4) ? atoi_safe(parm->parms[3]) : 255; p->f = (parm->numparms>=5) ? atoi_safe(parm->parms[4])&HICEFFECTMASK : 0; } return OSDCMD_OK; } #endif // M32 script vvv static int32_t osdcmd_include(const osdfuncparm_t *parm) { if (parm->numparms != 1) return OSDCMD_SHOWHELP; C_Compile(parm->parms[0], 1); return OSDCMD_OK; } static int32_t osdcmd_scriptinfo(const osdfuncparm_t *parm) { UNREFERENCED_PARAMETER(parm); C_CompilationInfo(); return OSDCMD_OK; } #ifdef DEBUGGINGAIDS extern void X_Disasm(ofstype beg, int32_t size); static int32_t osdcmd_disasm(const osdfuncparm_t *parm) { int32_t i; if (parm->numparms != 2) return OSDCMD_SHOWHELP; if (!isdigit(parm->parms[1][0])) return OSDCMD_SHOWHELP; i=atoi_safe(parm->parms[1]); if (parm->parms[0][0]=='s') { if (i>=0 && i=0 && i=0) X_Disasm(aEventOffsets[i], aEventSizes[i]); } return OSDCMD_OK; } #endif static int32_t osdcmd_do(const osdfuncparm_t *parm) { intptr_t oscrofs; char *tp; int32_t i, j, slen, ofs; int32_t onumconstants=g_numSavedConstants; if (parm->numparms==0) return OSDCMD_SHOWHELP; oscrofs = (g_scriptPtr-script); ofs = 2*(parm->numparms>0); // true if "do" command slen = Bstrlen(parm->raw+ofs); tp = Bmalloc(slen+2); if (!tp) goto OUTOFMEM; Bmemcpy(tp, parm->raw+ofs, slen); // needed so that subsequent commands won't execute old stuff. tp[slen] = '\n'; tp[slen+1] = '\0'; g_didDefineSomething = 0; C_Compile(tp, 0); if (parm->numparms>=0) Bfree(tp); if (g_numCompilerErrors) { // g_scriptPtr = script + oscrofs; // handled in C_Compile() return OSDCMD_OK; } for (i=0,j=0; i=0) j++; if (g_didDefineSomething == 0) { g_numSavedConstants = onumconstants; *g_scriptPtr = CON_RETURN + (g_lineNumber<<12); g_scriptPtr = script + oscrofs; insptr = script + oscrofs; Bmemcpy(&vm, &vm_default, sizeof(vmstate_t)); if (qsetmode==200 && AIMING_AT_SPRITE) { vm.g_i = searchwall; vm.g_sp = &sprite[vm.g_i]; } VM_Execute(0); if (vm.updatehighlight) { update_highlight(); vm.updatehighlight = 0; } if (!(vm.flags&VMFLAG_ERROR)) { int32_t idx, dosave=1; for (i=1; i<=4; i++) { idx = (scripthistend-i)&(SCRIPTHISTSIZ-1); if (!scripthist[idx]) break; else if (!Bstrcmp(scripthist[idx], parm->raw)) { dosave = 0; break; } } if (dosave) { if (scripthist[scripthistend]) Bfree((void *)scripthist[scripthistend]); scripthist[scripthistend] = Bstrdup(parm->raw); scripthistend++; scripthistend %= SCRIPTHISTSIZ; } } // asksave = 1; // handled in Access(Sprite|Sector|Wall) } return OSDCMD_OK; OUTOFMEM: OSD_Printf("OUT OF MEMORY!\n"); return OSDCMD_OK; } void M32RunScript(const char *s) { osdfuncparm_t parm; parm.numparms = -1; parm.raw = s; osdcmd_do(&parm); } static int32_t osdcmd_endisableevent(const osdfuncparm_t *parm) { int32_t i, j, enable; if (!label) return OSDCMD_OK; if (parm->numparms < 1) { OSD_Printf("--- Defined events:\n"); for (i=0; i= 0) OSD_Printf("%s (%d): %s\n", label+(i*MAXLABELLEN), i, aEventEnabled[i]?"on":"off"); return OSDCMD_OK; } enable = !Bstrcasecmp(parm->name, "enableevent"); if (parm->numparms == 1) { if (!Bstrcasecmp(parm->parms[0], "all") || !Bstrcasecmp(parm->parms[0], "a")) { for (i=0; inumparms; i++) { char buf[64] = "EVENT_", buf2[64]; if (isdigit(parm->parms[i][0])) { j = atoi_safe(parm->parms[i]); Bsprintf(buf2, "event %d", j); } else if (!Bstrncmp(parm->parms[i], "EVENT_", 6)) { j = hash_find(&h_labels, parm->parms[i]); Bstrncpy(buf2, parm->parms[i], sizeof(buf2)); buf2[sizeof(buf2)-1] = '\0'; } else { Bstrncat(buf, parm->parms[i], sizeof(buf)-6-1); j = hash_find(&h_labels, buf); Bmemcpy(buf2, buf, sizeof(buf2)); } if (j>=0 && j: adds path to game filesystem", osdcmd_addpath); OSD_RegisterFunction("editorgridextent","editorgridextent: sets the size of the 2D mode editing grid",osdcmd_editorgridextent); OSD_RegisterFunction("initgroupfile","initgroupfile : adds a grp file into the game filesystem", osdcmd_initgroupfile); OSD_RegisterFunction("noclip","noclip: toggles clipping mode", osdcmd_noclip); OSD_RegisterFunction("quit","quit: exits the editor immediately", osdcmd_quit); OSD_RegisterFunction("exit","exit: exits the editor immediately", osdcmd_quit); OSD_RegisterFunction("sensitivity","sensitivity : changes the mouse sensitivity", osdcmd_sensitivity); //PK OSD_RegisterFunction("pk_turnaccel", "pk_turnaccel : sets turning acceleration+deceleration", osdcmd_vars_pk); OSD_RegisterFunction("pk_turndecel", "pk_turndecel : sets turning deceleration", osdcmd_vars_pk); OSD_RegisterFunction("pk_uedaccel", "pk_uedaccel : sets UnrealEd movement speed factor (0-5, exponentially)", osdcmd_vars_pk); OSD_RegisterFunction("pk_quickmapcycling", "pk_quickmapcycling: toggles quick cycling of maps with (Shift-)Ctrl-X", osdcmd_vars_pk); OSD_RegisterFunction("testplay_addparam", "testplay_addparam \"string\": sets additional parameters for test playing", osdcmd_testplay_addparam); OSD_RegisterFunction("show_heightindicators", "show_heightindicators {0, 1 or 2}: sets display of height indicators in 2D mode", osdcmd_vars_pk); OSD_RegisterFunction("show_ambiencesounds", "show_ambiencesounds {0, 1 or 2}>: sets display of MUSICANDSFX circles in 2D mode", osdcmd_vars_pk); OSD_RegisterFunction("corruptcheck", "corruptcheck {|now|tryfix}: sets auto corruption check interval if given, otherwise as indicated", osdcmd_vars_pk); #ifdef POLYMOST OSD_RegisterFunction("tint", "tint : queries or sets hightile tinting", osdcmd_tint); #endif // M32 script OSD_RegisterFunction("include", "include : compiles one or more M32 script files", osdcmd_include); OSD_RegisterFunction("do", "do (m32 script ...): executes M32 script statements", osdcmd_do); OSD_RegisterFunction("script_info", "script_info: shows information about compiled M32 script", osdcmd_scriptinfo); OSD_RegisterFunction("script_expertmode", "script_expertmode: toggles M32 script expert mode", osdcmd_vars_pk); OSD_RegisterFunction("enableevent", "enableevent {all|EVENT_...|(event number)}", osdcmd_endisableevent); OSD_RegisterFunction("disableevent", "disableevent {all|EVENT_...|(event number)}", osdcmd_endisableevent); OSD_RegisterFunction("osd_tryscript", "osd_tryscript: toggles execution of M32 script on invalid OSD command", osdcmd_vars_pk); OSD_RegisterFunction("sideview_reversehorizrot", "sideview_reversehorizrot: toggles reversion of Q and W keys in side view mode", osdcmd_vars_pk); #ifdef DEBUGGINGAIDS OSD_RegisterFunction("disasm", "disasm [s|e] ", osdcmd_disasm); #endif return 0; } #define DUKEOSD #ifdef DUKEOSD void GAME_drawosdchar(int32_t x, int32_t y, char ch, int32_t shade, int32_t pal) { int32_t ac; if (ch == 32) return; ac = ch-'!'+STARTALPHANUM; if (ac < STARTALPHANUM || ac > ENDALPHANUM) return; rotatesprite(((x<<3)+x)<<16, (y<<3)<<16, 65536l, 0, ac, shade, pal, 8|16, 0, 0, xdim-1, ydim-1); } void GAME_drawosdstr(int32_t x, int32_t y, char *ch, int32_t len, int32_t shade, int32_t pal) { int32_t ac; for (x = (x<<3)+x; len>0; len--, ch++, x++) { if (*ch == 32) { x+=5; continue; } ac = *ch-'!'+STARTALPHANUM; if (ac < STARTALPHANUM || ac > ENDALPHANUM) return; rotatesprite(x<<16, (y<<3)<<16, 65536l, 0, ac, shade, pal, 8|16, 0, 0, xdim-1, ydim-1); if (*ch >= '0' && *ch <= '9') x+=8; else x += tilesizx[ac]; } } static int32_t GetTime(void) { return totalclock; } void GAME_drawosdcursor(int32_t x, int32_t y, int32_t type, int32_t lastkeypress) { int32_t ac; if (type) ac = SMALLFNTCURSOR; else ac = '_'-'!'+STARTALPHANUM; if (!((GetTime()-lastkeypress) & 0x40l)) rotatesprite(((x<<3)+x)<<16, ((y<<3)+(type?-1:2))<<16, 65536l, 0, ac, 0, 8, 8|16, 0, 0, xdim-1, ydim-1); } int32_t GAME_getcolumnwidth(int32_t w) { return w/9; } int32_t GAME_getrowheight(int32_t w) { return w>>3; } //#define BGTILE 311 //#define BGTILE 1156 #define BGTILE 1141 // BIGHOLE #define BORDTILE 3250 // VIEWBORDER #define BITSTH 1+32+8+16 // high translucency #define BITSTL 1+8+16 // low translucency #define BITS 8+16+64 // solid #define SHADE 16 #define PALETTE 4 void GAME_clearbackground(int32_t numcols, int32_t numrows) { UNREFERENCED_PARAMETER(numcols); #if defined(POLYMOST) && defined(USE_OPENGL) // if (getrendermode() < 3) bits = BITS; // else if (rendmode>=3 && qsetmode==200) { int32_t x, y, xsiz, ysiz, tx2, ty2; int32_t daydim, bits; bits = BITSTL; daydim = numrows<<3; xsiz = tilesizx[BGTILE]; tx2 = xdim/xsiz; ysiz = tilesizy[BGTILE]; ty2 = daydim/ysiz; setpolymost2dview(); for (x=0; x<=tx2; x++) for (y=0; y<=ty2; y++) rotatesprite(x*xsiz<<16,y*ysiz<<16,65536L,0,BGTILE,SHADE,PALETTE,bits,0,0,xdim,daydim); xsiz = tilesizy[BORDTILE]; tx2 = xdim/xsiz; ysiz = tilesizx[BORDTILE]; for (x=0; x<=tx2; x++) rotatesprite(x*xsiz<<16,(daydim+ysiz+1)<<16,65536L,1536,BORDTILE,SHADE-12,PALETTE,BITS,0,0,xdim,daydim+ysiz+1); return; } #endif CLEARLINES2D(0, min(ydim, numrows*8+8), editorcolors[16]); } static void m32_osdsetfunctions() { OSD_SetFunctions( /* GAME_drawosdchar, GAME_drawosdstr, GAME_drawosdcursor, GAME_getcolumnwidth, GAME_getrowheight, */ 0,0,0,0,0, GAME_clearbackground, (int32_t( *)(void))GetTime, NULL ); } #endif enum { T_EOF = -2, T_ERROR = -1, T_INCLUDE = 0, T_DEFINE = 1, T_LOADGRP, T_TILEGROUP, T_TILE, T_TILERANGE, T_HOTKEY, T_TILES, T_NOAUTOLOAD, T_COLORS, T_ALPHABET, T_MAP, T_MAPA, T_MAPRANGE, T_MAPRANGEA, T_OFFSET, T_OFFSETA, T_DEFINESOUND, }; typedef struct { const char *text; int32_t tokenid; } tokenlist; static int32_t getatoken(scriptfile *sf, const tokenlist *tl, int32_t ntokens) { char *tok; int32_t i; if (!sf) return T_ERROR; tok = scriptfile_gettoken(sf); if (!tok) return T_EOF; for (i=0; iname); initprintf("Using group file '%s'.\n", tempbuf); initgroupfile(tempbuf); findfiles = findfiles->next; } } } int32_t parsegroupfiles(scriptfile *script) { int32_t tokn; char *cmdtokptr; tokenlist grptokens[] = { { "include", T_INCLUDE }, { "#include", T_INCLUDE }, { "loadgrp", T_LOADGRP }, { "noautoload", T_NOAUTOLOAD } }; while (1) { tokn = getatoken(script,grptokens,sizeof(grptokens)/sizeof(tokenlist)); cmdtokptr = script->ltextptr; switch (tokn) { case T_LOADGRP: { char *fn; pathsearchmode = 1; if (!scriptfile_getstring(script,&fn)) { int32_t j = initgroupfile(fn); if (j == -1) initprintf("Could not find group file '%s'.\n",fn); else { initprintf("Using group file '%s'.\n",fn); if (!NoAutoLoad) DoAutoload(fn); } } pathsearchmode = 0; } break; case T_INCLUDE: { char *fn; if (!scriptfile_getstring(script,&fn)) { scriptfile *included; included = scriptfile_fromfile(fn); if (!included) { initprintf("Warning: Failed including %s on line %s:%d\n", fn, script->filename,scriptfile_getlinum(script,cmdtokptr)); } else { parsegroupfiles(included); scriptfile_close(included); } } break; } break; case T_NOAUTOLOAD: NoAutoLoad = 1; break; case T_EOF: return(0); default: break; } } return 0; } int32_t loadgroupfiles(const char *fn) { scriptfile *script; script = scriptfile_fromfile(fn); if (!script) return -1; parsegroupfiles(script); scriptfile_close(script); scriptfile_clearsymbols(); return 0; } int32_t parsetilegroups(scriptfile *script) { int32_t tokn; char *cmdtokptr; tokenlist tgtokens[] = { { "include", T_INCLUDE }, { "#include", T_INCLUDE }, { "define", T_DEFINE }, { "#define", T_DEFINE }, { "tilegroup", T_TILEGROUP }, { "spritehotkey", T_HOTKEY }, { "alphabet", T_ALPHABET }, }; while (1) { tokn = getatoken(script,tgtokens,sizeof(tgtokens)/sizeof(tokenlist)); cmdtokptr = script->ltextptr; switch (tokn) { case T_HOTKEY: { int32_t i, j; if (scriptfile_getsymbol(script,&i)) break; if (scriptfile_getsymbol(script,&j)) break; if (i < 0 || i > 9 || j < 0 || j >= MAXTILES) break; prefixtiles[i] = j; break; } case T_INCLUDE: { char *fn; if (!scriptfile_getstring(script,&fn)) { scriptfile *included; included = scriptfile_fromfile(fn); if (!included) { initprintf("Warning: Failed including %s on line %s:%d\n", fn, script->filename,scriptfile_getlinum(script,cmdtokptr)); } else { parsetilegroups(included); scriptfile_close(included); } } break; } case T_DEFINE: { char *name; int32_t number; if (scriptfile_getstring(script,&name)) break; if (scriptfile_getsymbol(script,&number)) break; if (scriptfile_addsymbolvalue(name,number) < 0) initprintf("Warning: Symbol %s was NOT redefined to %d on line %s:%d\n", name,number,script->filename,scriptfile_getlinum(script,cmdtokptr)); break; } case T_TILEGROUP: { char *end, *name; int32_t i; if (tile_groups >= MAX_TILE_GROUPS) break; if (scriptfile_getstring(script,&name)) break; if (scriptfile_getbraces(script,&end)) break; s_TileGroups[tile_groups].pIds = Bcalloc(MAX_TILE_GROUP_ENTRIES, sizeof(int32_t)); s_TileGroups[tile_groups].szText = Bstrdup(name); while (script->textptr < end) { tokenlist tgtokens2[] = { { "tilegroup", T_TILEGROUP }, { "tile", T_TILE }, { "tilerange", T_TILERANGE }, { "hotkey", T_HOTKEY }, { "tiles", T_TILES }, { "colors", T_COLORS }, }; int32_t token = getatoken(script,tgtokens2,sizeof(tgtokens2)/sizeof(tokenlist)); switch (token) { case T_TILE: { if (scriptfile_getsymbol(script,&i)) break; if (i >= 0 && i < MAXTILES && s_TileGroups[tile_groups].nIds < MAX_TILE_GROUP_ENTRIES) s_TileGroups[tile_groups].pIds[s_TileGroups[tile_groups].nIds++] = i; // OSD_Printf("added tile %d to group %d\n",i,g); break; } case T_TILERANGE: { int32_t j; if (scriptfile_getsymbol(script,&i)) break; if (scriptfile_getsymbol(script,&j)) break; if (i < 0 || i >= MAXTILES || j < 0 || j >= MAXTILES) break; while (s_TileGroups[tile_groups].nIds < MAX_TILE_GROUP_ENTRIES && i <= j) { s_TileGroups[tile_groups].pIds[s_TileGroups[tile_groups].nIds++] = i++; // OSD_Printf("added tile %d to group %d\n",i,g); } break; } case T_COLORS: { int32_t j; if (scriptfile_getsymbol(script, &i)) break; if (scriptfile_getsymbol(script, &j)) break; if (i < 0 || i >= 256 || j < 0 || j >= 256) break; s_TileGroups[tile_groups].color1 = i; s_TileGroups[tile_groups].color2 = j; break; } case T_HOTKEY: { char *c; if (scriptfile_getstring(script,&c)) break; s_TileGroups[tile_groups].key1 = Btoupper(c[0]); s_TileGroups[tile_groups].key2 = Btolower(c[0]); break; } case T_TILES: { char *end2; if (scriptfile_getbraces(script,&end2)) break; while (script->textptr < end2-1) { if (!scriptfile_getsymbol(script,&i)) { if (i >= 0 && i < MAXTILES && s_TileGroups[tile_groups].nIds < MAX_TILE_GROUP_ENTRIES) s_TileGroups[tile_groups].pIds[s_TileGroups[tile_groups].nIds++] = i; // OSD_Printf("added tile %d to group %d\n",i,g); } } break; } } } s_TileGroups[tile_groups].pIds = Brealloc(s_TileGroups[tile_groups].pIds, s_TileGroups[tile_groups].nIds*sizeof(int32_t)); tile_groups++; break; } case T_ALPHABET: { char *end; int32_t i, j, k; if (numalphabets >= MAX_ALPHABETS) { OSD_Printf("Too many alphabet definitions (max: %d).\n", MAX_ALPHABETS); break; } if (scriptfile_getbraces(script,&end)) break; for (i=0; itextptr < end) { tokenlist alphtokens2[] = { { "map", T_MAP }, { "mapa", T_MAPA }, { "maprange", T_MAPRANGE }, { "maprangea", T_MAPRANGEA }, { "offset", T_OFFSET }, { "offseta", T_OFFSETA }, }; int32_t token = getatoken(script,alphtokens2,sizeof(alphtokens2)/sizeof(tokenlist)); switch (token) { case T_MAP: // map , e.g. map 46 3002 { if (scriptfile_getnumber(script,&i)) break; if (scriptfile_getsymbol(script,&j)) break; if (i>=33 && i<=126 && j>= 0 && j , e.g. map ".,!?" 3002 { char *s; if (scriptfile_getstring(script,&s)) break; if (scriptfile_getsymbol(script,&i)) break; for (; *s; s++, i++) { if (*s>=33 && *s<=126 && i>= 0 && i , e.g. map 33 126 STARTALPHANUM // maprangea , e.g. map "!" "~" STARTALPHANUM case T_MAPRANGE: case T_MAPRANGEA: { if (token==T_MAPRANGE) { if (scriptfile_getnumber(script,&i)) break; if (scriptfile_getnumber(script,&j)) break; } else { char *c1, *c2; if (scriptfile_getstring(script,&c1)) break; if (scriptfile_getstring(script,&c2)) break; i=*c1; j=*c2; } if (scriptfile_getsymbol(script,&k)) break; if (i>126 || j<33) break; for (; i<=j && k=33 && i<=126) alphabets[numalphabets].pic[i-33] = k; } break; } case T_OFFSET: // offset { if (scriptfile_getnumber(script, &i)) break; if (scriptfile_getnumber(script, &j)) break; if (scriptfile_getnumber(script, &k)) break; if (i >= 33 && i <= 126) { alphabets[numalphabets].xofs[i-33] = j; alphabets[numalphabets].yofs[i-33] = k; } break; } case T_OFFSETA: // offseta { char *s; if (scriptfile_getstring(script, &s)) break; if (scriptfile_getnumber(script, &i)) break; if (scriptfile_getnumber(script, &j)) break; for (; *s; s++) if (*s >= 33 && *s <= 126) { alphabets[numalphabets].xofs[(*s)-33] = i; alphabets[numalphabets].yofs[(*s)-33] = j; } break; } } } numalphabets++; break; } case T_EOF: return(0); default: break; } } return 0; } static int32_t loadtilegroups(const char *fn) { int32_t i, j; scriptfile *script; TileGroup blank = { NULL, 0, NULL, 0, 0, 0, 0}; script = scriptfile_fromfile(fn); if (!script) return -1; for (i=0; i= 0 ; j--) { // Apply the colors to all tiles in the group. spritecol2d[s_TileGroups[i].pIds[j]][0] = s_TileGroups[i].color1; spritecol2d[s_TileGroups[i].pIds[j]][1] = s_TileGroups[i].color2; } } } return 0; } /// vvv Parse CON files partially to get sound definitions static int32_t parseconsounds(scriptfile *script) { int32_t tokn; char *cmdtokptr; int32_t num_invalidsounds=0; tokenlist cstokens[] = { { "include", T_INCLUDE }, { "#include", T_INCLUDE }, { "define", T_DEFINE }, { "#define", T_DEFINE }, { "definesound", T_DEFINESOUND }, }; while (1) { tokn = getatoken(script,cstokens,sizeof(cstokens)/sizeof(tokenlist)); cmdtokptr = script->ltextptr; switch (tokn) { case T_INCLUDE: { char *fn; if (!scriptfile_getstring(script,&fn)) { scriptfile *included; included = scriptfile_fromfile(fn); if (!included) { initprintf("Warning: Failed including %s on line %s:%d\n", fn, script->filename,scriptfile_getlinum(script,cmdtokptr)); } else { int32_t tmp = parseconsounds(included); scriptfile_close(included); if (tmp < 0) return tmp; } } break; } case T_DEFINE: { char *name; int32_t number; if (scriptfile_getstring(script,&name)) break; if (scriptfile_getsymbol(script,&number)) break; if (scriptfile_addsymbolvalue(name,number) < 0) initprintf("Warning: Symbol %s was NOT redefined to %d on line %s:%d\n", name,number,script->filename,scriptfile_getlinum(script,cmdtokptr)); break; } case T_DEFINESOUND: { char *definedname, *filename; int32_t sndnum, ps, pe, pr, m, vo; int32_t slen; if (scriptfile_getsymbol(script, &sndnum)) break; definedname = Bstrdup(script->ltextptr); if (!definedname) return -1; if (sndnum < 0 || sndnum >= MAXSOUNDS) { initprintf("Warning: invalid sound definition %s (sound number < 0 or >= MAXSOUNDS) on line %s:%d\n", definedname, script->filename,scriptfile_getlinum(script,cmdtokptr)); num_invalidsounds++; break; } if (scriptfile_getstring(script, &filename)) { Bfree(definedname); num_invalidsounds++; break; } slen = Bstrlen(filename); if (slen >= BMAX_PATH) { initprintf("Warning: invalid sound definition %s (filename too long) on line %s:%d\n", definedname, script->filename,scriptfile_getlinum(script,cmdtokptr)); Bfree(definedname); num_invalidsounds++; break; } if (g_sounds[sndnum].filename == NULL) g_sounds[sndnum].filename = Bcalloc(slen+1,sizeof(uint8_t)); // Hopefully noone does memcpy(..., g_sounds[].filename, BMAX_PATH) if (!g_sounds[sndnum].filename) { Bfree(definedname); return -1; } Bmemcpy(g_sounds[sndnum].filename, filename, slen+1); if (scriptfile_getnumber(script, &ps)) goto BAD; if (scriptfile_getnumber(script, &pe)) goto BAD; if (scriptfile_getnumber(script, &pr)) goto BAD; if (scriptfile_getnumber(script, &m)) goto BAD; if (ParentalLock && (m&8)) goto BAD; if (scriptfile_getnumber(script, &vo)) goto BAD; if (0) { BAD: Bfree(definedname); Bfree(g_sounds[sndnum].filename); g_sounds[sndnum].filename = NULL; num_invalidsounds++; break; } g_sounds[sndnum].definedname = definedname; // we want to keep it for display purposes g_sounds[sndnum].ps = ps; g_sounds[sndnum].pe = pe; g_sounds[sndnum].pr = pr; g_sounds[sndnum].m = m; g_sounds[sndnum].vo = vo; g_sndnum[g_numsounds] = g_definedsndnum[g_numsounds] = sndnum; g_numsounds++; if (g_numsounds == MAXSOUNDS) goto END; break; } case T_EOF: goto END; default: break; } } END: return g_numsounds; } static int32_t loadconsounds(const char *fn) { scriptfile *script; int32_t ret; initprintf("Loading sounds from '%s'\n",fn); script = scriptfile_fromfile(fn); if (!script) { initprintf("Error loading sounds: file '%s' not found.\n", fn); return -1; } ret = parseconsounds(script); if (ret < 0) initprintf("There was an error parsing '%s'.\n", fn); else if (ret == 0) initprintf("'%s' doesn't contain sound definitions. No sounds loaded.\n", fn); else initprintf("Loaded %d sound definitions.\n", ret); scriptfile_close(script); scriptfile_clearsymbols(); return ret; } void ExtPreLoadMap(void) { } /// ^^^ static void m32script_interrupt_handler(int signo) { if (signo==SIGINT) { vm.flags |= VMFLAG_ERROR; OSD_Printf("M32 script execution interrupted.\n"); Bmemset(aEventEnabled, 0, sizeof(aEventEnabled)); } } int32_t ExtInit(void) { int32_t rv = 0; int32_t i; char cwd[BMAX_PATH]; #if defined(__linux__) || defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) addsearchpath("/usr/share/games/jfduke3d"); addsearchpath("/usr/local/share/games/jfduke3d"); addsearchpath("/usr/share/games/eduke32"); addsearchpath("/usr/local/share/games/eduke32"); #elif defined(__APPLE__) addsearchpath("/Library/Application Support/JFDuke3D"); addsearchpath("/Library/Application Support/EDuke32"); #endif if (getcwd(cwd,BMAX_PATH)) { #if defined(__APPLE__) /* Dirty hack on OS X to also look for gamedata inside the application bundle - rhoenie 08/08 */ char seekinappcontainer[BMAX_PATH]; Bsnprintf(seekinappcontainer,sizeof(seekinappcontainer),"%s/EDuke32.app/", cwd); addsearchpath(seekinappcontainer); #endif addsearchpath(cwd); Bstrcpy(program_origcwd, cwd); } else program_origcwd[0] = '\0'; if (CommandPaths) { struct strllist *s; while (CommandPaths) { s = CommandPaths->next; addsearchpath(CommandPaths->str); Bfree(CommandPaths->str); Bfree(CommandPaths); CommandPaths = s; } } #if defined(_WIN32) if (!access("user_profiles_enabled", F_OK)) #else if (usecwd == 0 && access("user_profiles_disabled", F_OK)) #endif { char *homedir; int32_t asperr; if ((homedir = Bgethomedir())) { Bsnprintf(cwd,sizeof(cwd),"%s/" #if defined(_WIN32) "EDuke32 Settings" #elif defined(__APPLE__) "Library/Application Support/EDuke32" #else ".eduke32" #endif ,homedir); asperr = addsearchpath(cwd); if (asperr == -2) { if (Bmkdir(cwd,S_IRWXU) == 0) asperr = addsearchpath(cwd); else asperr = -1; } if (asperr == 0) chdir(cwd); Bfree(homedir); } } // JBF 20031220: Because it's annoying renaming GRP files whenever I want to test different game data if (getenv("DUKE3DGRP")) { g_grpNamePtr = getenv("DUKE3DGRP"); initprintf("Using %s as main GRP file\n", g_grpNamePtr); } i = initgroupfile(g_grpNamePtr); if (!NoAutoLoad) { static const char *extensions[3] = { "*.grp", "*.zip", "*.pk3" }; int32_t exti; for (exti=0; exti<3; exti++) { getfilenames("autoload", extensions[exti]); while (findfiles) { Bsprintf(tempbuf,"autoload/%s",findfiles->name); initprintf("Using group file '%s'.\n",tempbuf); initgroupfile(tempbuf); findfiles = findfiles->next; } } if (i != -1) DoAutoload(g_grpNamePtr); } if (getenv("DUKE3DDEF")) { defsfilename = getenv("DUKE3DDEF"); initprintf("Using '%s' as definitions file\n", defsfilename); } loadgroupfiles(defsfilename); { struct strllist *s; int32_t j; pathsearchmode = 1; while (CommandGrps) { s = CommandGrps->next; j = initgroupfile(CommandGrps->str); if (j == -1) initprintf("Could not find group file '%s'.\n",CommandGrps->str); else { initprintf("Using group file '%s'.\n",CommandGrps->str); if (!NoAutoLoad) DoAutoload(CommandGrps->str); } Bfree(CommandGrps->str); Bfree(CommandGrps); CommandGrps = s; } pathsearchmode = 0; } bpp = 32; #if defined(POLYMOST) && defined(USE_OPENGL) glusetexcache = -1; if (Bstrcmp(setupfilename, "mapster32.cfg")) initprintf("Using config file '%s'.\n",setupfilename); if (loadsetup(setupfilename) < 0) initprintf("Configuration file not found, using defaults.\n"), rv = 1; if (glusetexcache == -1) { int32_t i; #if 0 i=wm_ynbox("Texture Cache", "Would you like to enable the on-disk texture cache?\n\n" "You generally want to say 'yes' here, especially if using the HRP."); #else i = 1; #endif if (i) glusetexcompr = 1, glusetexcache = 2; else glusetexcache = 0; } #endif Bmemcpy((void *)buildkeys,(void *)keys,NUMBUILDKEYS); //Trick to make build use setup.dat keys if (initengine()) { initprintf("There was a problem initializing the engine.\n"); return -1; } setbasepaltable(basepaltable, BASEPALCOUNT); kensplayerheight = 40; //32 zmode = 2; zlock = kensplayerheight<<8; defaultspritecstat = 0; ReadGamePalette(); // InitWater(); InitCustomColors(); getmessageleng = 0; getmessagetimeoff = 0; Bstrcpy(apptitle, "Mapster32"VERSION BUILDDATE); autosavetimer = totalclock+120*autosave; #if defined(DUKEOSD) m32_osdsetfunctions(); #endif OSD_SetParameters(0,2, 0,0, 4,0); registerosdcommands(); // backup pathsearchmode so that a later open // will hopefully be the same file pathsearchmode_oninit = pathsearchmode; loadtilegroups(default_tiles_cfg); ReadHelpFile("m32help.hlp"); signal(SIGINT, m32script_interrupt_handler); return rv; } #ifdef RENDERTYPEWIN void app_crashhandler(void) { if (levelname[0]) { char *f = strstr(levelname,".map"); if (f) Bstrcpy(f,"_crash.map"); else Bstrcat(f,"_crash.map"); SaveBoard(f, 1); } } #endif void ExtUnInit(void) { int32_t i; // setvmode(0x03); writesetup(setupfilename); S_SoundShutdown(); uninitgroupfile(); for (i = MAX_TILE_GROUPS-1; i >= 0; i--) { if (s_TileGroups[i].pIds != NULL) Bfree(s_TileGroups[i].pIds); if (s_TileGroups[i].szText != NULL) Bfree(s_TileGroups[i].szText); } for (i = numhelppages-1; i >= 0; i--) Bfree(helppage[i]); if (helppage) Bfree(helppage); } void ExtPreCheckKeys(void) // just before drawrooms { int32_t i = 0, ii; int32_t radius, xp1, yp1; int32_t col; int32_t picnum, frames; int32_t ang = 0, flags, shade; if (qsetmode == 200) //In 3D mode { if (shadepreview) { int32_t i = 0; for (i=0; i= 0) { if (!wallflag[wall[w].nextwall]) { wallshades[wall[w].nextwall] = NEXTWALL(w).shade; NEXTWALL(w).shade = sprite[i].shade; wallpals[wall[w].nextwall] = NEXTWALL(w).pal; NEXTWALL(w).pal = sprite[i].pal; wallflag[wall[w].nextwall] = 1; } } */ } sectorshades[isec][0] = sector[isec].floorshade; sectorshades[isec][1] = sector[isec].ceilingshade; sector[isec].floorshade = sprite[i].shade; sector[isec].ceilingshade = sprite[i].shade; sectorpals[isec][0] = sector[isec].floorpal; sectorpals[isec][1] = sector[isec].ceilingpal; sector[isec].floorpal = sprite[i].pal; sector[isec].ceilingpal = sprite[i].pal; w = headspritesect[isec]; while (w >= 0) { if (w == i) { w = nextspritesect[w]; continue; } spriteshades[w] = sprite[w].shade; sprite[w].shade = sprite[i].shade; spritepals[w] = sprite[w].pal; sprite[w].pal = sprite[i].pal; w = nextspritesect[w]; } } else if (sprite[i].picnum == SECTOREFFECTOR && (sprite[i].lotag == 49 || sprite[i].lotag == 50)) { #ifdef POLYMER if (sprite[i].lotag == 49) { if (getrendermode() == 4) { if (spritelightptr[i] == NULL) { #pragma pack(push,1) _prlight mylight; #pragma pack(pop) mylight.sector = SECT; Bmemcpy(&mylight, &sprite[i], sizeof(vec3_t)); mylight.range = SHT; mylight.color[0] = sprite[i].xvel; mylight.color[1] = sprite[i].yvel; mylight.color[2] = sprite[i].zvel; mylight.radius = 0; mylight.angle = SA; mylight.horiz = SH; mylight.minshade = sprite[i].xoffset; mylight.maxshade = sprite[i].yoffset; mylight.tilenum = 0; if (CS & 2) { if (CS & 512) mylight.priority = PR_LIGHT_PRIO_LOW; else mylight.priority = PR_LIGHT_PRIO_HIGH; } else mylight.priority = PR_LIGHT_PRIO_MAX; spritelightid[i] = polymer_addlight(&mylight); if (spritelightid[i] >= 0) spritelightptr[i] = &prlights[spritelightid[i]]; } else { if (Bmemcmp(&sprite[i], spritelightptr[i], sizeof(vec3_t))) { Bmemcpy(spritelightptr[i], &sprite[i], sizeof(vec3_t)); spritelightptr[i]->sector = sprite[i].sectnum; spritelightptr[i]->flags.invalidate = 1; } if (SHT != spritelightptr[i]->range) { spritelightptr[i]->range = SHT; spritelightptr[i]->flags.invalidate = 1; } if ((sprite[i].xvel != spritelightptr[i]->color[0]) || (sprite[i].yvel != spritelightptr[i]->color[1]) || (sprite[i].zvel != spritelightptr[i]->color[2])) { spritelightptr[i]->color[0] = sprite[i].xvel; spritelightptr[i]->color[1] = sprite[i].yvel; spritelightptr[i]->color[2] = sprite[i].zvel; } } } } if (sprite[i].lotag == 50) { if (getrendermode() == 4) { if (spritelightptr[i] == NULL) { #pragma pack(push,1) _prlight mylight; #pragma pack(pop) mylight.sector = SECT; Bmemcpy(&mylight, &sprite[i], sizeof(vec3_t)); mylight.range = SHT; mylight.color[0] = sprite[i].xvel; mylight.color[1] = sprite[i].yvel; mylight.color[2] = sprite[i].zvel; mylight.radius = (256-(SS+128))<<1; mylight.faderadius = (int16_t)(mylight.radius * 0.75f); mylight.angle = SA; mylight.horiz = SH; mylight.minshade = sprite[i].xoffset; mylight.maxshade = sprite[i].yoffset; mylight.tilenum = OW; if (CS & 2) { if (CS & 512) mylight.priority = PR_LIGHT_PRIO_LOW; else mylight.priority = PR_LIGHT_PRIO_HIGH; } else mylight.priority = PR_LIGHT_PRIO_MAX; spritelightid[i] = polymer_addlight(&mylight); if (spritelightid[i] >= 0) spritelightptr[i] = &prlights[spritelightid[i]]; } else { if (Bmemcmp(&sprite[i], spritelightptr[i], sizeof(vec3_t))) { Bmemcpy(spritelightptr[i], &sprite[i], sizeof(vec3_t)); spritelightptr[i]->sector = sprite[i].sectnum; spritelightptr[i]->flags.invalidate = 1; } if (SHT != spritelightptr[i]->range) { spritelightptr[i]->range = SHT; spritelightptr[i]->flags.invalidate = 1; } if ((sprite[i].xvel != spritelightptr[i]->color[0]) || (sprite[i].yvel != spritelightptr[i]->color[1]) || (sprite[i].zvel != spritelightptr[i]->color[2])) { spritelightptr[i]->color[0] = sprite[i].xvel; spritelightptr[i]->color[1] = sprite[i].yvel; spritelightptr[i]->color[2] = sprite[i].zvel; } if (((256-(SS+128))<<1) != spritelightptr[i]->radius) { spritelightptr[i]->radius = (256-(SS+128))<<1; spritelightptr[i]->faderadius = (int16_t)(spritelightptr[i]->radius * 0.75f); spritelightptr[i]->flags.invalidate = 1; } if (SA != spritelightptr[i]->angle) { spritelightptr[i]->angle = SA; spritelightptr[i]->flags.invalidate = 1; } if (SH != spritelightptr[i]->horiz) { spritelightptr[i]->horiz = SH; spritelightptr[i]->flags.invalidate = 1; } spritelightptr[i]->tilenum = OW; } } } #endif // POLYMER } } } if (floor_over_floor) SE40Code(pos.x,pos.y,pos.z,ang,horiz); if (purpleon) clearview(255); return; } begindrawing(); //{{{ // if (cursectornum >= 0) // fillsector(cursectornum, 31); if (graphicsmode && !m32_sideview && zoom >= 256) { for (i=ii=0; ix-pos.x,tspr->y-pos.y); k = (((sprite[i].ang+3072+128-k)&2047)>>8)&7; //This guy has only 5 pictures for 8 angles (3 are x-flipped) if (k <= 4) { picnum += k; ang = 0; flags &= ~4; } else { picnum += 8-k; ang = 1024; flags |= 4; } } if (graphicsmode == 2) { if (frames==2) picnum+=((((4-(totalclock>>5)))&1)*5); if (frames==4) picnum+=((((4-(totalclock>>5)))&3)*5); if (frames==5) picnum+=(((totalclock>>5)%5))*5; } if (tilesizx[picnum] == 0) picnum -= 5; //Hack, for actors } break; default: break; } xp1 = mulscale14(sprite[i].x-pos.x,zoom); yp1 = mulscale14(sprite[i].y-pos.y-(tilesizy[picnum]<<2),zoom); if (i+16384 != pointhighlight || !(totalclock&32)) { shade = sprite[i].shade; if (shade < 6) shade = 6; } xp1 += halfxdim16; yp1 += midydim16; ydim16 = ydim-STATUS2DSIZ2; if (xp1 < 4 || xp1 > xdim-6 || yp1 < 4 || yp1 > ydim16-6) continue; rotatesprite(xp1<<16,yp1<<16,zoom<<5,ang,picnum, shade,sprite[i].pal,flags,0,0,xdim-1,ydim16-1); } } if (showambiencesounds) { for (ii=0; ii=0; i=nextspritesect[i]) { if (sprite[i].picnum != MUSICANDSFX /*|| zoom < 256*/ ) continue; if (showambiencesounds==1 && sprite[i].sectnum!=cursectnum) continue; screencoords(&xp1,&yp1, sprite[i].x-pos.x,sprite[i].y-pos.y, zoom); if (m32_sideview) yp1 += getscreenvdisp(sprite[i].z-pos.z, zoom); radius = mulscale14(sprite[i].hitag,zoom); col = 6; if (i+16384 == pointhighlight) if (totalclock & 32) col += (2<<2); drawlinepat = 0xf0f0f0f0; drawcircle16(halfxdim16+xp1, midydim16+yp1, radius, scalescreeny(16384), editorcolors[(int32_t)col]); drawlinepat = 0xffffffff; // radius = mulscale15(sprite[i].hitag,zoom); // drawcircle16(halfxdim16+xp1, midydim16+yp1, radius, col); } } enddrawing(); //}}} } void ExtAnalyzeSprites(void) { int32_t i, k; spritetype *tspr; int32_t frames=0, l; for (i=0,tspr=&tsprite[0]; ipicnum<11) tspr->xrepeat=0; if (nosprites==1||nosprites==3) switch (tspr->picnum) { case SEENINE : tspr->xrepeat=0; } if (showinvisibility && (tspr->cstat&32768)) { tspr->pal = 6; tspr->cstat &= ~32768; tspr->cstat |= 2+512; } if (shadepreview && !(tspr->cstat & 16)) { if (tspr->sectnum<0) continue; if (sector[tspr->sectnum].ceilingstat&1) { l = sector[tspr->sectnum].ceilingshade; if (sector[tspr->sectnum].ceilingpal != 0 && sector[tspr->sectnum].ceilingpal < num_tables) tspr->pal=sector[tspr->sectnum].ceilingpal; } else { l = sector[tspr->sectnum].floorshade; if (sector[tspr->sectnum].floorpal != 0 && sector[tspr->sectnum].floorpal < num_tables) tspr->pal=sector[tspr->sectnum].floorpal; } if ((tspr->owner>=0 && (sprite[tspr->owner].cstat&2048)==0)) { l = clamp(l, -127, 127); // tspr->shade = l; } } switch (tspr->picnum) { // 5-frame walk case 1550 : // Shark frames=5; // 2-frame walk case 1445 : // duke kick case LIZTROOPDUCKING : case 2030 : // pig shot case OCTABRAIN : case PIGCOPDIVE : case 2190 : // liz capt shot case BOSS1SHOOT : case BOSS1LOB : case LIZTROOPSHOOT : if (frames==0) frames=2; // 4-frame walk case 1491 : // duke crawl case LIZTROOP : case LIZTROOPRUNNING : case PIGCOP : case LIZMAN : case BOSS1 : case BOSS2 : case BOSS3 : case BOSS4 : case NEWBEAST: if (frames==0) frames=4; case LIZTROOPJETPACK : case DRONE : case COMMANDER : case TANK : case RECON : if (frames==0) frames = 10; case ROTATEGUN : case CAMERA1: case APLAYER : if (frames==0) frames=1; case GREENSLIME : case PIGCOPSTAYPUT : case LIZMANSTAYPUT: case LIZTROOPSTAYPUT : case LIZMANSPITTING : case LIZMANFEEDING : case LIZMANJUMP : case NEWBEASTSTAYPUT : case BOSS1STAYPUT : if (skill!=4) { if (tspr->lotag>skill+1) { tspr->xrepeat=0; tspr->cstat=32768; break; } } if (nosprites==2||nosprites==3) { tspr->xrepeat=0; tspr->cstat=32768; } // else tspr->cstat&=32767; #if defined(USE_OPENGL) && defined(POLYMOST) if (!usemodels || md_tilehasmodel(tspr->picnum,tspr->pal) < 0) #endif { if (frames!=0) { if (frames==10) frames=0; k = getangle(tspr->x-pos.x,tspr->y-pos.y); k = (((tspr->ang+3072+128-k)&2047)>>8)&7; //This guy has only 5 pictures for 8 angles (3 are x-flipped) if (k <= 4) { tspr->picnum += k; tspr->cstat &= ~4; //clear x-flipping bit } else { tspr->picnum += 8-k; tspr->cstat |= 4; //set x-flipping bit } } if (frames==2) tspr->picnum += (((4-(totalclock>>5)))&1)*5; if (frames==4) tspr->picnum += (((4-(totalclock>>5)))&3)*5; if (frames==5) tspr->picnum += ((totalclock>>5)%5)*5; if (tilesizx[tspr->picnum] == 0) tspr->picnum -= 5; //Hack, for actors } break; default: break; } } VM_OnEvent(EVENT_ANALYZESPRITES, -1); } #define MESSAGEX 3 // (xdimgame>>1) #define MESSAGEY 3 // ((i/charsperline)<<3)+(ydimgame-(ydimgame>>3))-(((getmessageleng-1)/charsperline)<<3) static void Keys2d3d(void) { int32_t i; if (mapstate == NULL) { // map_revision = 0; create_map_snapshot(); // initial map state // Bfree(mapstate->next); // mapstate = mapstate->prev; } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(A)) // 'A { if (qsetmode == 200) autosave = autosave?0:getnumber256("Autosave interval, in seconds: ",180,3600,0); else autosave = autosave?0:getnumber16("Autosave interval, in seconds: ",180,3600,0); if (autosave) message("Autosave enabled, interval: %d seconds",autosave); else message("Autosave disabled"); } if (keystatus[KEYSC_QUOTE] && PRESSED_KEYSC(N)) // 'N { noclip = !noclip; message("Clipping %s", noclip?"disabled":"enabled"); } if (eitherCTRL && PRESSED_KEYSC(N)) // CTRL+N { spnoclip = !spnoclip; message("Sprite clipping %s", spnoclip?"disabled":"enabled"); } if (eitherCTRL) //CTRL { if (PRESSED_KEYSC(P)) // Ctrl-P: Map playtesting { if (qsetmode != 200) test_map(eitherALT); } if (keystatus[KEYSC_S]) // S { if (levelname[0]) { keystatus[KEYSC_S] = 0; i = CheckMapCorruption(4, 0); if (i<4) { SaveBoard(levelname, 0); message("Board saved"); asksave = 0; lastsave=totalclock; } else message("Map is heavily corrupted, not saving. See OSD for details."); } } if (keystatus[KEYSC_L]) // L { if (totalclock < (lastsave + 120*10) || !AskIfSure("Are you sure you want to load the last saved map?")) { int32_t sposx=pos.x,sposy=pos.y,sposz=pos.z,sang=ang; char *f; if (pathsearchmode) f = levelname; else { // virtual filesystem mode can't save to directories so drop the file into // the current directory f = Bstrrchr(levelname, '/'); if (!f) f = levelname; else f++; } lastsave=totalclock; // sectorhighlightstat = -1; // newnumwalls = -1; // joinsector[0] = -1; // circlewall = -1; // circlepoints = 7; if (LoadBoard(f, 0)) message("Invalid map format."); pos.x=sposx; pos.y=sposy; pos.z=sposz; ang=sang; updatesectorz(pos.x, pos.y, pos.z, &cursectnum); keystatus[KEYSC_L] = 0; } } } if (keystatus[buildkeys[BK_MODE2D_3D]]) // Enter { getmessageleng = 0; getmessagetimeoff = 0; #if defined(DUKEOSD) m32_osdsetfunctions(); #endif } if (getmessageleng > 0) { if (qsetmode != 200) printmessage16("%s", getmessage); if (totalclock > getmessagetimeoff) getmessageleng = 0; } } #undef EDUKE32_EXEC #undef EDUKE32_LOCALEXEC void ExtCheckKeys(void) { static int32_t soundinit = 0; static int32_t lastbstatus = 0; if (!soundinit) { g_numsounds = 0; loadconsounds(gamecon); if (g_numsounds > 0) { if (S_SoundStartup() != 0) S_SoundShutdown(); } soundinit = 1; } if (qsetmode == 200 && shadepreview) { int32_t i = 0; int32_t w, isec, start_wall, end_wall; for (i=0; i= 0) { if (wallflag[wall[w].nextwall]) { NEXTWALL(w).shade = wallshades[wall[w].nextwall]; NEXTWALL(w).pal = wallpals[wall[w].nextwall]; wallflag[wall[w].nextwall] = 0; } } #endif } sector[isec].floorshade = sectorshades[isec][0]; sector[isec].ceilingshade = sectorshades[isec][1]; sector[isec].floorpal = sectorpals[isec][0]; sector[isec].ceilingpal = sectorpals[isec][1]; for (w=headspritesect[isec]; w>=0; w=nextspritesect[w]) { if (w == i) continue; sprite[w].shade = spriteshades[w]; sprite[w].pal = spritepals[w]; w = nextspritesect[w]; } } } lastbstatus = bstatus; readmousebstatus(&bstatus); Keys2d3d(); if (qsetmode == 200) //In 3D mode { Keys3d(); editinput(); if (infobox&2) m32_showmouse(); } else { Keys2d(); if (autocorruptcheck>0 && totalclock > corruptchecktimer) { if (CheckMapCorruption(3, 0)>=3) printmessage16("Corruption detected. See OSD for details."); corruptchecktimer = totalclock + 120*autocorruptcheck; } } if (asksave == 1 && (bstatus + lastbstatus) == 0 && mapstate) { // message("Saved undo rev %d",map_revision); create_map_snapshot(); asksave++; } else if (asksave == 2) asksave++; if (totalclock > autosavetimer && autosave) { if (asksave == 3) { if (CheckMapCorruption(6, 0)>=4) { SaveBoard("autosave_corrupt.map", 1); message("Board autosaved to AUTOSAVE_CORRUPT.MAP"); } else { SaveBoard("autosave.map", 0); message("Board autosaved to AUTOSAVE.MAP"); } asksave = 4; } autosavetimer = totalclock+120*autosave; } if (PRESSED_KEYSC(F12)) //F12 { screencapture("captxxxx.tga", keystatus[KEYSC_LSHIFT]|keystatus[KEYSC_RSHIFT]); message("Saved screenshot %04d", capturecount-1); } } //// port of a.m32's corruptchk //// // returns value from 0 (all OK) to 5 (panic!) #define CCHK_PANIC OSDTEXT_DARKRED "PANIC!!!^O " //#define CCHKPREF OSDTEXT_RED "^O" #define CCHK_CORRECTED OSDTEXT_GREEN " -> " #define CORRUPTCHK_PRINT(errlev, what, fmt, ...) do \ { \ bad = max(bad, errlev); \ if (numcorruptthings>=MAXCORRUPTTHINGS) \ goto too_many_errors; \ corruptthings[numcorruptthings++] = what; \ if (errlev >= printfromlev) \ OSD_Printf("#%d: " fmt "\n", numcorruptthings, ## __VA_ARGS__); \ } while (0) static int32_t walls_are_consistent(int32_t nw, int32_t j) { return (wall[j].x==POINT2(nw).x && wall[j].y==POINT2(nw).y && POINT2(j).x==wall[nw].x && POINT2(j).y==wall[nw].y); } static void suggest_nextsector_correction(int32_t nw, int32_t j) { if (nw>=0 && nw=0 && nwMAXSECTORS) CORRUPTCHK_PRINT(5, 0, CCHK_PANIC "SECTOR LIMIT EXCEEDED (MAXSECTORS=%d)!!!", MAXSECTORS); if (numwalls>MAXWALLS) CORRUPTCHK_PRINT(5, 0, CCHK_PANIC "WALL LIMIT EXCEEDED (MAXWALLS=%d)!!!", MAXWALLS); if (numsectors>MAXSECTORS || numwalls>MAXWALLS) { corruptlevel = bad; return bad; } seen_nextwalls = Bcalloc((numwalls+7)>>3,1); if (!seen_nextwalls) return 5; lastnextwallsource = Bmalloc(numwalls*sizeof(lastnextwallsource[0])); if (!lastnextwallsource) { Bfree(seen_nextwalls); return 5; } for (i=0; i numwalls) CORRUPTCHK_PRINT(4, CORRUPT_SECTOR|i, "SECTOR[%d].WALLPTR=%d out of range (numwalls=%d)", i, w0, numw); if (w0 != ewall) CORRUPTCHK_PRINT(4, CORRUPT_SECTOR|i, "SECTOR[%d].WALLPTR=%d inconsistent, expected %d", i, w0, ewall); if (numw <= 1) CORRUPTCHK_PRINT(5, CORRUPT_SECTOR|i, CCHK_PANIC "SECTOR[%d].WALLNUM=%d INVALID!!!", i, numw); else if (numw==2) CORRUPTCHK_PRINT(3, CORRUPT_SECTOR|i, "SECTOR[%d].WALLNUM=2, expected at least 3", i); ewall += numw; endwall = w0 + numw; if (endwall > numwalls) CORRUPTCHK_PRINT(4, CORRUPT_SECTOR|i, "SECTOR[%d]: wallptr+wallnum=%d out of range: numwalls=%d", i, endwall, numwalls); errlevel = max(errlevel, bad); if (bad<4) { endwall--; for (j=w0; j<=endwall; j++) { bad = 0; if (wall[j].point2 < w0 || wall[j].point2 > endwall) { if (wall[j].point2 < 0 || wall[j].point2 >= MAXWALLS) CORRUPTCHK_PRINT(5, CORRUPT_WALL|j, CCHK_PANIC "WALL[%d].POINT2=%d INVALID!!!", j, wall[j].point2); else CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].POINT2=%d out of range [%d, %d]", j, wall[j].point2, w0, endwall); } nw = wall[j].nextwall; ns = wall[j].nextsector; if (nw >= numwalls) CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].NEXTWALL=%d out of range: numwalls=%d", j, nw, numwalls); if (ns >= numsectors) CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].NEXTSECTOR=%d out of range: numsectors=%d", j, ns, numsectors); if (nw>=w0 && nw<=endwall) CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].NEXTWALL is its own sector's wall", j); if (ns == i) { if (!bad) { int32_t onumct = numcorruptthings; CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].NEXTSECTOR is its own sector", j); if (onumct < MAXCORRUPTTHINGS) { if (tryfixing & (1ull<=printfromlev) suggest_nextsector_correction(nw, j); } } } if (nw>=0 && nw>3]&(1<<(nw&7))) { int16_t nwnw, lnws; int32_t onumct = numcorruptthings; lnws = lastnextwallsource[nw]; CORRUPTCHK_PRINT(3, CORRUPT_WALL|j, "WALL[%d].NEXTWALL=%d already referenced from wall %d", j, nw, lnws); nwnw = wall[nw].nextwall; if (onumct < MAXCORRUPTTHINGS && (nwnw==j || nwnw==lnws)) { int32_t walltoclear = nwnw==j ? lnws : j; if (tryfixing & (1ull<= printfromlev) OSD_Printf(" wall[%d].nextwall=%d, suggest clearing wall %d's nextwall and nextsector tags to -1\n", nw, nwnw, walltoclear); } } else { seen_nextwalls[nw>>3] |= 1<<(nw&7); lastnextwallsource[nw] = j; } } if (bad<4) { int32_t onumct = numcorruptthings; if ((ns^nw)<0) { CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].NEXTSECTOR=%d and .NEXTWALL=%d inconsistent:" " missing one next pointer", j, ns, nw); if (onumct < MAXCORRUPTTHINGS) { if (tryfixing & (1ull<=printfromlev) suggest_nextsector_correction(nw, j); } } else if (ns>=0) { if (nw=sector[ns].wallptr+sector[ns].wallnum) { CORRUPTCHK_PRINT(4, CORRUPT_WALL|j, "WALL[%d].NEXTWALL=%d out of .NEXTSECTOR=%d's bounds", j, nw, ns); if (onumct < MAXCORRUPTTHINGS) { if (tryfixing & (1ull<= printfromlev) { OSD_Printf(" sector %d's walls: [%d .. %d]\n", ns, sector[ns].wallptr, sector[ns].wallptr+sector[ns].wallnum-1); suggest_nextsector_correction(nw, j); } } } } } errlevel = max(errlevel, bad); } } } bad = 0; for (i=0; i=numsectors) CORRUPTCHK_PRINT(2, CORRUPT_SPRITE|i, "SPRITE[%d].SECTNUM=%d. Expect problems!", i, sprite[i].sectnum); if (sprite[i].picnum<0 || sprite[i].picnum>=MAXTILES) { sprite[i].picnum = 0; CORRUPTCHK_PRINT(0, CORRUPT_SPRITE|i, "SPRITE[%d].PICNUM=%d out of range, resetting to 0", i, sprite[i].picnum); } } if (0) { too_many_errors: if (printfromlev<=errlevel) OSD_Printf("!! too many errors, stopping. !!\n"); } errlevel = max(errlevel, bad); if (errlevel) { if (printfromlev<=errlevel) OSD_Printf("-- corruption level: %d\n", errlevel); } if (seen_nextwalls) { Bfree(seen_nextwalls); Bfree(lastnextwallsource); } corruptlevel = errlevel; return errlevel; } //// void faketimerhandler(void) { sampletimer(); } void SetBOSS1Palette(void) { if (acurpalette==3) return; acurpalette=3; setbrightness(GAMMA_CALC,5,0); } void SetSLIMEPalette(void) { if (acurpalette==2) return; acurpalette=2; setbrightness(GAMMA_CALC,2,0); } void SetWATERPalette(void) { if (acurpalette==1) return; acurpalette=1; setbrightness(GAMMA_CALC,1,0); } void SetGAMEPalette(void) { if (acurpalette==0) return; acurpalette=0; setbrightness(GAMMA_CALC,6,0); } static void SearchSectors(int32_t dir) // <0: backwards, >=0: forwards { int32_t ii=0; dir = 1-2*(dir<0); if (cursector_lotag!=0) { if ((dir>0 && cursectornum=0)) cursectornum += dir; for (ii=cursectornum; ii>=0 && ii"); cursectornum = ii; return; } } } printmessage16("%s Sector search: none found", dir<0?"<":">"); } //////////////////// manual editing //////////////////// // Build edit originally by Ed Coolidge static char med_disptext[80]; static char med_edittext[80]; static const char *med_typename=""; static int32_t med_dispwidth=24; static int32_t med_editval=0; static int32_t med_thenum=-1; static void handlemed(int32_t dohex, const char *disp_membername, const char *edit_membername, void *themember, int32_t thesizeof, int32_t themax, int32_t sign) { int32_t i, val; if (thesizeof==sizeof(int8_t)) { if (sign) val = *(int8_t *)themember; else val = *(uint8_t *)themember; } else if (thesizeof==sizeof(int16_t)) val = *(int16_t *)themember; else //if (thesizeof==sizeof(int32_t)) val = *(int32_t *)themember; if (dohex) i=Bsprintf(med_disptext,"%s: %x", disp_membername, val); else i=Bsprintf(med_disptext,"%s: %d", disp_membername, val); for (; i to exit"); if (PRESSED_KEYSC(DOWN)) { if (*row < rowmax) { med_printcurline(xpos, ypos, *row, 0); (*row)++; } } if (PRESSED_KEYSC(UP)) { if (*row > 0) { med_printcurline(xpos, ypos, *row, 0); (*row)--; } } if (PRESSED_KEYSC(ENTER)) med_editval = 1; } static void EditSectorData(int16_t sectnum) { int32_t col=1, row=0, rowmax = 6, i = -1; int32_t xpos = 208, ypos = ydim-STATUS2DSIZ+48; med_editval = 0; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; med_typename = "Sector"; med_thenum = sectnum; drawgradient(); showsectordata(sectnum, 0); while (keystatus[KEYSC_ESC] == 0) { med_handlecommon(xpos, ypos, &row, rowmax); if (PRESSED_KEYSC(LEFT)) { if (col == 2) { med_printcurline(xpos, ypos, row, 0); col = 1; xpos = 208; rowmax = 6; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; if (row > rowmax) row = rowmax; } } if (PRESSED_KEYSC(RIGHT)) { if (col == 1) { med_printcurline(xpos, ypos, row, 0); col = 2; xpos = 408; rowmax = 6; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; if (row > rowmax) row = rowmax; } } if (col == 1) { switch (row) { case 0: handlemed(1, "Flags (hex)", "Ceiling Flags", §or[sectnum].ceilingstat, sizeof(sector[sectnum].ceilingstat), 65535, 0); break; case 1: for (i=Bsprintf(med_disptext,"(X,Y)pan: %d, %d",sector[sectnum].ceilingxpanning,sector[sectnum].ceilingypanning); i < med_dispwidth; i++) med_disptext[i] = ' '; if (med_editval) { Bsprintf(med_edittext,"Sector %d Ceiling X Pan: ",sectnum); printmessage16("%s", med_edittext); sector[sectnum].ceilingxpanning = (char)getnumber16(med_edittext,(int32_t)sector[sectnum].ceilingxpanning,256L,0); Bsprintf(med_edittext,"Sector %d Ceiling Y Pan: ",sectnum); printmessage16("%s", med_edittext); sector[sectnum].ceilingypanning = (char)getnumber16(med_edittext,(int32_t)sector[sectnum].ceilingypanning,256L,0); } break; case 2: handlemed(0, "Shade byte", "Ceiling Shade", §or[sectnum].ceilingshade,sizeof(sector[sectnum].ceilingshade), 128L, 1); break; case 3: handlemed(0, "Z-coordinate", "Ceiling Z-coordinate", §or[sectnum].ceilingz, sizeof(sector[sectnum].ceilingz), BZ_MAX, 1); break; case 4: handlemed(0, "Tile number", "Ceiling Tile Number", §or[sectnum].ceilingpicnum, sizeof(sector[sectnum].ceilingpicnum), MAXTILES, 0); break; case 5: handlemed(0, "Ceiling heinum", "Ceiling Heinum", §or[sectnum].ceilingheinum, sizeof(sector[sectnum].ceilingheinum), 65536L, 1); break; case 6: handlemed(0, "Palookup number", "Ceiling Palookup Number", §or[sectnum].ceilingpal, sizeof(sector[sectnum].ceilingpal), MAXPALOOKUPS-1, 0); break; } } else if (col == 2) { switch (row) { case 0: handlemed(1, "Flags (hex)", "Floor Flags", §or[sectnum].floorstat, sizeof(sector[sectnum].floorstat), 65536, 0); break; case 1: for (i=Bsprintf(med_disptext,"(X,Y)pan: %d, %d",sector[sectnum].floorxpanning,sector[sectnum].floorypanning); i < med_dispwidth; i++) med_disptext[i] = ' '; if (med_editval) { Bsprintf(med_edittext,"Sector %d Floor X Pan: ",sectnum); printmessage16("%s", med_edittext); sector[sectnum].floorxpanning = (char)getnumber16(med_edittext,(int32_t)sector[sectnum].floorxpanning,256,0); Bsprintf(med_edittext,"Sector %d Floor Y Pan: ",sectnum); printmessage16("%s", med_edittext); sector[sectnum].floorypanning = (char)getnumber16(med_edittext,(int32_t)sector[sectnum].floorypanning,256,0); } break; case 2: handlemed(0, "Shade byte", "Floor Shade", §or[sectnum].floorshade, sizeof(sector[sectnum].floorshade), 128, 1); break; case 3: handlemed(0, "Z-coordinate", "Floor Z-coordinate", §or[sectnum].floorz, sizeof(sector[sectnum].floorz), BZ_MAX, 1); //2147483647L,-2147483648L break; case 4: handlemed(0, "Tile number", "Floor Tile Number", §or[sectnum].floorpicnum, sizeof(sector[sectnum].floorpicnum), MAXTILES, 0); break; case 5: handlemed(0, "Floor heinum", "Floor Heinum", §or[sectnum].floorheinum, sizeof(sector[sectnum].floorheinum), 65536, 1); break; case 6: handlemed(0, "Palookup number", "Floor Palookup Number", §or[sectnum].floorpal, sizeof(sector[sectnum].floorpal), MAXPALOOKUPS-1, 0); break; } } med_printcurline(xpos, ypos, row, 1); if (med_editval) med_editval = 0; showframe(1); } med_printcurline(xpos, ypos, row, 0); // printmessage16(""); showframe(1); keystatus[KEYSC_ESC] = 0; } static void EditWallData(int16_t wallnum) { int32_t row=0, i = -1; int32_t xpos = 208, ypos = ydim-STATUS2DSIZ+48; med_editval = 0; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; med_typename = "Wall"; med_thenum = wallnum; drawgradient(); showwalldata(wallnum, 0); while (keystatus[KEYSC_ESC] == 0) { med_handlecommon(xpos, ypos, &row, 6); switch (row) { case 0: handlemed(1, "Flags (hex)", "Flags", &wall[wallnum].cstat, sizeof(wall[wallnum].cstat), 65536L, 0); break; case 1: handlemed(0, "Shade", "Shade", &wall[wallnum].shade, sizeof(wall[wallnum].shade), 128, 1); break; case 2: handlemed(0, "Pal", "Pal", &wall[wallnum].pal, sizeof(wall[wallnum].pal), MAXPALOOKUPS-1, 0); break; case 3: for (i=Bsprintf(med_disptext,"(X,Y)repeat: %d, %d",wall[wallnum].xrepeat,wall[wallnum].yrepeat); i < med_dispwidth; i++) med_disptext[i] = ' '; if (med_editval) { Bsprintf(med_edittext,"Wall %d X Repeat: ",wallnum); printmessage16("%s", med_edittext); wall[wallnum].xrepeat = (char)getnumber16(med_edittext,(int32_t)wall[wallnum].xrepeat,255,0); Bsprintf(med_edittext,"Wall %d Y Repeat: ",wallnum); printmessage16("%s", med_edittext); wall[wallnum].yrepeat = (char)getnumber16(med_edittext,(int32_t)wall[wallnum].yrepeat,255,0); } break; case 4: for (i=Bsprintf(med_disptext,"(X,Y)pan: %d, %d",wall[wallnum].xpanning,wall[wallnum].ypanning); i < med_dispwidth; i++) med_disptext[i] = ' '; if (med_editval) { Bsprintf(med_edittext,"Wall %d X Pan: ",wallnum); printmessage16("%s", med_edittext); wall[wallnum].xpanning = (char)getnumber16(med_edittext,(int32_t)wall[wallnum].xpanning,255,0); Bsprintf(med_edittext,"Wall %d Y Pan: ",wallnum); printmessage16("%s", med_edittext); wall[wallnum].ypanning = (char)getnumber16(med_edittext,(int32_t)wall[wallnum].ypanning,255,0); } break; case 5: handlemed(0, "Tile number", "Tile number", &wall[wallnum].picnum, sizeof(wall[wallnum].picnum), MAXTILES, 0); break; case 6: handlemed(0, "OverTile number", "OverTile number", &wall[wallnum].overpicnum, sizeof(wall[wallnum].overpicnum), MAXTILES, 0); break; } med_printcurline(xpos, ypos, row, 1); if (med_editval) { med_editval = 0; //showwalldata(wallnum, 0); //// printmessage16(""); } showframe(1); } med_printcurline(xpos, ypos, row, 0); // printmessage16(""); showframe(1); keystatus[KEYSC_ESC] = 0; } static void EditSpriteData(int16_t spritenum) { int32_t col=0, row=0, rowmax=4, i = -1; int32_t xpos = 8, ypos = ydim-STATUS2DSIZ+48; med_editval = 0; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; med_typename = "Sprite"; med_thenum = spritenum; drawgradient(); // clearmidstatbar16(); showspritedata(spritenum, 0); while (keystatus[KEYSC_ESC] == 0) { med_handlecommon(xpos, ypos, &row, rowmax); if (PRESSED_KEYSC(LEFT)) { switch (col) { case 1: { med_printcurline(xpos, ypos, row, 0); col = 0; xpos = 8; rowmax = 4; med_dispwidth = 23; med_disptext[med_dispwidth] = 0; if (row > rowmax) row = rowmax; } break; case 2: { med_printcurline(xpos, ypos, row, 0); col = 1; xpos = 208; rowmax = 5; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; if (row > rowmax) row = rowmax; } break; } } if (PRESSED_KEYSC(RIGHT)) { switch (col) { case 0: { med_printcurline(xpos, ypos, row, 0); col = 1; xpos = 208; rowmax = 5; med_dispwidth = 24; med_disptext[med_dispwidth] = 0; if (row > rowmax) row = rowmax; } break; case 1: { med_printcurline(xpos, ypos, row, 0); col = 2; xpos = 408; rowmax = 6; med_dispwidth = 26; med_disptext[med_dispwidth] = 0; if (row > rowmax) row = rowmax; } break; } } switch (col) { case 0: { switch (row) { case 0: handlemed(0, "X-coordinate", "X-coordinate", &sprite[spritenum].x, sizeof(sprite[spritenum].x), 131072, 1); break; case 1: handlemed(0, "Y-coordinate", "Y-coordinate", &sprite[spritenum].y, sizeof(sprite[spritenum].y), 131072, 1); break; case 2: handlemed(0, "Z-coordinate", "Z-coordinate", &sprite[spritenum].z, sizeof(sprite[spritenum].z), BZ_MAX, 1); //2147483647L,-2147483648L break; case 3: i = sprite[spritenum].sectnum; handlemed(0, "Sectnum", "Sectnum", &sprite[spritenum].sectnum, sizeof(sprite[spritenum].sectnum), numsectors-1, 0); if (i != sprite[spritenum].sectnum) { swapshort(&i, &sprite[spritenum].sectnum); changespritesect(spritenum,i); } break; case 4: i = sprite[spritenum].statnum; handlemed(0, "Statnum", "Statnum", &sprite[spritenum].statnum, sizeof(sprite[spritenum].statnum), MAXSTATUS-1, 0); if (i != sprite[spritenum].statnum) { swapshort(&i, &sprite[spritenum].statnum); changespritestat(spritenum,i); } break; } } break; case 1: { switch (row) { case 0: handlemed(1, "Flags (hex)", "Flags", &sprite[spritenum].cstat, sizeof(sprite[spritenum].cstat), 65535, 0); break; case 1: handlemed(0, "Shade", "Shade", &sprite[spritenum].shade, sizeof(sprite[spritenum].shade), 128, 1); break; case 2: handlemed(0, "Pal", "Pal", &sprite[spritenum].pal, sizeof(sprite[spritenum].pal), MAXPALOOKUPS-1, 0); break; case 3: { for (i=Bsprintf(med_disptext,"(X,Y)repeat: %d, %d",sprite[spritenum].xrepeat,sprite[spritenum].yrepeat); i < med_dispwidth; i++) med_disptext[i] = ' '; if (med_editval) { Bsprintf(med_edittext,"Sprite %d X Repeat: ",spritenum); printmessage16("%s", med_edittext); sprite[spritenum].xrepeat = (char)getnumber16(med_edittext,(int32_t)sprite[spritenum].xrepeat,255,0); Bsprintf(med_edittext,"Sprite %d Y Repeat: ",spritenum); printmessage16("%s", med_edittext); sprite[spritenum].yrepeat = (char)getnumber16(med_edittext,(int32_t)sprite[spritenum].yrepeat,255,0); } } break; case 4: { for (i=Bsprintf(med_disptext,"(X,Y)offset: %d, %d",sprite[spritenum].xoffset,sprite[spritenum].yoffset); i < med_dispwidth; i++) med_disptext[i] = ' '; if (med_editval) { Bsprintf(med_edittext,"Sprite %d X Offset: ",spritenum); printmessage16("%s", med_edittext); sprite[spritenum].xoffset = (char)getnumber16(med_edittext,(int32_t)sprite[spritenum].xoffset,128,1); Bsprintf(med_edittext,"Sprite %d Y Offset: ",spritenum); printmessage16("%s", med_edittext); sprite[spritenum].yoffset = (char)getnumber16(med_edittext,(int32_t)sprite[spritenum].yoffset,128,1); } } break; case 5: handlemed(0, "Tile number", "Tile number", &sprite[spritenum].picnum, sizeof(sprite[spritenum].picnum), MAXTILES-1, 0); break; } } break; case 2: { switch (row) { case 0: handlemed(0, "Angle (2048 degrees)", "Angle", &sprite[spritenum].ang, sizeof(sprite[spritenum].ang), 2048, 1); if (med_editval) sprite[spritenum].ang &= 2047; break; case 1: handlemed(0, "X-Velocity", "X-Velocity", &sprite[spritenum].xvel, sizeof(sprite[spritenum].xvel), 65536, 1); break; case 2: handlemed(0, "Y-Velocity", "Y-Velocity", &sprite[spritenum].yvel, sizeof(sprite[spritenum].yvel), 65536, 1); break; case 3: handlemed(0, "Z-Velocity", "Z-Velocity", &sprite[spritenum].zvel, sizeof(sprite[spritenum].zvel), 65536, 1); break; case 4: handlemed(0, "Owner", "Owner", &sprite[spritenum].owner, sizeof(sprite[spritenum].owner), MAXSPRITES-1, 1); break; case 5: handlemed(0, "Clipdist", "Clipdist", &sprite[spritenum].clipdist, sizeof(sprite[spritenum].clipdist), 255, 0); break; case 6: handlemed(0, "Extra", "Extra", &sprite[spritenum].extra, sizeof(sprite[spritenum].extra), BTAG_MAX, 1); break; } } break; } med_printcurline(xpos, ypos, row, 1); if (med_editval) med_editval = 0; showframe(1); } med_printcurline(xpos, ypos, row, 0); // printmessage16(""); showframe(1); keystatus[KEYSC_ESC] = 0; } #define TWENTYFIVE_BLANKS " " static void GenericSpriteSearch() { char disptext[80]; char edittext[80]; static int32_t col=0, row=0; int32_t i, j, k; int32_t rowmax[3]= {6,5,6}, dispwidth[3] = {24,24,28}; int32_t xpos[3] = {8,200,400}, ypos = ydim-STATUS2DSIZ+48; static const char *labels[7][3] = { {"X-coordinate", "Flags (hex)", "Angle (2048 degrees)"}, {"Y-coordinate", "Shade", "X-Velocity"}, {"Z-coordinate", "Pal", "Y-Velocity"}, {"Sectnum", "(X/Y)repeat", "Z-Velocity"}, {"Statnum", "(X/Y)offset", "Owner"}, {"Hitag", "Tile number", "Clipdist"}, {"Lotag", "", "Extra"} }; static int32_t maxval[7][3] = { { BXY_MAX , 65536 , 2048 }, { BXY_MAX , 128 , 65536 }, { BZ_MAX , MAXPALOOKUPS-1, 65536 }, { MAXSECTORS-1, 128 , 65536 }, { MAXSTATUS-1 , 128 , MAXSPRITES-1 }, { BTAG_MAX , MAXTILES-1 , 256 }, { BTAG_MAX , 0 , BTAG_MAX } }; static char sign[7][3] = { {1, 0, 1}, {1, 1, 1}, {1, 0, 1}, {0, 0, 1}, {0, 1, 0}, {0, 0, 0}, {0, 0, 1} }; clearmidstatbar16(); drawgradient(); printext16(xpos[0], ypos-2*8, editorcolors[10], editorcolors[0], "Sprite search", 0); for (i=0; i<3; i++) for (j=0; j<=rowmax[i]; j++) { if (gs_spriteTagInterested[i][j]) k=Bsprintf(disptext, "%s: %d", labels[j][i], gs_spriteTagValue[i][j]); else k=Bsprintf(disptext, "%s: ^7any", labels[j][i]); // for (; k to exit"); if (PRESSED_KEYSC(DOWN)) { if (row < rowmax[col]) { printext16(xpos[col],ypos+row*8,editorcolors[11],editorcolors[0],disptext,0); row++; } } if (PRESSED_KEYSC(UP)) { if (row > 0) { printext16(xpos[col],ypos+row*8,editorcolors[11],editorcolors[0],disptext,0); row--; } } if (PRESSED_KEYSC(LEFT)) { if (col > 0) { printext16(xpos[col],ypos+row*8,editorcolors[11],editorcolors[0],disptext,0); col--; disptext[dispwidth[col]] = 0; if (row > rowmax[col]) row = rowmax[col]; } } if (PRESSED_KEYSC(RIGHT)) { if (col < 2) { printext16(xpos[col],ypos+row*8,editorcolors[11],editorcolors[0],disptext,0); col++; disptext[dispwidth[col]] = 0; if (row > rowmax[col]) row = rowmax[col]; } } if (PRESSED_KEYSC(ENTER)) { Bsprintf(edittext, "%s: ", labels[row][col]); printmessage16("%s", edittext); i = getnumber16(edittext, gs_spriteTagInterested[col][row] ? gs_spriteTagValue[col][row] : 0, maxval[row][col], sign[row][col]); if (col == 2 && row == 0) i = (i+2048)&2047; // angle gs_spriteTagValue[col][row] = i; gs_spriteTagInterested[col][row] = 1; if (col == 1 && row == 5) // picnum { printext16(xpos[1], ypos-2*8, editorcolors[14], editorcolors[0], TWENTYFIVE_BLANKS, 0); if (names[i][0]) printext16(xpos[1], ypos-2*8, editorcolors[14], editorcolors[0], names[i], 0); } } if (PRESSED_KEYSC(BS) || PRESSED_KEYSC(DELETE)) { gs_spriteTagInterested[col][row] = 0; if (col == 1 && row == 5) // picnum printext16(xpos[1], ypos-2*8, editorcolors[14], editorcolors[0], TWENTYFIVE_BLANKS, 0); } i = gs_spriteTagInterested[col][row]; if (i) { if (col == 1 && row == 0) // flags k = Bsprintf(disptext, "%s: %x", labels[row][col], gs_spriteTagValue[col][row]); else k = Bsprintf(disptext, "%s: %d", labels[row][col], gs_spriteTagValue[col][row]); } else k = Bsprintf(disptext, "%s: ^7any", labels[row][col]); // v-------^^ for (; k x2_max) x2_max = x2; y += MENU_Y_SPACING; } while (++i < numopts); // drawline16(x-1,y,x2_max+1,y,1); // drawline16(x-1,MENU_BASE_Y-4,x-1,y,1); // x2 = printext16(x,MENU_BASE_Y,editorcolors[11],-1,"Special functions",0); // drawline16(x-1,MENU_BASE_Y-4,x2+1,MENU_BASE_Y-4,1); // drawline16(x2_max+1,MENU_BASE_Y+16-4,x2_max+1,y-1,1); //drawline16(x2+1,MENU_BASE_Y+16-1,x2_max+1,MENU_BASE_Y+16-1,1); } static void FuncMenu(void) { char disptext[80]; int32_t col=0, row=0, rowmax=7, dispwidth = 24, editval = 0, i = -1, j; int32_t xpos = 8, ypos = MENU_BASE_Y+16; drawgradient(); disptext[dispwidth] = 0; // clearmidstatbar16(); FuncMenuOpts(); while (!editval && keystatus[KEYSC_ESC] == 0) { idle_waitevent(); if (handleevents()) quitevent = 0; _printmessage16("Select an option, press to exit"); if (PRESSED_KEYSC(DOWN)) { if (row < rowmax) { printext16(xpos,ypos+row*MENU_Y_SPACING,editorcolors[11],editorcolors[0],disptext,0); row++; } } if (PRESSED_KEYSC(UP)) { if (row > 0) { printext16(xpos,ypos+row*MENU_Y_SPACING,editorcolors[11],editorcolors[0],disptext,0); row--; } } #if 0 if (PRESSED_KEYSC(LEFT)) { /* if (col == 2) { printext16(xpos,ypos+row*8,editorcolors[11],0,disptext,0); col = 1; xpos = 200; rowmax = 6; dispwidth = 24; disptext[dispwidth] = 0; if (row > rowmax) row = rowmax; } else */ if (col == 1) { printext16(xpos,ypos+row*8,editorcolors[11],0,disptext,0); col = 0; xpos = 8; rowmax = 7; dispwidth = 24; disptext[dispwidth] = 0; if (row > rowmax) row = rowmax; } } if (PRESSED_KEYSC(RIGHT)) { if (col == 0) { printext16(xpos,ypos+row*8,editorcolors[11],0,disptext,0); col = 1; xpos = 200; rowmax = 0; dispwidth = 24; disptext[dispwidth] = 0; if (row > rowmax) row = rowmax; } /* else if (col == 1) { printext16(xpos,ypos+row*8,editorcolors[11],0,disptext,0); col = 2; xpos = 400; rowmax = 6; dispwidth = 26; disptext[dispwidth] = 0; if (row > rowmax) row = rowmax; } */ } #endif if (PRESSED_KEYSC(ENTER)) editval = 1; switch (col) { case 0: switch (row) { case 0: { for (i=Bsprintf(disptext,"%s",FuncMenuStrings[row]); i < dispwidth; i++) disptext[i] = ' '; if (editval) { j = 0; for (i=0; i= 0) { int32_t k = 0; for (j=0; j= 0) { sprite[w].x = (int32_t)(sprite[w].x*size); sprite[w].y = (int32_t)(sprite[w].y*size); sprite[w].z = (int32_t)(sprite[w].z*size); sprite[w].xrepeat = min(max((int32_t)(sprite[w].xrepeat*size),1),255); sprite[w].yrepeat = min(max((int32_t)(sprite[w].yrepeat*size),1),255); w = nextspritesect[w]; } } printmessage16("Map scaled"); } else printmessage16("Aborted"); } } break; case 6: { for (i=Bsprintf(disptext,"%s",FuncMenuStrings[row]); i < dispwidth; i++) disptext[i] = ' '; if (editval) { j=getnumber16("Shade divisor: ",1,128,1); if (j!=1) { for (i=0; i>4)/j; } printmessage16("Visibility adjusted"); } else printmessage16("Aborted"); } } break; } break; } printext16(xpos,ypos+row*MENU_Y_SPACING,editorcolors[11],editorcolors[1],disptext,0); showframe(1); } printext16(xpos,ypos+row*MENU_Y_SPACING,editorcolors[11],editorcolors[0],disptext,0); /*clearmidstatbar16();*/ showframe(1); keystatus[KEYSC_ESC] = 0; }