mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-16 11:52:34 +03:00
Add sources of APM driver (by Staper) and battery driver (by Gluk)
git-svn-id: svn://kolibrios.org@1980 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Yogev Ezra
parent
eb6cb66362
commit
eed73247e9
295
kernel/trunk/drivers/apm.asm
Normal file
295
kernel/trunk/drivers/apm.asm
Normal file
@ -0,0 +1,295 @@
|
||||
; 11.09.2009 staper@inbox.ru
|
||||
; see kernel\docs\apm.txt
|
||||
|
||||
use32
|
||||
|
||||
org 0x0
|
||||
|
||||
db 'MENUET01'
|
||||
dd 0x1
|
||||
dd START
|
||||
dd I_END
|
||||
dd (I_END+100) and not 3
|
||||
dd (I_END+100) and not 3
|
||||
dd 0x0,0x0
|
||||
|
||||
include 'macros.inc'
|
||||
|
||||
START:
|
||||
mcall 40,0x7
|
||||
|
||||
mcall 49,0x0001,0x0001,0x5308 ;CX = FFFFh APM v1.0
|
||||
; mcall 49,0x0001,0x0001,0x530d
|
||||
; mcall 49,0x0001,0x0001,0x530f
|
||||
|
||||
; mcall 49,0x0000,,0x5310 ;bl - number of batteries
|
||||
redraw:
|
||||
mcall 49,0x0000,,0x530c
|
||||
dec cl
|
||||
jz still
|
||||
mcall 49,0x0001,0x0001,0x5308
|
||||
mcall 49,0x01ff,,0x530c
|
||||
test cl,cl
|
||||
jz @f
|
||||
mcall 49,0x0000,0x0001,0x530d
|
||||
mcall 49,0x0000,0x0000,0x5307
|
||||
mcall 49,0x0000,0x0001,0x5308
|
||||
@@:
|
||||
mcall 12,1
|
||||
mcall 0,100*65536+235,100*65536+90,0x34ffffff,0x000000,title
|
||||
mcall 49,0x0000,,0x5300
|
||||
jnc @f
|
||||
mcall 4,10*65536+3,0x80000000,text.4
|
||||
bts [flags],1
|
||||
jmp .end
|
||||
@@: cmp al,0
|
||||
jne @f
|
||||
mov edx,text.1
|
||||
jmp .0
|
||||
@@: cmp al,1
|
||||
jne @f
|
||||
mov edx,text.2
|
||||
jmp .0
|
||||
@@: mov edx,text.3
|
||||
.0: push edx
|
||||
mcall 4,169*65536+3,0x80dddddd,text.0
|
||||
pop edx
|
||||
add ebx,47*65536
|
||||
mcall
|
||||
mcall 49,0x0001,,0x530a
|
||||
jc .error
|
||||
push si dx cx bx ;time of battery life, b. flag, b. status, AC line status
|
||||
|
||||
;AC line status
|
||||
cmp bh,0
|
||||
jne @f
|
||||
mov edx,text.01
|
||||
jmp .1
|
||||
@@: cmp bh,1
|
||||
jne @f
|
||||
mov edx,text.02
|
||||
jmp .1
|
||||
@@: cmp bh,2
|
||||
jne @f
|
||||
mov edx,text.03
|
||||
jmp .1
|
||||
@@: mov edx,text.04
|
||||
.1: push edx
|
||||
mcall 4,10*65536+10,0x80000000,text.00
|
||||
pop edx
|
||||
mcall ,100*65536+10,;0x80000000
|
||||
|
||||
;battery status
|
||||
pop bx
|
||||
cmp bl,0
|
||||
jne @f
|
||||
mov edx,text.11
|
||||
jmp .2
|
||||
@@: cmp bl,1
|
||||
jne @f
|
||||
mov edx,text.12
|
||||
jmp .2
|
||||
@@: cmp bl,2
|
||||
jne @f
|
||||
mov edx,text.13
|
||||
jmp .2
|
||||
@@: cmp bl,3
|
||||
jne @f
|
||||
mov edx,text.14
|
||||
jmp .2
|
||||
@@: mov edx,text.04
|
||||
.2: push edx
|
||||
mcall 4,10*65536+20,0x80000000,text.10
|
||||
pop edx
|
||||
mcall ,100*65536+20,
|
||||
|
||||
;battery life, percentage and minutes/seconds
|
||||
mcall ,10*65536+30,,text.20
|
||||
pop cx
|
||||
cmp cl,0xff
|
||||
jne @f
|
||||
mcall ,100*65536+30,0x80000000,text.04
|
||||
pop eax
|
||||
jmp .end
|
||||
@@: shl ecx,24
|
||||
shr ecx,24
|
||||
mcall 47,0x80030000,,100*65536+30,0x347636
|
||||
.3: mcall 4,115*65536+30,0x80000000,text.15
|
||||
mov dx,[esp]
|
||||
shl edx,17
|
||||
shr edx,17
|
||||
mov ecx,edx
|
||||
mcall 47,0x80030000,,140*65536+30
|
||||
pop cx
|
||||
mov edx,text.21
|
||||
bt cx,15
|
||||
jc @f
|
||||
mov edx,text.22
|
||||
@@: mcall 4,160*65536+30,0x80000000
|
||||
pop si
|
||||
.error:
|
||||
.end:
|
||||
;buttons
|
||||
mcall 8,148*65536+16,45*65536+15,3,0x00677ab0
|
||||
mcall ,166*65536+16,,4,
|
||||
mcall ,184*65536+16,,5,
|
||||
mcall ,202*65536+16,,6,
|
||||
bt [flags],1
|
||||
jc @f
|
||||
mcall ,65*65536+45,,2,
|
||||
@@: mcall 4,10*65536+50,0x80564242,text.30
|
||||
mcall 12,2
|
||||
|
||||
still:
|
||||
; mcall 10
|
||||
mcall 23,12000
|
||||
test eax,eax
|
||||
jz redraw
|
||||
|
||||
dec al
|
||||
jz redraw
|
||||
dec al
|
||||
jz key
|
||||
dec al
|
||||
jz button
|
||||
jmp still
|
||||
|
||||
|
||||
|
||||
|
||||
key:
|
||||
mcall 2
|
||||
jmp still
|
||||
|
||||
button:
|
||||
mcall 17
|
||||
cmp ah,1
|
||||
jne @f
|
||||
mcall -1
|
||||
|
||||
@@: cmp ah,2
|
||||
jne @f
|
||||
mcall 5,50
|
||||
mcall 49,0x0001,0x0001,0x5307
|
||||
jmp redraw
|
||||
|
||||
@@: cmp ah,4
|
||||
jg @f
|
||||
mov edx,0x01f7 ;primary chan.
|
||||
call reserv_ports
|
||||
jc redraw
|
||||
sub bh,3
|
||||
.1: call set_drive
|
||||
btc [flags],2
|
||||
jnc .2
|
||||
call device_reset
|
||||
jmp .3
|
||||
.2: call standby_hdd
|
||||
.3: call free_ports
|
||||
jmp redraw
|
||||
|
||||
@@: cmp ah,6
|
||||
jg redraw
|
||||
mov edx,0x0177 ;secondary chan.
|
||||
call reserv_ports
|
||||
jc redraw
|
||||
sub bh,5
|
||||
jmp .1
|
||||
|
||||
set_drive:
|
||||
dec dx
|
||||
in al,dx
|
||||
test bh,bh
|
||||
jnz @f
|
||||
btr ax,4
|
||||
.1: out dx,al
|
||||
inc dx
|
||||
ret
|
||||
@@: bts ax,4
|
||||
jmp .1
|
||||
|
||||
|
||||
standby_hdd:
|
||||
; 94h E0h nondata standby immediate
|
||||
; 95h E1h nondata idle immediate
|
||||
; 96h E2h nondata standby
|
||||
; 97h E3h nondata idle
|
||||
; 98h E5h nondata check power mode
|
||||
; 99h E6h nondata set sleep mode
|
||||
xor ecx,ecx
|
||||
@@: in al,dx
|
||||
dec cx
|
||||
jz @f
|
||||
bt ax,6
|
||||
jnc @b
|
||||
mov al,0x96
|
||||
out dx,al
|
||||
mov al,0xe2
|
||||
out dx,al
|
||||
@@:
|
||||
ret
|
||||
|
||||
reserv_ports:
|
||||
mov ecx,edx
|
||||
dec ecx
|
||||
push ax
|
||||
mcall 46,0
|
||||
test al,al
|
||||
jnz @f
|
||||
pop bx
|
||||
clc
|
||||
ret
|
||||
@@: pop bx
|
||||
stc
|
||||
ret
|
||||
|
||||
device_reset:
|
||||
xor ecx,ecx
|
||||
@@: in al,dx
|
||||
dec cx
|
||||
jz @f
|
||||
bt ax,6
|
||||
jnc @b
|
||||
mov al,0x10
|
||||
out dx,al
|
||||
@@:
|
||||
ret
|
||||
|
||||
free_ports:
|
||||
mov ecx,edx
|
||||
dec ecx
|
||||
mcall 46,1
|
||||
ret
|
||||
|
||||
|
||||
; „€<E2809E><E282AC>›… <20><>Žƒ<C5BD>€ŒŒ›
|
||||
title db '',0
|
||||
flags dw 0
|
||||
|
||||
text:
|
||||
.0: db 'APM v.1.',0
|
||||
.1: db '0',0
|
||||
.2: db '1',0
|
||||
.3: db '2',0
|
||||
.4: db 'APM not supported',0
|
||||
|
||||
.00: db 'power status:',0
|
||||
.01: db 'off-line',0
|
||||
.02: db 'on-line',0
|
||||
.03: db 'on backup power',0
|
||||
.04: db 'unknown',0
|
||||
|
||||
.10: db 'battery flag:',0
|
||||
.11: db 'high',0
|
||||
.12: db 'low',0
|
||||
.13: db 'critical',0
|
||||
.14: db 'charging',0
|
||||
.15: db ' % ,',0
|
||||
|
||||
.20: db 'battery life:',0
|
||||
.21: db 'min',0
|
||||
.22: db 'sec',0
|
||||
|
||||
.30: db 'STAND-BY: SYSTEM HDD: 0 1 2 3',0
|
||||
|
||||
I_END:
|
||||
522
programs/system/battery/bi.asm
Normal file
522
programs/system/battery/bi.asm
Normal file
@ -0,0 +1,522 @@
|
||||
; Battery Indicator v0.ALPHA by Gluk
|
||||
include "macros.inc"
|
||||
MEOS_APP_START
|
||||
CODE
|
||||
|
||||
init:
|
||||
mov cl,48d ; setting waitingmask
|
||||
mov edx,0x110
|
||||
mcall 66,4
|
||||
|
||||
mov word[vminor],0
|
||||
mov dx,0x5300
|
||||
xor ebx,ebx
|
||||
mov eax,49
|
||||
jnc @f
|
||||
mov word[vminor],ax
|
||||
@@:
|
||||
mov dx,0x5308
|
||||
mov bx,1
|
||||
mov cx,bx
|
||||
mov eax,49
|
||||
int 0x40
|
||||
mov dx,0x530E
|
||||
xor bx,bx
|
||||
mov cx,0x0102
|
||||
mov eax,49
|
||||
int 0x40
|
||||
mov dx,0x530D
|
||||
mov bx,1
|
||||
mov cx,bx
|
||||
mov eax,49
|
||||
int 0x40
|
||||
mov dx,0x530F
|
||||
mov bx,1
|
||||
mov cx,bx
|
||||
mov eax,49
|
||||
int 0x40
|
||||
xor ebx,ebx
|
||||
mov bx,[bid] ; find a bid
|
||||
dec ebx
|
||||
@@:
|
||||
mov eax,49
|
||||
mov dx,530Ah
|
||||
inc ebx
|
||||
int 0x40
|
||||
jc @b
|
||||
;cmp cl,0xff
|
||||
;je @b
|
||||
finded:
|
||||
mov [bid],bx
|
||||
;mcall 49,0,0,5310h
|
||||
|
||||
mcall 9,streaminfo,-1 ; get process data
|
||||
mov ecx,dword[streaminfo+30d]
|
||||
mcall 18,21
|
||||
mov [slotid],eax
|
||||
|
||||
mov eax,48 ; get system colors
|
||||
mov ebx,3
|
||||
mov ecx,sc
|
||||
mov edx,sizeof.system_colors
|
||||
mcall
|
||||
initend:
|
||||
|
||||
redraw:
|
||||
call draw_window
|
||||
|
||||
wait_event: ; main cycle
|
||||
call redata
|
||||
mov ebx,[waiting]
|
||||
mcall 23
|
||||
cmp eax,0
|
||||
jz wait_event
|
||||
dec eax
|
||||
jz redraw
|
||||
dec eax
|
||||
jz key
|
||||
dec eax
|
||||
jz button
|
||||
jmp wait_event
|
||||
|
||||
button:
|
||||
mcall 17
|
||||
@@: ;1:
|
||||
dec ah
|
||||
;jnz @f
|
||||
; or eax,-1
|
||||
; mcall
|
||||
;@@: ;2
|
||||
dec ah
|
||||
jnz @f
|
||||
mov eax,dword[whatview]
|
||||
mov ebx,views_end-3
|
||||
add eax,4
|
||||
cmp eax,ebx
|
||||
jb allok1
|
||||
mov eax,views_start
|
||||
allok1:
|
||||
mov [whatview],eax
|
||||
mov eax,[eax]
|
||||
mov [viewer],eax
|
||||
@@:
|
||||
jmp wait_event
|
||||
|
||||
redata:
|
||||
call getdata
|
||||
mov al,[window]
|
||||
cmp al,0
|
||||
jz @f
|
||||
call regraph
|
||||
call rebutton
|
||||
@@:
|
||||
ret
|
||||
|
||||
key: ; key event handler
|
||||
mov al,2 ; get key code
|
||||
mcall
|
||||
cmp al,2
|
||||
jne wait_event
|
||||
call rewindow
|
||||
jmp wait_event
|
||||
|
||||
draw_window:
|
||||
mov eax,12
|
||||
mov ebx,1
|
||||
mcall
|
||||
|
||||
mov al,byte[window]
|
||||
cmp al,0
|
||||
jz nowindow
|
||||
|
||||
mcall 48,5
|
||||
sub eax,[winotstx]
|
||||
sub eax,[winsizex]
|
||||
shl eax,16
|
||||
sub ebx,[winotsty]
|
||||
sub ebx,[winsizey]
|
||||
shl ebx,16
|
||||
mov ecx,ebx
|
||||
mov ebx,eax
|
||||
|
||||
xor eax,eax ; create and draw the window
|
||||
add ebx,dword[winsizex]
|
||||
dec ebx ; (window_c)*65536+(window_s)
|
||||
add ecx,dword[winsizey]
|
||||
dec ecx
|
||||
mov edx,[sc.work] ; work area color
|
||||
or edx, 0x61000000 ; & window type 1
|
||||
int 0x40
|
||||
|
||||
mov eax,13d ;printing pryamougolniks
|
||||
push eax ;pipka out
|
||||
mov eax,[winsizex]
|
||||
xor edx,edx
|
||||
mov ebx,3
|
||||
div ebx
|
||||
mov ebx,eax
|
||||
; pusha
|
||||
;mov [nowpoint],0
|
||||
;in: ebx - piplenght
|
||||
; mov eax,0
|
||||
;mov edi, nowpoint
|
||||
; add edi,winform
|
||||
; mov ecx,ebx
|
||||
; rep stosb
|
||||
; mov eax,1
|
||||
;mov edi, nowpoint
|
||||
; add edi,winform
|
||||
; mov ecx,ebx
|
||||
; rep stosb
|
||||
; mov eax,0
|
||||
;mov edi, nowpoint
|
||||
; add edi,winform
|
||||
; mov ecx,ebx
|
||||
; rep stosb
|
||||
; popa
|
||||
mov ecx,ebx
|
||||
shl ebx,16
|
||||
pop eax
|
||||
add ebx,ecx
|
||||
mov ecx,[winsizey]
|
||||
shr ecx,4 ;div 16 ;)
|
||||
xor edx,edx
|
||||
int 0x40
|
||||
|
||||
add ebx,65536-2 ;pipka in
|
||||
add ecx,65536-1
|
||||
mov edx,[sc]
|
||||
int 0x40
|
||||
|
||||
mov ebx,[winsizex] ;korpus out
|
||||
mov ecx,[winsizey]
|
||||
shr ecx,4
|
||||
mov edx,ecx
|
||||
shl ecx,16
|
||||
add ecx,[winsizey]
|
||||
sub ecx,edx
|
||||
xor edx,edx
|
||||
int 0x40
|
||||
|
||||
add ebx,65536-2 ;korpus in
|
||||
add ecx,65536-2
|
||||
mov edx,[sc]
|
||||
int 0x40
|
||||
|
||||
mov edx,[winborts]
|
||||
mov edi,edx
|
||||
shl edx,16
|
||||
add ebx,edx
|
||||
sub ebx,edi
|
||||
sub ebx,edi ;black contur
|
||||
add ecx,65536-3
|
||||
sub ecx,[winknopy]
|
||||
xor edx,edx
|
||||
int 0x40
|
||||
|
||||
add ebx,65536-2 ;working area
|
||||
add ecx,65536-2
|
||||
mov edx,[sc.work]
|
||||
int 0x40
|
||||
mov [winworkx],ebx
|
||||
mov [winworky],ecx
|
||||
|
||||
call redata
|
||||
nowindow:
|
||||
mov eax,12 ;finish drawing
|
||||
mov ebx,2
|
||||
int 0x40
|
||||
ret
|
||||
|
||||
rebutton:
|
||||
mov eax,8
|
||||
mov edx,0x80000002
|
||||
int 0x40
|
||||
|
||||
mov ebx,[winsizex]
|
||||
add ebx,65536-3
|
||||
mov edi,[winknopy]
|
||||
mov ecx,[winsizey]
|
||||
sub ecx,edi
|
||||
sub ecx,2
|
||||
shl ecx,16
|
||||
add ecx,edi
|
||||
mov edx,0x00000002
|
||||
mov esi,[sc.work_button]
|
||||
int 0x40
|
||||
|
||||
mov [wintextx],3
|
||||
sub edi,[winfonty]
|
||||
shr edi,1
|
||||
mov ebx,edi
|
||||
add ebx,[winsizey]
|
||||
sub ebx,[winknopy]
|
||||
mov [wintexty],ebx
|
||||
call dword[viewer]
|
||||
ret
|
||||
|
||||
|
||||
rewindow:
|
||||
mov al,byte[window]
|
||||
cmp al,1
|
||||
jne @f
|
||||
mcall 67,1,1,0,0
|
||||
mov byte[window],0
|
||||
mcall 40,2
|
||||
jmp endrew
|
||||
@@:
|
||||
mcall 48,5
|
||||
sub eax,[winotstx]
|
||||
sub eax,[winsizex]
|
||||
sub ebx,[winotsty]
|
||||
sub ebx,[winsizey]
|
||||
mov ecx,ebx
|
||||
mov ebx,eax
|
||||
|
||||
mov eax,67
|
||||
mov edx,[winsizex]
|
||||
dec edx
|
||||
mov esi,[winsizey]
|
||||
dec esi
|
||||
int 0x40
|
||||
|
||||
mov byte[window],1
|
||||
mov ecx,[slotid]
|
||||
mcall 18,3
|
||||
|
||||
mcall 40,7
|
||||
endrew:
|
||||
call draw_window
|
||||
ret
|
||||
|
||||
regraph:
|
||||
mov eax,13
|
||||
mov ebx,[winworkx] ;working area
|
||||
mov ecx,[winworky]
|
||||
mov edx,[sc.work]
|
||||
int 0x40
|
||||
|
||||
mov ebx,[winworky]
|
||||
shl ebx,16
|
||||
shr ebx,16
|
||||
sub ebx,[wingotst]
|
||||
sub ebx,[wingotst]
|
||||
mov eax,ebx
|
||||
shr ebx,3 ;div 8 ;)
|
||||
shl eax,29
|
||||
shr eax,32 ;ostatok
|
||||
add eax,[wingotst]
|
||||
cmp eax,ebx
|
||||
jb @f
|
||||
inc ebx
|
||||
@@:
|
||||
mov [winlines],ebx
|
||||
mov ecx,[delenia]
|
||||
@@:
|
||||
push ecx
|
||||
mov edi,ecx
|
||||
|
||||
mov edx,[wingotst]
|
||||
mov ebx,[winworkx]
|
||||
shl edx,16
|
||||
add ebx,edx
|
||||
shr edx,16
|
||||
sub ebx,edx
|
||||
sub ebx,edx
|
||||
|
||||
mov ecx,[winworky]
|
||||
mov eax,[winworky]
|
||||
shl eax,16
|
||||
add ecx,eax
|
||||
|
||||
push edx
|
||||
mov eax,[winlines]
|
||||
mul edi
|
||||
pop edx
|
||||
add edx,eax
|
||||
|
||||
shl edx,16
|
||||
sub ecx,edx
|
||||
|
||||
shr ecx,16
|
||||
inc ecx
|
||||
shl ecx,16
|
||||
add ecx,[winlines]
|
||||
sub ecx,1 ;promezhutki
|
||||
mov edx,[sc.work_graph]
|
||||
mov eax,13
|
||||
int 0x40
|
||||
|
||||
pop ecx
|
||||
loop @b
|
||||
endreg:
|
||||
ret
|
||||
|
||||
getdata:
|
||||
xor ecx,ecx
|
||||
xor edx,edx
|
||||
|
||||
;HERE YOU MAY GET A PERCENTAGE AND REMAINING TIME FOR BATTERY UNIT [bid], AND PUT THEY INTO [gotperc] AND [gottime]
|
||||
mov bx,[bid]
|
||||
mov eax,49
|
||||
mov dx,530Ah
|
||||
int 0x40
|
||||
mov [gotperc],cl
|
||||
mov [gottime],dx
|
||||
;/HERE
|
||||
|
||||
xor eax,eax
|
||||
mov al,[gotperc]
|
||||
cmp al,0
|
||||
jne @f
|
||||
mov [delenia],1
|
||||
ret
|
||||
@@:
|
||||
cmp al,100
|
||||
jb @f
|
||||
mov [delenia],8
|
||||
ret
|
||||
@@:
|
||||
shl eax,3
|
||||
mov ebx,100
|
||||
xor edx,edx
|
||||
div ebx
|
||||
inc eax
|
||||
mov [delenia],eax
|
||||
ret
|
||||
|
||||
viewers:
|
||||
time:
|
||||
xor edx,edx
|
||||
mov dx,[gottime]
|
||||
cmp dx,0xffff
|
||||
jne @f
|
||||
mov eax,4
|
||||
mov ebx,[wintextx]
|
||||
shl ebx,16
|
||||
add ebx,[wintexty]
|
||||
mov ecx,0x00000000
|
||||
mov edx,simbols
|
||||
mov esi,3
|
||||
add ecx,[sc.work_button_text]
|
||||
int 0x40
|
||||
ret
|
||||
@@:
|
||||
shl edx,17
|
||||
shr edx,31
|
||||
mov eax,4
|
||||
mov ebx,[wintextx]
|
||||
add ebx,2*8
|
||||
shl ebx,16
|
||||
add ebx,[wintexty]
|
||||
mov ecx,0x00000000
|
||||
add edx,simbols
|
||||
mov esi,1
|
||||
add ecx,[sc.work_button_text]
|
||||
int 0x40
|
||||
;12345678901234567890123456789012
|
||||
mov eax,47
|
||||
mov bl,2 ;cifr
|
||||
mov bh,0
|
||||
shl ebx,16
|
||||
mov bl,0 ;ecx is chislo
|
||||
mov bh,0
|
||||
xor ecx,ecx
|
||||
mov cx,[gottime]
|
||||
shl ecx,18
|
||||
shr ecx,18
|
||||
mov edx,[wintextx]
|
||||
shl edx,16
|
||||
add edx,[wintexty]
|
||||
mov esi,0x10000000
|
||||
add esi,[sc.work_button_text]
|
||||
int 0x40
|
||||
ret
|
||||
percent:
|
||||
mov dl,[gotperc]
|
||||
cmp dl,0xff
|
||||
jne @f
|
||||
mov eax,4
|
||||
mov ebx,[wintextx]
|
||||
shl ebx,16
|
||||
add ebx,[wintexty]
|
||||
mov ecx,0x00000000
|
||||
mov edx,simbols
|
||||
mov esi,4
|
||||
add ecx,[sc.work_button_text]
|
||||
int 0x40
|
||||
ret
|
||||
@@:
|
||||
mov eax,4
|
||||
mov ebx,[wintextx]
|
||||
add ebx,3*8
|
||||
shl ebx,16
|
||||
add ebx,[wintexty]
|
||||
mov ecx,0x00000000
|
||||
mov edx,simbols
|
||||
add edx,3
|
||||
mov esi,1
|
||||
add ecx,[sc.work_button_text]
|
||||
int 0x40
|
||||
|
||||
mov eax,47
|
||||
mov bl,3 ;cifr
|
||||
mov bh,0
|
||||
shl ebx,16
|
||||
mov bl,0 ;ecx is chislo
|
||||
mov bh,0
|
||||
xor ecx,ecx
|
||||
mov cl,[gotperc]
|
||||
mov edx,[wintextx]
|
||||
shl edx,16
|
||||
add edx,[wintexty]
|
||||
mov esi,0x10000000
|
||||
add esi,[sc.work_button_text]
|
||||
int 0x40
|
||||
ret
|
||||
; <--- initialised data --->
|
||||
DATA
|
||||
|
||||
bid dw 8000h
|
||||
|
||||
viewer dd percent
|
||||
whatview dd views_start
|
||||
views_start:
|
||||
dd percent
|
||||
dd time
|
||||
views_end:
|
||||
|
||||
simbols db 'smh%??m???%'
|
||||
|
||||
waiting dd 1000
|
||||
watchings:
|
||||
window db 1
|
||||
winotstx dd 7
|
||||
winotsty dd 7
|
||||
winsizex dd 48
|
||||
winsizey dd 64
|
||||
winborts dd 1
|
||||
winfonty dd 9
|
||||
winknopy dd 10
|
||||
wingotst dd 2
|
||||
; <--- uninitialised data --->
|
||||
UDATA
|
||||
vminor dw ?
|
||||
sc system_colors
|
||||
streaminfo rb 1024
|
||||
winform rb 1024
|
||||
slotid dd ?
|
||||
|
||||
gotperc db ?
|
||||
gottime dw ?
|
||||
delenia dd ?
|
||||
|
||||
uwatchings:
|
||||
winhomex dd ?
|
||||
winhomey dd ?
|
||||
winworkx dd ? ;cx*65536+sx
|
||||
winworky dd ? ;cy*65536+sy
|
||||
winlines dd ?
|
||||
wintextx dd ?
|
||||
wintexty dd ?
|
||||
MEOS_APP_END
|
||||
Loading…
Reference in New Issue
Block a user