WebSVN – Kolibri OS – Diff – /programs/network/nntpc/trunk/nntpc.asm

 ;;
 version equ '0.1'
 include "lang.inc"
-include "macros.inc"
+include "..\..\..\macros.inc"
     pusha
     mov  eax,53
     mov  ebx,6
     mov  ecx,[socket]
-    int  0x40
+    mcall
     cmp  eax,[prev_state]
     je   no_cos
     mov  [prev_state],eax
     mov  eax,13
     mov  ebx,435*65536+12*6
     mov  ecx,42*65536+10
     mov  edx,0xffffff
     mov  eax,4
     mov  ebx,435*65536+42
     mov  ecx,0x000000
     mov  esi,12
-    int  0x40
+    mcall
     mov  [edi],byte ' '
     call draw_entries
     mov  eax,10
-    int  0x40
+    mcall
     cmp  eax,2
     jne  no_more_text
     mov  eax,2
-    int  0x40
+    mcall
     mov  eax,53
     mov  ebx,7
     mov  ecx,[socket]
     mov  edx,[grouplen]
     mov  esi,group
-    int  0x40
+    mcall
     mov  [status],3
     call clear_text
     call save_coordinates
     mov  eax,53
     mov  ebx,7
     mov  ecx,[socket]
     mov  edx,[statlen] ; -stat
     mov  esi,stat
-    int  0x40
+    mcall
     mov  [status],5
     call save_coordinates
     ret
   no_4:
     mov  eax,53
     mov  ebx,7
     mov  ecx,[socket]
     mov  edx,articlelen-article
     mov  esi,article
-    int  0x40
+    mcall
     mov  [status],7
     call save_coordinates
     ret
   no_6:
     inc  [status]
     mov  eax,5
     mov  ebx,10
-    int  0x40
+    mcall
 START:                          ; start of execution
      mov  eax,40
      mov  ebx,10000111b
-     int  0x40
+     mcall
     call state_machine_write
     call state_machine_read
     mov  eax,23                 ; wait here for event
     mov  ebx,5
-    int  0x40
+    mcall
     cmp  eax,1                  ; redraw request ?
     je   red
     call draw_window
     jmp  still
   key:                          ; key
     mov  eax,2                  ; just read it and ignore
-    int  0x40
+    mcall
     cmp  ah,' '
     jne  no_space
     jmp  still
   button:                       ; button
     mov  eax,17                 ; get id
-    int  0x40
+    mcall
     cmp  eax,14
     jne  no_start
     call clear_text
     mov  eax,3
-    int  0x40
+    mcall
     mov  ecx,eax
     mov  eax,53
     mov  ebx,5
     mov  edx,119
     mov  esi,dword [server_ip]
     mov  edi,1
-    int  0x40
+    mcall
     mov  [socket],eax
     mov  [status],1
     jmp  still
     mov  eax,53
     mov  ebx,7
     mov  ecx,[socket]
     mov  edx,quitlen-quit
     mov  esi,quit
-    int  0x40
+    mcall
     mov  eax,5
     mov  ebx,10
-    int  0x40
+    mcall
     call check_for_incoming_data
     mov  eax,53
     mov  ebx,8
     mov  ecx,[socket]
-    int  0x40
+    mcall
     mov  eax,5
     mov  ebx,5
-    int  0x40
+    mcall
     mov  eax,53
     mov  ebx,8
     mov  ecx,[socket]
-    int  0x40
+    mcall
     mov  [status],0
     jmp  still
   no_end:
     cmp  eax,1                   ; button id=1 ?
     jne  noclose
     mov  eax,-1                 ; close this program
-    int  0x40
+    mcall
   noclose:
   go_on:
     mov  eax,53
     mov  ebx,2
     mov  ecx,[socket]
-    int  0x40
+    mcall
     cmp  eax,0
     je   ch_ret
     mov  eax,53
     mov  ebx,3
     mov  ecx,[socket]
-    int  0x40
+    mcall
   no_print:
     mov  eax,53
     mov  ebx,2
     mov  ecx,[socket]
-    int  0x40
+    mcall
     cmp  eax,0
     mov  [prev_state],-1
     mov  eax,12                    ; function 12:tell os about windowdraw
     mov  ebx,1                     ; 1, start of draw
-    int  0x40
+    mcall
                                    ; DRAW WINDOW
     mov  eax,0                     ; function 0 : define and draw window
-    mov  ebx,100*65536+520         ; [x start] *65536 + [x size]
-    mov  ecx,5*65536+470           ; [y start] *65536 + [y size]
+    mov  ebx,100*65536+520         ; [x start] *65536 + [x size]
-    mov  edx,0x03ffffff            ; color of work area RRGGBB,8->color gl
+    mov  ecx,5*65536+470           ; [y start] *65536 + [y size]
-    mov  esi,0x805080d0            ; color of grab bar  RRGGBB,8->color gl
+    mov  edx,0x13ffffff            ; color of work area RRGGBB,8->color gl
-    mov  edi,0x005080d0            ; color of frames    RRGGBB
+    mov  edi,title                 ; WINDOW LABEL
-    int  0x40
+    mcall
-    mov  eax,38
-    mov  ebx,5*65536+515
+    mov  eax,38
-    mov  ecx,101*65536+101
-    mov  edx,0x99bbff
+    mov  ebx,5*65536+515
-    int  0x40
+    mov  ecx,101*65536+101
-    mov  eax,38
+    mov  edx,0x99bbff
-    mov  ebx,5*65536+515
-    mov  ecx,102*65536+102
-    mov  edx,0x3366aa
-    int  0x40
-                                   ; WINDOW LABEL
-    mov  eax,4                     ; function 4 : write text to window
-    mov  ebx,8*65536+8             ; [x start] *65536 + [y start]
+    mcall
-    mov  ecx,0x10ddeeff            ; font 1 & color ( 0xF0RRGGBB )
+    mov  ecx,102*65536+102
-    mov  edx,labelt                ; pointer to text beginning
+    mov  edx,0x3366aa
-    mov  esi,labellen-labelt       ; text length
+    mcall
     int  0x40
-    mov  eax,8
-    mov  ebx,238*65536+8
-    mov  ecx,30*65536+8
+    mov  eax,8
-    mov  edx,11
+    mov  ebx,238*65536+8
-    mov  esi,0x88aadd
-    int  0x40
+    mov  ecx,30*65536+8
-    mov  eax,8
-    mov  ebx,238*65536+8
+    mov  edx,11
-    mov  ecx,41*65536+8
+    mov  esi,0x88aadd
-    mov  edx,12
+    mcall
-    int  0x40
-    mov  eax,8
+    mov  ecx,41*65536+8
-    mov  ebx,238*65536+8
+    mov  edx,12
-    mov  ecx,52*65536+8
+    mcall
-    mov  edx,13
-    int  0x40
+    mov  ecx,52*65536+8
     mov  edx,13
-    mov  eax,8
-    mov  ebx,265*65536+75
+    mcall
-    mov  ecx,39*65536+13
-    mov  edx,14
+    mov  ebx,265*65536+75
-    int  0x40
+    mov  ecx,39*65536+13
-    mov  eax,8
+    mov  edx,14
-    mov  ebx,351*65536+75
+    mcall
-    mov  ecx,39*65536+13
+    mov  ebx,351*65536+75
     mov  edx,15
-    int  0x40
+    mcall
     mov  eax,13
     mov  ebx,30*65536+200
     mov  ecx,30*65536+44
     mov  edx,0xffffff
+    mcall
     int  0x40
     mov  eax,4
     mov  ebx,30*65536+31           ; draw info text with function 4
     mov  ecx,0x000000
     mov  edx,text
-    mov  esi,66
-    mov  edi,6
+    mov  esi,66
-  newline2:
+    mov  edi,6
-    mov  eax,4
+  newline2:
-    int  0x40
+    mcall
     add  ebx,11
     add  edx,66
     pusha
     mov  eax,9
     mov  ebx,0x70000
     mov  ecx,-1
-    int  0x40
+    mcall
     mov  eax,[0x70000+46]
     div  ebx
     mov  edi,eax
     dec  edi
     mov  [space],edi
     mov  eax,4
     mov  ebx,20*65536+111           ; draw info text with function 4
     mov  ecx,0x000000
     mov  edx,[text_start]
     imul edx,80
     add  edx,nntp_text
-    mov  esi,80
+    mov  esi,80
   newline:
  newline:
     pusha
     mov  ecx,ebx
     shl  ecx,16
     mov  eax,13
     mov  ebx,20*65536+80*6
     mov  cx,10
     mov  edx,0xffffff
-    int  0x40
+    mcall
-    popa
     popa
     mov  eax,4
-    int  0x40
+    mcall
     add  ebx,10
  db 'Arrow left/rigth: fetch prev/next - Arrow up/down & space: scroll '
-textl:
+textl:
 labelt:
      db   'NNTP client v',version

Subversion Repositories Kolibri OS

(root)/programs/network/nntpc/trunk/nntpc.asm – Rev 109 → 485