forked from KolibriOS/kolibrios
4daae89053
updated sysfunc.txt *programs new icons and logo for CPUID and ICON added new version of @ICON and ICONMNGR fixes in iconedit and calendar from DedOK new algoritm of fill background in pic4 all apps (fasm-writen only) rewriten to use common macros.inc for easy recompile in fastcall mode (there is a bug in https; run need rewrite to use common macros.inc) small fixes in build_all.bat script git-svn-id: svn://kolibrios.org@485 a494cfbc-eb01-0410-851d-a64ba20cac60
97 lines
1.4 KiB
PHP
97 lines
1.4 KiB
PHP
; Interface
|
|
|
|
macro Window xStart,yStart,xSize,ySize,bColor,gColor,fColor
|
|
{
|
|
mov ebx,xStart
|
|
shl ebx,16
|
|
add ebx,xSize
|
|
mov ecx,yStart
|
|
shl ecx,16
|
|
add ecx,ySize
|
|
mov edx,bColor
|
|
mov esi,gColor
|
|
mov edi,fColor
|
|
xor eax,eax
|
|
mcall
|
|
}
|
|
|
|
|
|
;WriteTextToWindow
|
|
macro Text xStart,yStart,rgbColor,pText,nTextLen
|
|
{
|
|
mov ebx,xStart
|
|
shl ebx,16
|
|
add ebx,yStart
|
|
mov ecx,rgbColor
|
|
mov edx,pText
|
|
mov esi,nTextLen
|
|
mov eax,4
|
|
mcall
|
|
}
|
|
|
|
;DisplayNumber
|
|
macro Number xStart,yStart,nPrintType,noOfDigits,Data,rgbColor
|
|
{
|
|
|
|
mov edx,xStart
|
|
shl edx,16
|
|
add edx,yStart
|
|
mov ebx,noOfDigits
|
|
shl ebx,16
|
|
or ebx,nPrintType
|
|
mov ecx,Data
|
|
mov esi,rgbColor
|
|
mov eax,47
|
|
mcall
|
|
}
|
|
|
|
macro DrawLine xStart,xEnd,yStart,yEnd,rgbColor
|
|
{
|
|
mov ebx,xStart
|
|
shl ebx,16
|
|
add ebx,xEnd
|
|
mov ecx,yStart
|
|
shl ecx,16
|
|
add ecx, yEnd
|
|
mov edx,rgbColor
|
|
mov eax,38
|
|
mcall
|
|
}
|
|
|
|
macro PutImage xPos,yPos,xImage,yImage,pImage
|
|
{
|
|
mov ecx,xImage
|
|
shl ecx,16
|
|
add ecx, yImage
|
|
mov edx,xPos
|
|
shl edx,16
|
|
add edx,yPos
|
|
mov ebx,pImage
|
|
mov eax,7
|
|
mcall
|
|
}
|
|
|
|
macro Button xStart,yStart,xSize,ySize,nID,rgbColor
|
|
{
|
|
mov ebx,xStart
|
|
shl ebx,16
|
|
add ebx,xSize
|
|
mov ecx,yStart
|
|
shl ecx,16
|
|
add ecx,ySize
|
|
mov edx,nID
|
|
mov esi,rgbColor
|
|
mov eax,8
|
|
mcall
|
|
}
|
|
|
|
macro CreateTread EntryPoint,StackPos
|
|
{
|
|
xor ebx,ebx
|
|
inc ebx
|
|
mov ecx,EntryPoint
|
|
mov edx,StackPos
|
|
mov eax,51
|
|
mcall
|
|
}
|