Rev 2490 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
31 | halyavin | 1 | |
2492 | leency | 2 | ; ßÛß ÛÜÛ ÛÛÛ ÛÛÜ loveC: thanks, Serzh: eat my socks dude ;] |
3 | ; ( ) ( ) ( ) ( ) e-mail: baze@stonline.sk, web: www.3SC.sk |
||
4 | |||
31 | halyavin | 5 | |
6 | |||
7 | |||
316 | heavyiron | 8 | |
9 | |||
31 | halyavin | 10 | org 0x0 |
11 | |||
12 | |||
13 | dd 0x01 |
||
14 | dd START |
||
15 | dd I_END |
||
16 | dd 0x40000 |
||
17 | dd 0x40000 |
||
316 | heavyiron | 18 | dd 0,0 |
31 | halyavin | 19 | |
20 | |||
485 | heavyiron | 21 | |
31 | halyavin | 22 | |
23 | |||
24 | |||
25 | |||
26 | |||
27 | |||
28 | |||
29 | |||
30 | |||
31 | |||
32 | |||
33 | |||
34 | |||
35 | |||
36 | |||
37 | |||
38 | |||
39 | mov ebx,1 |
||
40 | mcall |
||
485 | heavyiron | 41 | |
31 | halyavin | 42 | |
43 | jne no_red |
||
44 | call draw_window |
||
45 | jmp still |
||
46 | no_red: |
||
47 | |||
48 | |||
49 | je still |
||
50 | |||
51 | |||
316 | heavyiron | 52 | mcall |
485 | heavyiron | 53 | |
31 | halyavin | 54 | |
55 | PIXBUF equ 200h |
||
56 | EYE equ EYE_P-2 |
||
57 | |||
58 | |||
59 | |||
60 | |||
61 | |||
62 | mov edi,PIXBUF |
||
63 | fadd dword [di-PIXBUF+TEXUV-4] |
||
64 | push di |
||
65 | mov dx,-80 |
||
66 | |||
67 | |||
68 | |||
69 | |||
70 | |||
71 | |||
72 | |||
73 | |||
74 | fild word [si-TEXUV+EYE] |
||
75 | mov [si],bp |
||
76 | fild word [si] |
||
77 | mov [si],dx |
||
78 | fild word [si] |
||
79 | mov cl,2 |
||
80 | |||
81 | |||
82 | |||
83 | |||
84 | fsincos |
||
85 | fld st2 |
||
86 | fmul st0,st1 |
||
87 | fld st4 |
||
88 | fmul st0,st3 |
||
89 | db 0xde,0xe9 ; fsubp st1,st0 |
||
90 | db 0xd9,0xcb ; fxch st3 |
||
91 | fmulp st2,st0 |
||
92 | fmulp st3,st0 |
||
93 | faddp st2,st0 |
||
94 | db 0xd9,0xca ; fxch st2 |
||
95 | |||
96 | |||
97 | |||
98 | |||
99 | db 0xdc,0xc8 ; fmul st0,st |
||
100 | fld st1 |
||
101 | db 0xdc,0xc8 ; fmul st0,st |
||
102 | faddp st1,st0 |
||
103 | fsqrt |
||
104 | db 0xde,0xfb ; fdivp st3,st0 |
||
105 | fpatan |
||
106 | fimul word [si-4] |
||
107 | fistp word [si] |
||
108 | fimul word [si-4] |
||
109 | fistp word [si+1] |
||
110 | mov si,[si] |
||
111 | |||
112 | |||
113 | add al,ah |
||
114 | and al,64 |
||
115 | mov al,-5 |
||
116 | jz STORE_1 |
||
117 | |||
118 | |||
119 | lea ax,[bx+si] |
||
120 | sub al,ah |
||
121 | mov al,-16 |
||
122 | jns STORE_1 |
||
123 | |||
124 | |||
125 | mov al,-48 |
||
126 | |||
127 | |||
128 | |||
129 | |||
130 | add [di],al |
||
131 | inc di |
||
132 | |||
133 | |||
134 | cmp bp,160 |
||
135 | |||
136 | |||
137 | |||
138 | |||
139 | inc dx |
||
140 | cmp dx,80 |
||
141 | jnz TUBEY |
||
142 | |||
143 | |||
144 | |||
145 | |||
146 | mov ch,SCREEN*320/256 |
||
147 | |||
148 | |||
149 | |||
150 | |||
151 | sar byte [si],2 |
||
152 | loop BLUR |
||
153 | |||
154 | |||
155 | |||
156 | |||
157 | |||
158 | |||
159 | |||
160 | |||
161 | |||
162 | |||
163 | mov edi,0x10000 |
||
164 | newp: |
||
165 | movzx edx,byte [esi] |
||
166 | shl edx,4 |
||
167 | ; mov dh,dl |
||
168 | mov [edi],edx |
||
169 | |||
170 | |||
171 | inc esi |
||
172 | |||
173 | |||
174 | jbe newp |
||
175 | |||
176 | |||
177 | mov ecx,320*65536+160 |
||
178 | xor edx,edx |
||
316 | heavyiron | 179 | mov ebx,0x10000 |
31 | halyavin | 180 | mcall |
485 | heavyiron | 181 | |
31 | halyavin | 182 | |
183 | ret |
||
184 | |||
185 | |||
186 | |||
187 | |||
188 | |||
189 | |||
190 | |||
191 | |||
2492 | leency | 192 | mcall 48, 4 ;get skin width |
193 | lea ecx,[100*65536+164+eax] |
||
194 | xor eax,eax |
||
316 | heavyiron | 195 | mov ebx,100*65536+329 |
196 | mov edx,0x74000000 |
||
2490 | mario79 | 197 | mov edi,title |
485 | heavyiron | 198 | mcall |
199 | mcall 12, 2 |
||
2492 | leency | 200 | popa |
31 | halyavin | 201 | ret |
202 | |||
203 | |||
485 | heavyiron | 204 | |
31 | halyavin | 205 | |
206 | |||
207 | |||
208 | |||
209 | |||
210 | |||
211 | |||
212 | |||
213 | |||
214 | |||
215 | |||
216 | mov ax,cx |
||
217 | inc dx |
||
218 | sar al,1 |
||
219 | js PAL2 |
||
220 | mul al |
||
221 | shr ax,6 |
||
222 | |||
223 | |||
224 | |||
225 | |||
226 | jns PAL3 |
||
227 | sub al,cl |
||
228 | shr al,1 |
||
229 | shr al,1 |
||
230 | |||
231 | |||
232 | |||
233 | |||
234 | mov [ebx+0x1000],bh |
||
235 | loop PAL1 |
||
236 | mov ecx,256 |
||
237 | |||
238 | |||
239 | |||
240 | |||
241 | add ax,cx |
||
242 | rol ax,cl |
||
243 | mov dh,al |
||
244 | sar dh,5 |
||
245 | adc dl,dh |
||
246 | adc dl,[ebx+255+0x1000] |
||
247 | shr dl,1 |
||
248 | mov [ebx+0x1000],dl |
||
249 | not bh |
||
250 | mov [ebx+0x1000],dl |
||
251 | loop TEX |
||
252 | |||
253 | |||
254 | fldz |
||
255 | |||
256 | |||
257 | |||
258 | |||
259 | |||
260 |