Rev 7863 | Rev 8305 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7863 | Rev 7910 | ||
---|---|---|---|
Line 207... | Line 207... | ||
207 | } |
207 | } |
Line 208... | Line 208... | ||
208 | 208 | ||
209 | :void PutShadow(dword x,y,w,h,skinned,strength) |
209 | :void PutShadow(dword x,y,w,h,skinned,strength) |
210 | { |
210 | { |
211 | proc_info wForm; |
- | |
212 | dword shadow_buf, skin_height; |
211 | proc_info wForm; |
213 | shadow_buf = mem_Alloc(w*h*3); |
212 | dword shadow_buf = mem_Alloc(w*h*3); |
214 | GetProcessInfo(#wForm, SelfInfo); |
213 | GetProcessInfo(#wForm, SelfInfo); |
215 | CopyScreen(shadow_buf, 5*skinned+x+wForm.left, GetSkinHeight()*skinned+y+wForm.top, w, h); |
214 | CopyScreen(shadow_buf, 5*skinned+x+wForm.left, GetSkinHeight()*skinned+y+wForm.top, w, h); |
216 | ShadowImage(shadow_buf, w, h, strength); |
215 | ShadowImage(shadow_buf, w, h, strength); |
217 | _PutImage(x,y,w,h,shadow_buf); |
216 | _PutImage(x,y,w,h,shadow_buf); |