Program ne iş yapar

[ikibacaklı]

AŞAĞIDA VERDİĞİM PROGRAM NE İŞE YARIYOR HİÇ STL KULLANMADIĞIM İÇİN ANLAYAMADIM, YARDIM EDEBİLİRMİSİNİZ

 

[ibora]

Programı text olarak kopyalayıp buraya yapıştırın. Şu an işteyim ama akşama boş kaldığımda yazarım nasıl çalıştığını

 

[ikibacaklı]

Programı text olarak kopyalayıp buraya yapıştırın. Şu an işteyim ama akşama boş kaldığımda yazarım nasıl çalıştığını

SET 

      SAVE

      =     L     22.1

      A     M      0.2

      NOT 

      L     S5T#1S

      =     L     22.2

      LAR1

      AD    DW#16#F

      L     DW#16#9

      >D   

      JC    M001

      L     DW#16#4

      TAR1

      SRD 

      AD    DW#16#F

      L     DW#16#9

      >D   

      JC    M001

      L     DW#16#8

      TAR1

      SRD 

      AD    DW#16#F

      L     DW#16#9

      >D   

      JC    M001

      L     DW#16#C

      TAR1

      SRD 

      AD    DW#16#F

      L     DW#16#3

      >D   

      JC    M001

      JU    M002

M001: CLR 

      =     L     22.1

M002: TAR1

      CLR 

      A     L     22.2

      A     L     22.1

      SD    T      0

      CLR 

      R     T      0

      LC    T      0

      T     #TEMP1

      A     T      0

      =     M      0.2

      UC    FC     1

      UC    FC     2

      UC    FC     3

      UC    FC     4

      UC    FC     5

      UC    FC     6

      UC    FC     8

      UC    FC     9

      UC    FC    10

      A     L     22.1

      SAVE

      BE