Subversion Repositories Kolibri OS

Rev

Rev 600 | Rev 1069 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 600 Rev 833
Line -... Line 1...
- 
 
 1 
; 24.07.2008  ®¡­®¢«¥­ Edit ¡®ªá
1 
; 01.02.07 - ®¡­®¢«ñ­ editbox
 2 
; 01.02.07 - ®¡­®¢«ñ­ editbox
2 
; 31.01.07 - ¨á¯à ¢«¥­  ­¥ª®àà¥ªâ­ ï ®âà¨á®¢ª  ¯à¨ ¡®«ì讬 §­ ç¥­¨¨ ¢ëá®âë ᪨­ 
 3 
; 31.01.07 - ¨á¯à ¢«¥­  ­¥ª®àà¥ªâ­ ï ®âà¨á®¢ª  ¯à¨ ¡®«ì讬 §­ ç¥­¨¨ ¢ëá®âë ᪨­ 
3 
;            ¢ëà ¢­¨¢ ­¨¥ á­¨§ã ®â­®á¨â¥«ì­® à ¡®ç¥© ®¡« á⨠íªà ­ 
 4 
;            ¢ëà ¢­¨¢ ­¨¥ á­¨§ã ®â­®á¨â¥«ì­® à ¡®ç¥© ®¡« á⨠íªà ­ 
4 
window_y=67
 5 
window_y=67
5 
;window_x=320
 6 
;window_x=320
Line 11... Line 12...
11 
include '../../../macros.inc'
 12 
include '../../../macros.inc'
12 
;include 'macros.inc'
 13 
;include 'macros.inc'
13 
include 'run.mac'
 14 
include 'run.mac'
14 
include 'lang.inc'
 15 
include 'lang.inc'
15 
        meos_app_start
 16 
        meos_app_start
16 
        use_edit_box procinfo,22,5
 17 
        use_edit_box
17 
        use_txt_button
 18 
        use_txt_button
18 
        code
 19 
        code
19 
        cmp     [par],byte 0
 20 
        cmp     [par],byte 0
20 
        jne     read_par
 21 
        jne     read_par
21 
        mcall   40,EVM_MOUSE+EVM_BUTTON+EVM_KEY+EVM_REDRAW
 22 
        mcall   40,EVM_MOUSE+EVM_BUTTON+EVM_KEY+EVM_REDRAW