BlueGreycalmElegant

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → /programs/demos/tinyfrac/trunk/tinyfrac.asm @ 485

  → /programs/demos/tinyfrac/trunk/tinyfrac.asm @ 484

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

Regard whitespace Rev 485 → Rev 484

/programs/demos/tinyfrac/trunk/tinyfrac.asm
83,7 → 83,7
dd 0,0
include 'lang.inc'
include '..\..\..\macros.inc'
include 'macros.inc'
STARTX dd 200
STARTY dd 120
93,77 → 93,32
START:
red:
call draw_window
call draw_fractal
still:
mov eax,10
mcall
int 0x40
dec eax
jz red
dec eax
jz key
cmp eax,1
je red
cmp eax,2
je key
cmp eax,3
je button
button:
mov al,17
mcall
cmp ah,1
jne no_close
or eax,-1
mcall
no_close:
cmp ah,2
jne no_bgr
mov eax,15 ; bgr 512 x 256
mov ebx,1
mov ecx,512
mov edx,256
mcall
mov eax,15
mov ebx,5
mov ecx,0x1000
mov edx,0
mov esi,512*3*256
mcall
mov eax,15
mov ebx,3
mcall
jmp still
no_bgr:
cmp ah,3
jb no_color
cmp ah,5
jg no_color
shr eax,8
sub eax,3
imul eax,8
add eax,8
not eax
and eax,11000b
mov [shlc],al
call draw_fractal
red:
call draw_window
call put_image
jmp still
no_color:
jmp still
key:
mov al,2
mcall
mov eax,2
int 0x40
cmp ah,'e'
je cycle
224,6 → 179,61
call draw_fractal
jmp still
button:
mov eax,17
int 0x40
cmp ah,1
jne no_close
mov eax,-1
int 0x40
no_close:
cmp ah,2
jne no_bgr
mov eax,15 ; bgr 512 x 256
mov ebx,1
mov ecx,512
mov edx,256
int 0x40
mov eax,15
mov ebx,5
mov ecx,0x1000
mov edx,0
mov esi,512*3*256
int 0x40
mov eax,15
mov ebx,3
int 0x40
jmp still
no_bgr:
cmp ah,3
jb no_color
cmp ah,5
jg no_color
shr eax,8
sub eax,3
imul eax,8
add eax,8
not eax
and eax,11000b
; sub eax,8
mov [shlc],al
call draw_fractal
jmp still
no_color:
jmp still
color_cycle:
pusha
247,7 → 257,7
call put_image
mov eax,5
mov ebx,1
mcall
int 0x40
dec esi
jnz newcycle
277,10 → 287,11
pusha
mov eax,4
mov ebx,10*65536+30
mov ecx,0x80ffffff
mov ebx,15*65536+35
mov ecx,0xffffff
mov edx,calc
mcall
mov esi,calcl-calc
int 0x40
popa
pusha
298,6 → 309,12
push cx
; and cl,0x7
; cmp cl,0
; jne noim
; call put_image
; noim:
mov cx, PIXWIDTH -1 ; width of screen in pixels
sub bp,cx ;
352,9 → 369,9
mov eax,7
mov ebx,0x1000
mov ecx,512*65536+256
mov edx,4*65536+21
mcall
mov ecx,512*65536+255
mov edx,10*65536+30
int 0x40
popa
429,30 → 446,38
mov eax,12
mov ebx,1
mcall
int 0x40
xor eax,eax
mov ebx,50*65536+PIXWIDTH+8
mov ecx,100*65536+PIXHEIGHT+25
mov edx,0x13334455
mov edi,title
mcall
mov eax,0
mov ebx,50*65536+531
mov ecx,100*65536+256+48
mov edx,0x02334455
mov esi,0x80778899
mov edi,0x00778899
int 0x40
mov eax,8
mov ebx,290*65536+112
mov ebx,(531-19)*65536+12
mov ecx,5*65536+12
mov edx,1
mov esi,0x808080
int 0x40
mov eax,8
mov ebx,300*65536+112
mov ecx,5*65536+12
mov edx,2
mov esi,0x808080
mcall
int 0x40
mov ebx,420*65536+12
mov ebx,430*65536+12
mov ecx,5*65536+12
mov edx,3
mov esi,0xa00000
mov edi,3
;mov eax,8
newcolor:
mcall
mov eax,8
int 0x40
add ebx,13*65536
shr esi,8
inc edx
460,14 → 485,15
jnz newcolor
mov eax,4
mov ebx,300*65536+8
mov ecx,0x80ffffff
mov edx,button_txt
mcall
mov ebx,8*65536+8
mov ecx,0xffffff
mov edx,l
mov esi,ll-l
int 0x40
mov eax,12
mov ebx,2
mcall
int 0x40
popa
ret
479,9 → 505,15
;
title db 'Tinyfrac - MOVE: ARROWS, ZOOM Q/W, CYCLE: E/R',0
button_txt db 'Set as wallpaper',0
l: db 'TINYFRAC - MOVE: ARROWS, ZOOM Q/W, CYCLE: E/R '
db 'SET AS WALLPAPER'
ll:
calc db 'CALCULATING',0
calc db 'CALCULATING'
calcl:
I_END:
I_END: