Subversion Repositories Kolibri OS

Rev

Rev 255 | Rev 6357 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. ;------------------------------------------
  2. ;-------------KEYS-------------------------
  3. ;------------------------------------------
  4.    keys:
  5.  
  6.    mov eax,2
  7.    mcall
  8.    shr eax,8
  9.  
  10.    cmp eax,176
  11.    jne key2
  12.    sub [PosX],20
  13.    jmp change_screen
  14.  key2:
  15.    cmp eax,179
  16.    jne key3
  17.    add [PosX],20
  18.    jmp change_screen
  19.  key3:
  20.    cmp eax,177
  21.    jne key4
  22.    add [PosY],20
  23.    jmp change_screen
  24.  key4:
  25.   cmp eax,178
  26.    jne key5
  27.    sub [PosY],20
  28.    jmp change_screen
  29.  key5:
  30.    cmp eax,49
  31.    jne key6
  32.    mov [k],1
  33.    mov [Scroll1CoordinatX],9
  34.    mov [Scroll2CoordinatY],89
  35.    call drawwin
  36.    jmp change_screen
  37.  key6:
  38.    cmp eax,50
  39.    jne key7
  40.    mov [k],2
  41.    mov [Scroll1CoordinatX],9
  42.    mov [Scroll2CoordinatY],89
  43.    call drawwin
  44.    jmp change_screen
  45.  key7:
  46.    cmp eax,52
  47.    jne key8
  48.    mov [k],4
  49.    mov [Scroll1CoordinatX],9
  50.    mov [Scroll2CoordinatY],89
  51.    call drawwin
  52.    jmp change_screen
  53.  key8:
  54.    cmp eax,56
  55.    jne key9
  56.    mov [k],8
  57.    mov [Scroll1CoordinatX],9
  58.    mov [Scroll2CoordinatY],89
  59.    call drawwin
  60.    jmp change_screen
  61.  key9:
  62.    cmp eax,48
  63.    jne key10
  64.    mov [k],16
  65.    mov [Scroll1CoordinatX],9
  66.    mov [Scroll2CoordinatY],89
  67.    call drawwin
  68.    jmp change_screen
  69.  key10:
  70.    cmp eax,255
  71.    jne key11
  72.    call analizing_picture_to_palette
  73.    call drawwin
  74.    jmp change_screen
  75.  key11:
  76.    cmp eax,27
  77.    jne still
  78.  
  79.     mov eax,CursorsID
  80.     call delete_cursors
  81.  
  82.     mov eax,-1
  83.     mcall
  84.  
  85.    jmp still
  86.  
  87.    change_screen:
  88.  
  89.    call CalculatePositionScreen
  90.    call MovePictureToWorkScreen
  91.    call draw_scrollers
  92.    call PrintMousePos
  93.  
  94.    jmp still