; à®á⮩ ¯à¨¬¥à ¯à®£à ¬¬ë ¤«ï KolibriOS
; ®§¢ã稢 ¥â ª®¤ ¦ ⮩ ª« ¢¨è¨
;
; ®¬¯¨«¨à®¢ âì FASM'®¬
; ®¦® ®âªàëâì example.asm ç¥à¥§ ¯à®£à ¬¬ã FASM (¥ñ ïà«ëª ¥áâì
; à ¡®ç¥¬ á⮫¥)
; ¬®¦® ¯à®áâ® ¦ âì F9 ¢ Tinypad'¥. ®£ ª®¬¯¨«ï樨
; ®â®¡à ¦ ¥âáï ¤®áª¥ ®â« ¤ª¨ (¯à®£à ¬¬ BOARD)
;
; â® ¢ ¦® § âì ¯à¨ ¯à®£à ¬¬¨à®¢ ¨¨ ¯®¤ ®«¨¡à¨:
; ®¬¥à äãªæ¨¨ ¯®¬¥é ¥âáï ¢ ॣ¨áâà eax.
; 맮¢ á¨á⥬®© äãªæ¨¨ ®áãé¥á⢫ï¥âáï ª®¬ ¤®© "int 0x40".
; ᥠॣ¨áâàë, ªà®¬¥  㪠§ ëå ¢ ¢®§¢à é ¥¬®¬ § 票¨,
; ¢ª«îç ï ॣ¨áâà ä« £®¢ eflags, á®åà ïîâáï.
;
; ਬ¥à:
; mov eax, 1 ;ãªæ¨ï 1 - ¯®áâ ¢¨âì â®çªã ¢ ®ª¥
; ;ᯨ᮪ á¨áäãªæ¨© á¬. ¢ DOCPACK - sysfuncr.txt
; mov ebx, 10 ; ª®®à¤¨ â x=10
; mov ecx, 20 ; ª®®à¤¨ â y=10
; mov edx, 0xFFFfff ;梥â â®çª¨
; int 0x40 ;¢ë§¢ âì äãªæ¨î
;
; ®¦¥ á ¬®¥ á ¨á¯®«ì§®¢ ¨¥¬ ¬ ªà®á :
; mcall 1, 10, 20, 0xFFFfff
;---------------------------------------------------------------------
use32 ; ¢ª«îç¨âì 32-¡¨âë© à¥¦¨¬ áᥬ¡«¥à
org 0x0 ; ¤à¥á æ¨ï á ã«ï
db 'MENUET01' ; 8-¡ ©âë© ¨¤¥â¨ä¨ª â®à MenuetOS
dd 0x01 ; ¢¥àá¨ï § £®«®¢ª (¢á¥£¤ 1)
dd START ; ¤à¥á ¯¥à¢®© ª®¬ ¤ë
dd I_END ; à §¬¥à ¯à®£à ¬¬ë
dd 0x1000 ; ª®«¨ç¥á⢮ ¯ ¬ïâ¨
dd 0x1000 ; ¤à¥á ¢¥àè¨ë áâíª
dd 0x0 ; ¤à¥á ¡ãä¥à ¤«ï ¯ à ¬¥â஢
dd 0x0 ; § १¥à¢¨à®¢ ®
include 'lang.inc'
include 'macros.inc' ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§ì áᥬ¡«¥à騪®¢!
;---------------------------------------------------------------------
;--- ----------------------------------------------
;---------------------------------------------------------------------
START:
red: ; ¯¥à¥à¨á®¢ âì ®ª®
call draw_window ; ¢ë§ë¢ ¥¬ ¯à®æ¥¤ãàã ®âà¨á®¢ª¨ ®ª
;---------------------------------------------------------------------
;--- ----------------------------------------
;---------------------------------------------------------------------
still:
mcall 10 ; äãªæ¨ï 10 - ¦¤ âì ᮡëâ¨ï
cmp eax,1 ; ¯¥à¥à¨á®¢ âì ®ª® ?
je red ; ¥á«¨ ¤ - ¬¥âªã red
cmp eax,2 ; ¦ â ª« ¢¨è ?
je key ; ¥á«¨ ¤ - key
cmp eax,3 ; ¦ â ª®¯ª ?
je button ; ¥á«¨ ¤ - button
jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横«
;---------------------------------------------------------------------
key: ; ¦ â ª« ¢¨è ª« ¢¨ âãà¥
mcall 2 ; äãªæ¨ï 2 - áç¨â âì ª®¤ ᨬ¢®« (¢ ah)
mov [Music+1], ah ; § ¯¨á âì ª®¤ ᨬ¢®« ª ª ª®¤ ®âë
; äãªæ¨ï 55-55: á¨áâ¥¬ë© ¤¨ ¬¨ª ("PlayNote")
; esi - ¤à¥á ¬¥«®¤¨¨
; mov eax,55
; mov ebx,eax
; mov esi,Music
; int 0x40
; ¨«¨ ª®à®âª®:
mcall 55, eax, , , Music
jmp still ; ¢¥àãâìáï ª ç «ã 横«
;---------------------------------------------------------------------
button:
mcall 17 ; 17 - ¯®«ãç¨âì ¨¤¥â¨ä¨ª â®à ¦ ⮩ ª®¯ª¨
cmp ah, 1 ; ¥á«¨
¦ â ª®¯ª á ®¬¥à®¬ 1,
jne still ; ¢¥àãâìáï
.exit:
mcall -1 ; ¨ ç¥ ª®¥æ ¯à®£à ¬¬ë
;---------------------------------------------------------------------
;---
----------------------------------
;---------------------------------------------------------------------
draw_window:
mcall 12, 1 ; äãªæ¨ï 12: á®®¡é¨âì ®¡ ®âà¨á®¢ª¥ ®ª
; 1 - ç¨ ¥¬ à¨á®¢ âì
; ¤ «¥¥: á ç « ¤«¨ë© ¢ ਠâ (§ ª®¬¬¥â¨à®¢ ë©)
; § ⥬ ª®à®âª¨© «®£ á ¨á¯®«ì§®¢ ¨¥¬ ¬ ªà®á®¢
; ð
; mov eax,0 ; äãªæ¨ï 0 : ®¯à¥¤¥«¨âì ¨ ®âà¨á®¢ âì ®ª®
; mov ebx,200*65536+200 ; [x áâ àâ] *65536 + [x à §¬¥à]
; mov ecx,200*65536+50 ; [y áâ àâ] *65536 + [y à §¬¥à]
; mov edx,0x33aabbcc ; 梥â à ¡®ç¥© ®¡« á⨠RRGGBB,8->color gl
; mov edi,header ;
; int 0x40
mcall 0, <200,200>, <200,50>, 0x33AABBCC,,title
; mov eax,4
; mov ebx,3 shl 16 + 8
; mov ecx,0
; mov edx,message
; mov esi,message.size
; int 0x40
mcall 4, <3, 8>, 0, message, message.size
mcall 12, 2 ; äãªæ¨ï 12: á®®¡é¨âì ®¡ ®âà¨á®¢ª¥ ®ª
; 2, § ª®ç¨«¨ à¨á®¢ âì
ret ; ¢ë室¨¬ ¨§ ¯à®æ¥¤ãàë
;---------------------------------------------------------------------
;---
----------------------------------------------
;---------------------------------------------------------------------
; ®â â ª ï ¢®â ª®à®âª ï "¬¥«®¤¨ï".
; â®à®© ¡ ©â ¨§¬¥ï¥âáï ¦ ⨥¬ ª« ¢¨èë
Music:
db 0x90, 0x30, 0
;---------------------------------------------------------------------
; ¨â¥àä¥©á ¯à®£à ¬¬ë ¬®£®ï§ëçë©
; ë ¬®¦¥â¥ § ¤ âì ï§ëª ¢ MACROS.INC (lang fix ï§ëª)
lsz message,\
ru,' ¦¬¨â¥ «î¡ãî ª« ¢¨èã...',\
en,'Press any key...',\
fr,'Pressez une touche...'
lsz title,\
ru,'
',\
en,'EXAMPLE APPLICATION',\
fr,"L'exemplaire programme"
;---------------------------------------------------------------------
I_END: ; ¬¥âª ª®æ ¯à®£à ¬¬ë