mirror of
https://github.com/stasenso/Puer.git
synced 2026-06-26 21:32:42 +03:00
Stanislav N Mikhailov
74 lines
2.2 KiB
HTML
74 lines
2.2 KiB
HTML
include /masm64/include64/masm64rt.inc
|
|
include /masm64/include64/user32.inc
|
|
include /masm64/include64/shell32.inc
|
|
includelib /masm64/lib64/user32.lib
|
|
includelib /masm64/lib64/shell32.lib
|
|
;______________________Прототипы__________________________
|
|
WinMain proto :HINSTANCE,:HINSTANCE,:LPSTR,:QWORD
|
|
|
|
myPaint proto :HWND ;Обработка сообщения WM_PAINT
|
|
myDraw proto nSegment:DWORD ;принимаю параметр с колличеством сегментов (в HIWORD) и номером данного сегмента (в LOWORD)
|
|
|
|
WM_SHELLNOTIFY equ WM_USER+5
|
|
;_______________________________________________________
|
|
.data?
|
|
hInstance HINSTANCE ? ; Хэндл нашей пpогpаммы
|
|
CommandLine LPSTR ?
|
|
hIcon dq ? ; icon handle
|
|
|
|
TRAYICONDATAA STRUCT
|
|
cbSize DWORD ?
|
|
_pad0 DWORD ?
|
|
hWnd QWORD ?
|
|
uID DWORD ?
|
|
uFlags DWORD ?
|
|
uCallbackMessage DWORD ?
|
|
_pad1 DWORD ?
|
|
hIcon QWORD ?
|
|
szTip BYTE 128 dup(?)
|
|
TRAYICONDATAA ENDS
|
|
|
|
BITMAPINFOHEADER STRUCT
|
|
biSize DWORD ?;
|
|
biWidth LONG ?;
|
|
biHeight LONG ?;
|
|
biPlanes WORD ?;
|
|
biBitCount WORD ?;
|
|
biCompression DWORD ?;
|
|
biSizeImage DWORD ?;
|
|
biXPelsPerMeter LONG ?;
|
|
biYPelsPerMeter LONG ?;
|
|
biClrUsed DWORD ?;
|
|
biClrImportant DWORD ?;
|
|
BITMAPINFOHEADER ENDS
|
|
RGBQUAD STRUCT
|
|
rgbBlue BYTE ?
|
|
rgbGreen BYTE ?
|
|
rgbRed BYTE ?
|
|
rgbReserved BYTE ?
|
|
RGBQUAD ENDS
|
|
BITMAPINFO STRUCT
|
|
bmiHeader BITMAPINFOHEADER <>
|
|
bmiColors RGBQUAD <>
|
|
BITMAPINFO ENDS
|
|
hPopupMenu dq ?
|
|
|
|
;_______________________________________________________
|
|
.data
|
|
szClassName db "CocaClass",0 ; Имя нашего класса окна
|
|
AppName db "Pu'er tea: no sleeping on the job!",0 ; Имя нашего окна
|
|
ELAPSE_UPDTIMER EQU 20
|
|
IDT_UPDTIMER EQU 111
|
|
wc WNDCLASSEX <sizeof WNDCLASSEX,CS_HREDRAW or CS_VREDRAW,WndProc,0,0,?,?,?,COLOR_WINDOW+1,NULL,szClassName,?>
|
|
bmi BITMAPINFO <>
|
|
rc RECT <>
|
|
RestoreString db "&Restore",0
|
|
ExitString db "E&xit Program",0
|
|
note TRAYICONDATAA <>
|
|
IDI_TRAY equ 1
|
|
IDM_RESTORE equ 1000
|
|
|
|
IDM_EXIT equ 1010
|
|
|
|
IDI_ICON equ 1020
|