Advertisement
Guest User

Untitled

a guest
Oct 26th, 2016
67
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. dalumas:                            
  2.        mov ah, 09h                  
  3.        mov dx, offset originali
  4.        int 21h            
  5.        
  6.        mov al, byte ptr[input + si]
  7.        mov ah, 0                                                                                                        
  8.  
  9.        mov bx, 100d             ;Spausdiname originalia reiksme
  10.        mov dx,0h                ;daliname is simto,issaugome liekana (nes max 255)
  11.        div bx                            
  12.              
  13.        mov liek,dx              ;atspausdinu pirma skaitmeni
  14.        mov dl, al                            
  15.        add dl, '0'      
  16.        mov ah,02h
  17.        int 21h
  18.  
  19.        mov ax, liek             ;dalina is 10,issaugo liekana
  20.        mov bx, 10d        
  21.        mov dx,0h        
  22.        div bx                    
  23.              
  24.        mov liek,dx              ;spausdiname
  25.        mov dl, al    
  26.        add dl, '0'    
  27.        mov ah,02h
  28.        int 21h
  29.                          
  30.        mov dx, liek             ;spausdina paskutini skaitmeni
  31.        add dl, '0'
  32.        mov ah,02h
  33.        int 21h  
  34.        
  35.        mov ah, 09h                   ;enter
  36.        mov dx, offset enteris
  37.        int 21h      
  38.        
  39.        mov ah, 09h                  
  40.        mov dx, offset atlikus
  41.        int 21h  
  42.        
  43.        mov al, byte ptr[input + si]
  44.              
  45.        mov bl, 77                   ;vykdoma uzdavinio salyga
  46.        mul bl
  47.        add ax, 10d
  48.        
  49.    
  50.        mov bx, 10000d          
  51.        mov dx,0          
  52.        div bx                            
  53.              
  54.        mov liek,dx
  55.        mov dl, al     ;pirmas skaicius,saugomas ax (mazas, tai al)
  56.        add dl, '0'      ;konvertuojame i ascii
  57.        mov ah,02h
  58.        int 21h      
  59.                
  60.        mov ax, liek               ;daliname is 1000, issaugome liekana
  61.        mov bx, 1000d        
  62.        mov dx,0h          
  63.        div bx                    
  64.              
  65.        mov liek,dx                ;spausdiname
  66.        mov dl, al    
  67.        add dl, '0'    
  68.        mov ah,02h
  69.        int 21h
  70.        
  71.        mov ax, liek               ;daliname is 100, issaugome liekana
  72.        mov bx, 100d        
  73.        mov dx,0h        
  74.        div bx                            
  75.              
  76.        mov liek,dx                     ;spausdiname
  77.        mov dl, al    
  78.        add dl, '0'      
  79.        mov ah,02h
  80.        int 21h
  81.  
  82.        mov ax, liek                ;daliname is 10, issaugome liekana
  83.        mov bx, 10d        
  84.        mov dx,0h        
  85.        div bx                    
  86.              
  87.        mov liek,dx
  88.        mov dl, al                    ;spausdiname
  89.        add dl, '0'    
  90.        mov ah,02h
  91.        int 21h
  92.                          
  93.        mov dx, liek                  ;spausdiname, kas liko
  94.        add dl, '0'
  95.        mov ah,02h
  96.        int 21h
  97.  
  98.        
  99.        mov dl,32d                   ;tarpas
  100.       mov ah,02h
  101.        int 21h
  102.            
  103.        inc si  
  104.          
  105.     mov ah, 09h                  
  106.     mov dx, offset enteris
  107.     int 21h  
  108.    
  109.     dec cx
  110.     cmp cx, 0
  111.     je nebedalumas
  112.     jmp dalumas
  113.     nebedalumas:
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement