Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. help_thread_start:
  2.         call    draw_help_wnd
  3.  
  4.   still_hw:
  5.         cmp     [main_closed],1
  6.         je      exit_hw
  7.         mcall   10
  8.         cmp     eax,1
  9.         je      help_thread_start
  10.         cmp     eax,2
  11.         je      key_hw
  12.         cmp     eax,3
  13.         je      button_hw
  14.         jmp     still_hw
  15.  
  16.   key_hw:
  17.         mcall   ;2
  18.         cmp     ah, 27
  19.         jne     still_hw
  20.  
  21.   button_hw:
  22.         mcall   17
  23.   exit_hw:
  24.         mcall   -1
  25.  
  26. func draw_help_wnd
  27.         mcall   12,1
  28.  
  29.         mcall   48,3,sc,sizeof.system_colors
  30.  
  31.         mov     ecx,[skinh]
  32.         add     ecx,200*65536+(5+10*2+16*10)
  33.         mov     edx,[sc.work]
  34.         or      edx,0x03000000
  35.         mcall   0,<200,10+10*2+help_text.maxl*6>
  36.  
  37.         mov     ebx,[skinh]
  38.         shr     ebx,1
  39.         adc     ebx,1+0x000A0000-4
  40.         mcall   4,,[sc.grab_text],help_title,help_title.size
  41.  
  42.         mov     eax,4
  43.         mov     ebx,[skinh]
  44.         add     ebx,0x000F000A
  45.         xor     ecx,ecx
  46.         mov     edx,help_text
  47.     @@: inc     edx
  48.         movzx   esi,byte[edx-1]
  49.         mcall
  50.         add     ebx,10
  51.         add     edx,esi
  52.         cmp     byte[edx],0
  53.         jne     @b
  54.  
  55.         mcall   12,2
  56.         ret
  57. endf