Advertisement
Guest User

Untitled

a guest
Nov 18th, 2019
126
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ;
  2.     cblock H'40'
  3.     ARGUMENT1
  4.     ARGUMENT2
  5.     WYNIK
  6.     endc
  7.  
  8.     ;//petla//
  9. PetlaGlowna
  10.    
  11.     ;/*movf ARGUMENT1,W
  12.     ;addwf ARGUMENT2,W
  13.     ;movwf WYNIK
  14.    
  15.     ;movf ARGUMENT2,W
  16.     ;subwf ARGUMENT1,W
  17.     ;movwf WYNIK*/
  18.    
  19.     movf ARGUMENT2,W
  20.     iorwf ARGUMENT1,W
  21.     movwf WYNIK
  22.    
  23.     movf ARGUMENT2,W
  24.     andwf ARGUMENT1,W
  25.     movwf WYNIK
  26.    
  27.     movf ARGUMENT2,W
  28.     xorwf ARGUMENT1,W
  29.     movwf WYNIK
  30.    
  31.    
  32.     goto PetlaGlowna
  33.     end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement