Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- else
- {
- j = sec->wallptr;
- ox = wall[wall[j].point2].x - wall[j].x;
- oy = wall[wall[j].point2].y - wall[j].y;
- i = nsqrtasm(ox*ox+oy*oy); if (i == 0) i = 1024; else i = 1048576/i;
- globalx1 = mulscale10(dmulscale10(ox,singlobalang,-oy,cosglobalang),i);
- globaly1 = mulscale10(dmulscale10(ox,cosglobalang,oy,singlobalang),i);
- globalx2 = -globalx1;
- globaly2 = -globaly1;
- ox = ((wall[j].x-globalposx)<<6); oy = ((wall[j].y-globalposy)<<6);
- i = dmulscale14(oy,cosglobalang,-ox,singlobalang);
- j = dmulscale14(ox,cosglobalang,oy,singlobalang);
- ox = i; oy = j;
- globalxpanning = globalx1*ox - globaly1*oy;
- globalypanning = globaly2*ox + globalx2*oy;
- }
- globalx2 = mulscale16(globalx2,viewingrangerecip);
- globaly1 = mulscale16(globaly1,viewingrangerecip);
- globalxshift = (8-(picsiz[globalpicnum]&15));
- globalyshift = (8-(picsiz[globalpicnum]>>4));
- if (globalorientation&8) { globalxshift++; globalyshift++; }
- if ((globalorientation&0x4) > 0)
- {
- i = globalxpanning; globalxpanning = globalypanning; globalypanning = i;
- i = globalx2; globalx2 = -globaly1; globaly1 = -i;
- i = globalx1; globalx1 = globaly2; globaly2 = i;
- }
- if ((globalorientation&0x10) > 0) globalx1 = -globalx1, globaly1 = -globaly1, globalxpanning = -globalxpanning;
- if ((globalorientation&0x20) > 0) globalx2 = -globalx2, globaly2 = -globaly2, globalypanning = -globalypanning;
- globalx1 <<= globalxshift; globaly1 <<= globalxshift;
- globalx2 <<= globalyshift; globaly2 <<= globalyshift;
- globalxpanning <<= globalxshift; globalypanning <<= globalyshift;
- globalxpanning += (((long)sec->ceilingxpanning)<<24);
- globalypanning += (((long)sec->ceilingypanning)<<24);
- globaly1 = (-globalx1-globaly1)*halfxdimen;
- globalx2 = (globalx2-globaly2)*halfxdimen;
- sethlinesizes(picsiz[globalpicnum]&15,picsiz[globalpicnum]>>4,globalbufplc);
- globalx2 += globaly2*(x1-1);
- globaly1 += globalx1*(x1-1);
- globalx1 = mulscale16(globalx1,globalzd);
- globalx2 = mulscale16(globalx2,globalzd);
- globaly1 = mulscale16(globaly1,globalzd);
- globaly2 = mulscale16(globaly2,globalzd);
- globvis = klabs(mulscale10(globvis,globalzd));
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement