Rev 7863 | Rev 7998 | 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); |