forked from KolibriOS/kolibrios
3dwav src added
git-svn-id: svn://kolibrios.org@2269 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency)
parent
822829ea70
commit
b8d187f6cd
256
programs/demos/3dwav/trunk/3dwav.asm
Normal file
256
programs/demos/3dwav/trunk/3dwav.asm
Normal file
@ -0,0 +1,256 @@
|
|||||||
|
;
|
||||||
|
; application : WAVED 3D FORM SIN(SQRT(x*x+y*y))
|
||||||
|
; author : macgub
|
||||||
|
; email : macgub3@wp.pl
|
||||||
|
; system : MenuetOS
|
||||||
|
; compiler : fasm
|
||||||
|
;
|
||||||
|
;
|
||||||
|
TIMEOUT EQU 2
|
||||||
|
use32
|
||||||
|
|
||||||
|
org 0x0
|
||||||
|
|
||||||
|
db 'MENUET01' ; 8 byte id
|
||||||
|
dd 0x01 ; header version
|
||||||
|
dd START ; start of code
|
||||||
|
dd I_END ; size of image
|
||||||
|
dd 0x100000 ; memory for app
|
||||||
|
dd 0x7fff0 ; esp
|
||||||
|
dd 0x0 , 0x0 ; I_Param , I_Icon
|
||||||
|
|
||||||
|
START: ; start of execution
|
||||||
|
|
||||||
|
call draw_window
|
||||||
|
|
||||||
|
still:
|
||||||
|
|
||||||
|
mov eax,23 ; wait here for event
|
||||||
|
mov ebx,TIMEOUT
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
cmp eax,1 ; redraw request ?
|
||||||
|
je red
|
||||||
|
cmp eax,2 ; key in buffer ?
|
||||||
|
je key
|
||||||
|
cmp eax,3 ; button in buffer ?
|
||||||
|
je button
|
||||||
|
|
||||||
|
jmp noclose
|
||||||
|
|
||||||
|
red: ; redraw
|
||||||
|
call draw_window
|
||||||
|
jmp still
|
||||||
|
|
||||||
|
key: ; key
|
||||||
|
mov eax,2 ; just read it and ignore
|
||||||
|
int 0x40
|
||||||
|
jmp still
|
||||||
|
|
||||||
|
button: ; button
|
||||||
|
mov eax,17 ; get id
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
cmp ah,1 ; button id=1 ?
|
||||||
|
jne noclose
|
||||||
|
|
||||||
|
mov eax,-1 ; close this program
|
||||||
|
int 0x40
|
||||||
|
noclose:
|
||||||
|
|
||||||
|
call calc_deg
|
||||||
|
|
||||||
|
; mov eax,13 ;clear screen
|
||||||
|
; mov ebx,5*65536 + 517
|
||||||
|
; mov ecx,20*65536 + 345
|
||||||
|
; xor edx,edx
|
||||||
|
; int 0x40
|
||||||
|
|
||||||
|
mov edi,the_mem ;clear buffer
|
||||||
|
mov ecx,512*384*3/4
|
||||||
|
xor eax,eax
|
||||||
|
cld
|
||||||
|
rep stosd
|
||||||
|
|
||||||
|
mov eax,1 ;main loop
|
||||||
|
oop:
|
||||||
|
mov ebx,1
|
||||||
|
oop1:
|
||||||
|
push eax
|
||||||
|
push ebx
|
||||||
|
mov [x],eax
|
||||||
|
mov [z],ebx
|
||||||
|
call fun
|
||||||
|
add [y],260
|
||||||
|
add [x],40
|
||||||
|
call rotateY
|
||||||
|
call put3dpixel
|
||||||
|
pop ebx
|
||||||
|
pop eax
|
||||||
|
add ebx,4
|
||||||
|
cmp ebx,201
|
||||||
|
jne oop1
|
||||||
|
inc eax
|
||||||
|
cmp eax,300
|
||||||
|
jne oop
|
||||||
|
|
||||||
|
mov eax,7 ;put image
|
||||||
|
mov ebx,the_mem
|
||||||
|
mov ecx,512*65536+384
|
||||||
|
mov edx,0
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
jmp still
|
||||||
|
;-------------------PROCEDURES-------------------------------
|
||||||
|
calc_deg:
|
||||||
|
cmp [deg_counter], 360
|
||||||
|
jne go_deg
|
||||||
|
mov [deg_counter],0
|
||||||
|
go_deg:
|
||||||
|
fldpi
|
||||||
|
fidiv [deg_div]
|
||||||
|
fimul [deg_counter]
|
||||||
|
fst [current_deg]
|
||||||
|
fsincos
|
||||||
|
fstp [cosbeta]
|
||||||
|
fstp [sinbeta]
|
||||||
|
inc [deg_counter]
|
||||||
|
ret
|
||||||
|
;-----------------
|
||||||
|
rotateY:
|
||||||
|
mov eax,[z]
|
||||||
|
sub eax,[zo]
|
||||||
|
mov [subz],eax
|
||||||
|
mov eax,[x]
|
||||||
|
sub eax,[xo]
|
||||||
|
mov [subx],eax
|
||||||
|
|
||||||
|
fld [sinbeta]
|
||||||
|
fimul [subz]
|
||||||
|
fchs
|
||||||
|
fld [cosbeta]
|
||||||
|
fimul[subx]
|
||||||
|
faddp
|
||||||
|
fiadd [xo]
|
||||||
|
fistp [x]
|
||||||
|
|
||||||
|
fld [sinbeta]
|
||||||
|
fimul [subx]
|
||||||
|
fld [cosbeta]
|
||||||
|
fimul [subz]
|
||||||
|
faddp
|
||||||
|
fiadd [zo]
|
||||||
|
fistp [z]
|
||||||
|
ret
|
||||||
|
;-----------------------------
|
||||||
|
fun:
|
||||||
|
finit
|
||||||
|
fild [x]
|
||||||
|
fisub [i150]
|
||||||
|
fidiv [xdiv]
|
||||||
|
fmul st,st0
|
||||||
|
fld st0
|
||||||
|
fild [z]
|
||||||
|
fisub [i100]
|
||||||
|
fidiv [zdiv]
|
||||||
|
fmul st,st0
|
||||||
|
faddp
|
||||||
|
fsqrt
|
||||||
|
|
||||||
|
fld [current_deg]
|
||||||
|
fimul [cur_deg_mul]
|
||||||
|
faddp
|
||||||
|
fsin
|
||||||
|
fimul [ymul]
|
||||||
|
fistp [y]
|
||||||
|
ret
|
||||||
|
;--------------------------
|
||||||
|
put3dpixel:
|
||||||
|
fild [z]
|
||||||
|
fmul [sq]
|
||||||
|
fchs
|
||||||
|
fiadd [y]
|
||||||
|
fistp [y]
|
||||||
|
fild [z]
|
||||||
|
fmul [sq]
|
||||||
|
fiadd [x]
|
||||||
|
fistp [x]
|
||||||
|
;mov eax,1
|
||||||
|
;mov ebx,[x]
|
||||||
|
;mov ecx,[y]
|
||||||
|
;mov edx,[col]
|
||||||
|
;int 0x40
|
||||||
|
mov eax,[y] ; calculating pixel position in buffer
|
||||||
|
dec eax
|
||||||
|
shl eax,9
|
||||||
|
add eax,[x]
|
||||||
|
mov ebx,eax
|
||||||
|
shl eax,1
|
||||||
|
add eax,ebx
|
||||||
|
add eax,the_mem
|
||||||
|
mov ebx,[col]
|
||||||
|
or [eax],ebx
|
||||||
|
ret
|
||||||
|
|
||||||
|
; *********************************************
|
||||||
|
; ******* WINDOW DEFINITIONS AND DRAW ********
|
||||||
|
; *********************************************
|
||||||
|
|
||||||
|
|
||||||
|
draw_window:
|
||||||
|
|
||||||
|
|
||||||
|
mov eax,12 ; function 12:tell os about windowdraw
|
||||||
|
mov ebx,1 ; 1, start of draw
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
mov eax,48
|
||||||
|
mov ebx,4
|
||||||
|
int 0x40
|
||||||
|
mov esi, eax
|
||||||
|
; DRAW WINDOW
|
||||||
|
mov eax,0 ; function 0 : define and draw window
|
||||||
|
mov ebx,100*65536+512+9 ; [x start] *65536 + [x size]
|
||||||
|
mov ecx,100*65536+384+4 ; [y start] *65536 + [y size]
|
||||||
|
add ecx, esi
|
||||||
|
mov edx,0x74000000 ; color of work area RRGGBB,8->color gl
|
||||||
|
mov edi,labelt
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
mov eax,12 ; function 12:tell os about windowdraw
|
||||||
|
mov ebx,2 ; 2, end of draw
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
||||||
|
; DATA AREA
|
||||||
|
deg_div dd 90
|
||||||
|
deg_counter dd ?
|
||||||
|
col dd 0x00ffffff
|
||||||
|
sq dd 0.707 ;sin pi/4
|
||||||
|
cosbeta dd ?
|
||||||
|
sinbeta dd ?
|
||||||
|
x dd ?
|
||||||
|
y dd ?
|
||||||
|
z dd ?
|
||||||
|
xo dd 200 ;axle variables
|
||||||
|
;yo dd 110
|
||||||
|
zo dd 80
|
||||||
|
xdiv dd 20
|
||||||
|
zdiv dd 20
|
||||||
|
ymul dd 20
|
||||||
|
subx dd ?
|
||||||
|
;suby dd ?
|
||||||
|
subz dd ?
|
||||||
|
current_deg dd ? ;real
|
||||||
|
cur_deg_mul dd 12
|
||||||
|
i100 dd 100
|
||||||
|
i150 dd 150
|
||||||
|
labelt:
|
||||||
|
db 'Waved 3d form',0
|
||||||
|
the_mem:
|
||||||
|
I_END:
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
1
programs/demos/3dwav/trunk/build.bat
Normal file
1
programs/demos/3dwav/trunk/build.bat
Normal file
@ -0,0 +1 @@
|
|||||||
|
fasm 3dwav.asm 3dwav
|
||||||
Loading…
Reference in New Issue
Block a user