Inventory monitoring system..Need help in assembly

Discussion in 'Embedded Systems and Microcontrollers' started by daredavel, Feb 22, 2010.

  1. daredavel

    Thread Starter Member

    Feb 22, 2010
    32
    0
    hi guys! i've been making this project of mine in the past 3 weeks..i admit, i'm not good at assembly..may friend revise my original coding and now i'm having problem with it..[​IMG]..although its working..but its not finish yet.. I'm asking for all your help guys to finish the program..i would really appreciate it..

    About my project:

    The user will set how many sensors(maximum of 12 sensors-switch type) he/she will use with the push-buttons(inc, dec).. The 7segment will display the number of sensors used and number of tools missing(0 for non..1-12 for the number of missing)..every 5secs the display changes..showing both sensors used and number of tools missing..

    The leds shows if the sensors are active.. If the led is blinking, that means the tool is not placed or missing..if its in a standby lit, that means the tool is there and is detected by the sensor..

    I need help in:

    1) Buzzer sound - buzzer doesnt sound..and i dont know how to generate an alarm sound.

    2) Buzzer Delay - if the tools are taken from the sensor the buzzer will wait for 3mins to alarm..(in the unfinished program), once the tool is taken it automatically triggers the buzzer.

    3) Refresh Button - if the buzzer alarmed already, the refresh button will restart the delay before it alarm again. but the tool is returned to the sensor, it will terminate the buzzer.

    4) EEPROM - the setting of the user must be saved..and if the user will change the number of sensors to use..it will automatically save the setting..


    Here's my schematic guys:

    [​IMG]

    Here's my Codes and Proteus Simulation, so that you can see it in actual:
    http://www.mediafire.com/?g53yjemjnjt

    I hope you could help me guys! i would really appreciate it if someone could help me finish the program! i really need your help! [​IMG]
     
  2. BMorse

    Senior Member

    Sep 26, 2009
    2,675
    234
    can you post your code on here? I do not really like downloading content if I do not have to..... If you need help, I would suggest posting what you have on here, and you will get more responses that way.......

    My .02
     
  3. daredavel

    Thread Starter Member

    Feb 22, 2010
    32
    0
    Sure thing sir!

    Here's the code guys:

    Code ( (Unknown Language)):
    1.     LIST    P=16F877
    2.             #include <p16f877.inc>
    3.             RADIX    DEC
    4. ;--------------------------------------------------------------------
    5. ;            cpu equates (memory map)
    6.  
    7.         __CONFIG   _CP_OFF & _WDT_OFF & _PWRTE_ON & _HS_OSC
    8.  
    9. #define        LED00            movlw 0                    ;1st Digit LED
    10. #define        LED01            movlw 1                    ;2nd Digit LED
    11. #define        LED02            movlw 3                    ;3rd Digit LED
    12. #define        LED03            movlw 7                    ;4th Digit LED
    13. #define        LED04            movlw 15                    ;5th Digit LED
    14. #define        LED05            movlw 31                    ;6th Digit LED
    15. #define        LED06            movlw 63                    ;7th Digit LED
    16. #define        LED07            movlw 127                    ;8th Digit LED
    17. #define        LED08            movlw 255                ;9th Digit LED
    18. #define        LED09            movlw 1                    ;10th Digit LED
    19. #define        LED10            movlw 3                    ;11th Digit LED
    20. #define        LED11            movlw 7                    ;12th Digit LED
    21. #define        LED12            movlw 15                    ;13th Digit LED
    22.  
    23. #define        LED7100            movlw 63                    ;7-Segment '0'
    24. #define        LED7101            movlw 6                    ;7-Segment '1'
    25. #define        LED7102            movlw 91                    ;7-Segment '2'
    26. #define        LED7103            movlw 79                    ;7-Segment '3'
    27. #define        LED7104            movlw 102                    ;7-Segment '4'
    28. #define        LED7105            movlw 109                    ;7-Segment '5'
    29. #define        LED7106            movlw 125                    ;7-Segment '6'
    30. #define        LED7107            movlw 7                    ;7-Segment '7'
    31. #define        LED7108            movlw 127                    ;7-Segment '8'
    32. #define        LED7109            movlw 103                    ;7-Segment '9'
    33.  
    34. #define        LED7100D        movlw 63+128                ;7-Segment '0'
    35. #define        LED7101D            movlw 6+128                ;7-Segment '1'
    36. #define        LED7102D        movlw 91+128                ;7-Segment '2'
    37. #define        LED7103D        movlw 79+128                ;7-Segment '3'
    38. #define        LED7104D        movlw 102+128                ;7-Segment '4'
    39. #define        LED7105D        movlw 109+128                ;7-Segment '5'
    40. #define        LED7106D        movlw 125+128                ;7-Segment '6'
    41. #define        LED7107D        movlw 7+128                ;7-Segment '7'
    42. #define        LED7108D        movlw 127+128                ;7-Segment '8'
    43. #define        LED7109D        movlw 103+128
    44. #define        LED71Out            movwf PORTC                ;send data to PortC (1st 7-segment display)
    45.  
    46. #define        LED7200            movlw 63                    ;7-Segment '0'
    47. #define        LED7201            movlw 6                    ;7-Segment '1'
    48. #define        LED7202            movlw 91                    ;7-Segment '2'
    49. #define        LED7203            movlw 79                    ;7-Segment '3'
    50. #define        LED7204            movlw 102                    ;7-Segment '4'
    51. #define        LED7205            movlw 109                    ;7-Segment '5'
    52. #define        LED7206            movlw 125                    ;7-Segment '6'
    53. #define        LED7207            movlw 7                    ;7-Segment '7'
    54. #define        LED7208            movlw 127                    ;7-Segment '8'
    55. #define        LED7209            movlw 103                    ;7-Segment '9'
    56.  
    57. #define        LED7200D        movlw 63+128                ;7-Segment '0'
    58. #define        LED7201D        movlw 6+128                ;7-Segment '1'
    59. #define        LED7202D        movlw 91+128                ;7-Segment '2'
    60. #define        LED7203D        movlw 79+128                ;7-Segment '3'
    61. #define        LED7204D        movlw 102+128                ;7-Segment '4'
    62. #define        LED7205D        movlw 109+128                ;7-Segment '5'
    63. #define        LED7206D        movlw 125+128                ;7-Segment '6'
    64. #define        LED7207D        movlw 7+128                ;7-Segment '7'
    65. #define        LED7208D        movlw 127+128                ;7-Segment '8'
    66. #define        LED7209D        movlw 103+128
    67. #define        LED72Out        movwf PORTC                ;send data to PortC (2nd 7-segment display)
    68.  
    69. #define        LEDAOut            movwf    PORTC                ;send data to PortC (LEDs 1st half)
    70. #define        LEDBOut            movwf    PORTD                ;send data to PortD (LEDs 2nd half)
    71. #define        LEDSeq            movlw    B'110'                ;selector for LEDs
    72. #define        LED71Seq            movlw    b'011'                ;selector for 1st 7-segment display
    73. #define        LED72Seq        movlw    b'101'                ;selector for 2nd 7-segment display
    74. #define        LEDSeqOut        movwf    PORTE                ;send data to PortE (LEDs selector)
    75.    
    76. #define        Move_to_Storage1        movwf    STORAGE1            ;move data to COUNT1
    77. #define        Move_to_Storage2        movwf    STORAGE2            ;move data to COUNT2
    78. #define        Move_to_Storage3        movwf    STORAGE3            ;move data to COUNT3
    79. #define        Move_to_Storage4        movwf    STORAGE4            ;move data to COUNT4
    80.    
    81. #define        Move_to_Temp1        movwf    COUNT8
    82. #define        Move_to_Temp2        movwf    COUNT9
    83.  
    84. #define        Assign_to_Storage1        movf    STORAGE1,    W        ;assign temp data to COUNT1
    85. #define        Assign_to_Storage2        movf    STORAGE2,    W        ;assign temp data to COUNT2
    86. #define        Assign_to_Storage3        movf    STORAGE3,    W        ;assign temp data to COUNT3
    87. #define        Assign_to_Storage4        movf    STORAGE4,    W        ;assign temp data to COUNT4
    88.  
    89. #define        Clear_PORTA        clrf    PORTA                ;clear PORTA
    90. #define        Clear_PORTB        clrf    PORTB                ;clear PORTB
    91. #define        Clear_PORTC        clrf    PORTC                ;clear PORTC
    92. #define        Clear_PORTD        clrf    PORTD                ;clear PORTD
    93. #define        Clear_PORTE        clrf    PORTE                ;clear PORTE
    94.  
    95. #define        Clear_COUNT        clrf    COUNT                ;clear COUNT
    96. #define        Clear_HEXCOUNT1        clrf    HEXCOUNT1            ;clear HEXCOUNT1
    97. #define        Clear_HEXCOUNT2        clrf    HEXCOUNT2            ;clear HEXCOUNT2
    98. #define        Clear_BORROW        clrf    BORROW                ;clear BORROW
    99. #define        Clear_SENSOR1        clrf    SENSOR1                ;clear SENSOR1
    100. #define        Clear_SENSOR2        clrf    SENSOR2                ;clear SENSOR2
    101.  
    102. #define        Check_UP_Switch        call    Up_Switch
    103. #define        Check_DOWN_Switch    call    Down_Switch
    104. #define        Check_Refresh_Switch    call    Refresh_Switch
    105. #define        Check_Sensor        call    Sensor
    106. #define        Buzzer_ON        bsf    PORTA,    3
    107. #define        Buzzer_OFF        bcf    PORTA,    3
    108. #define        DelayRoute1        call    Delay1
    109. #define        DelayRoute4        call    Delay4
    110.  
    111. ;-----INITIALIZE PORTS-----------------
    112.     Clear_PORTA
    113.     Clear_PORTB
    114.     Clear_PORTC    
    115.     Clear_PORTD
    116.     Clear_PORTE
    117.    
    118.     Clear_COUNT
    119.     Clear_HEXCOUNT1
    120.     Clear_HEXCOUNT2    
    121.  
    122.     bcf    STATUS, RP1
    123.     Clear_PORTA
    124.     bsf    STATUS, RP0
    125.     movlw    0x06
    126.     movwf    ADCON1
    127.     movlw    b'000111'
    128.     movwf    TRISA
    129.     bcf     STATUS, RP0
    130.  
    131.     bsf    STATUS, RP0
    132.     movlw    B'11111111'
    133.     movwf    PORTB
    134.     bcf     STATUS, RP0    
    135.  
    136.     bsf    STATUS, RP0
    137.     movlw    B'00000000'
    138.     movwf    PORTC
    139.     bcf     STATUS, RP0
    140.  
    141.     bsf    STATUS, RP0
    142.     movlw    B'11110000'
    143.     movwf    PORTD
    144.     bcf     STATUS, RP0
    145.  
    146.     bcf    STATUS, RP1
    147.     Clear_PORTE
    148.     bsf    STATUS, RP0
    149.     movlw    0x06
    150.     movwf    ADCON1    
    151.     movlw    B'000'
    152.     movwf    TRISE
    153.     bcf     STATUS, RP0
    154.  
    155.  
    156. ;-----INITIALIZE 7 SEGMENT---------------
    157.     call    LED70
    158.     call    WRITE
    159.  
    160. ;----MAIN PROGRAM-------------------
    161. Repeat
    162.    
    163.     Check_UP_Switch                ;call    Up_Switch1
    164.     call    LED70
    165.     call    WRITE
    166.    
    167.     call    LEDS
    168.     call    WRITE
    169.    
    170.     Check_DOWN_Switch            ;call    Down_Switch2
    171.     call    LED70
    172.     call    WRITE
    173.  
    174.     call    LEDS
    175.     call    WRITE
    176.        
    177. ;    Check_Refresh_Switch            ;call    Refresh_Switch
    178.    
    179.     Check_Sensor                ;call    Sensor
    180.     call    LED70
    181.     call    WRITE
    182.    
    183.     call    LEDS
    184.     call    WRITE
    185.  
    186.     goto    Repeat
    187.  
    188. ;-----COUNT UP SWITCH---------------
    189. Up_Switch
    190.     DelayRoute4                ;call    Delay4
    191.     btfsc    PORTA, 0
    192.     retlw    0
    193.    
    194.     movf    COUNT, W
    195.     xorlw    12
    196.     btfsc    STATUS, 2
    197.     goto    Exit1
    198.     incf    COUNT
    199. Exit1
    200.     call    Convert
    201.     retlw    0
    202.  
    203. ;-----COUNT DOWN SWITCH-------------
    204. Down_Switch
    205.     DelayRoute4                ;call    Delay4
    206.     btfsc    PORTA, 1
    207.     retlw    0
    208.    
    209.     movf    COUNT, W
    210.     xorlw    0
    211.     btfsc    STATUS, 2
    212.     goto    Exit2
    213.     decf    COUNT
    214.  
    215. Exit2
    216.     call    Convert
    217.     retlw    0
    218.  
    219. ;-----Sensor-Switch----------------------------
    220. Sensor
    221. ;------------
    222. sensor00
    223.  
    224. CheckSensor1
    225.     movf    COUNT, W
    226.     xorlw    0
    227.     btfsc    STATUS, 2
    228.     goto    ResetSensor
    229.    
    230. BuzzerClear
    231.     Clear_BORROW
    232.     Clear_SENSOR1
    233.     Clear_SENSOR2
    234.     goto    sensor01
    235.  
    236. ResetSensor    
    237.     Clear_BORROW
    238.     Clear_SENSOR1
    239.     Clear_SENSOR2
    240.     Buzzer_OFF
    241.     retlw    0
    242.     ;-------------
    243. sensor01
    244.     Clear_BORROW
    245.     Clear_SENSOR1
    246.     Clear_SENSOR2
    247.    
    248.     DelayRoute4                ;call    Delay4
    249.     btfss    PORTB, 0
    250.     goto    sensor01a
    251.    
    252.     Buzzer_ON
    253.     movlw    1
    254.     addwf    BORROW,    F
    255.     movlw    1
    256.     addwf    SENSOR1,    F
    257.  
    258. sensor01a
    259.     movf    COUNT,    W
    260.     xorlw    1
    261.     btfsc    STATUS,    2
    262.     retlw    0
    263.  
    264.  
     
  4. daredavel

    Thread Starter Member

    Feb 22, 2010
    32
    0
    Code ( (Unknown Language)):
    1. ;---------------
    2. sensor02
    3.     DelayRoute4                ;call    Delay4
    4.     btfss    PORTB, 1
    5.     goto    sensor02a
    6.    
    7.     Buzzer_ON
    8.     movlw    1
    9.     addwf    BORROW,    F
    10.     movlw    2
    11.     addwf    SENSOR1,    F
    12.  
    13. sensor02a
    14.     movf    COUNT,    W
    15.     xorlw    2
    16.     btfsc    STATUS,    2
    17.     retlw    0
    18.  
    19. ;---------------------
    20. sensor03
    21.     DelayRoute4                ;call    Delay4
    22.     btfss    PORTB, 2
    23.     goto    sensor03a
    24.    
    25.     Buzzer_ON
    26.     movlw    1
    27.     addwf    BORROW,    F
    28.     movlw    4
    29.     addwf    SENSOR1,    F
    30.  
    31. sensor03a
    32.     movf    COUNT,    W
    33.     xorlw    3
    34.     btfsc    STATUS,    2
    35.     retlw    0
    36.  
    37. ;-------------------------
    38. sensor04
    39.     DelayRoute4                ;call    Delay4
    40.     btfss    PORTB, 3
    41.     goto    sensor04a
    42.    
    43.     Buzzer_ON
    44.     movlw    1
    45.     addwf    BORROW,    F
    46.     movlw    8
    47.     addwf    SENSOR1,    F
    48.  
    49. sensor04a
    50.     movf    COUNT,    W
    51.     xorlw    4
    52.     btfsc    STATUS,    2
    53.     retlw    0
    54.  
    55. ;--------------------
    56. sensor05
    57.     DelayRoute4                ;call    Delay4
    58.     btfss    PORTB, 4
    59.     goto    sensor05a
    60.    
    61.     Buzzer_ON
    62.     movlw    1
    63.     addwf    BORROW,    F
    64.     movlw    16
    65.     addwf    SENSOR1,    F
    66.  
    67. sensor05a
    68.     movf    COUNT,    W
    69.     xorlw    5
    70.     btfsc    STATUS,    2
    71.     retlw    0
    72.  
    73. ;-------------------
    74. sensor06
    75.     DelayRoute4                ;call    Delay4
    76.     btfss    PORTB, 5
    77.     goto    sensor06a
    78.    
    79.     Buzzer_ON
    80.     movlw    1
    81.     addwf    BORROW,    F
    82.     movlw    32
    83.     addwf    SENSOR1,    F
    84.  
    85. sensor06a
    86.     movf    COUNT,    W
    87.     xorlw    6
    88.     btfsc    STATUS,    2
    89.     retlw    0
    90.  
    91. ;---------------------
    92. sensor07
    93.     DelayRoute4                ;call    Delay4
    94.     btfss    PORTB, 6
    95.     goto    sensor07a
    96.    
    97.     Buzzer_ON
    98.     movlw    1
    99.     addwf    BORROW,    F
    100.     movlw    64
    101.     addwf    SENSOR1,    F
    102.    
    103. sensor07a
    104.     movf    COUNT,    W
    105.     xorlw    7
    106.     btfsc    STATUS,    2
    107.     retlw    0
    108.  
    109. ;----------------
    110. sensor08
    111.     DelayRoute4                ;call    Delay4
    112.     btfss    PORTB, 7
    113.     goto    sensor08a
    114.    
    115.     Buzzer_ON
    116.     movlw    1
    117.     addwf    BORROW,    F
    118.     movlw    128
    119.     addwf    SENSOR1,    F
    120.  
    121. sensor08a    
    122.     movf    COUNT,    W
    123.     xorlw    8
    124.     btfsc    STATUS,    2
    125.     retlw    0
    126.  
    127. ;---------------
    128. sensor09
    129.     DelayRoute4                ;call    Delay4
    130.     btfss    PORTD,    4
    131.     goto    sensor09a
    132.  
    133.     Buzzer_ON
    134.     movlw    1
    135.     addwf    BORROW,    F
    136.     movlw    1
    137.     addwf    SENSOR2,    F
    138.  
    139. sensor09a
    140.     movf    COUNT,    W
    141.     xorlw    9
    142.     btfsc    STATUS,    2
    143.     retlw    0
    144.  
    145. ;---------------
    146. sensor10
    147.     DelayRoute4                ;call    Delay4
    148.     btfss    PORTD, 5
    149.     goto    sensor10a
    150.    
    151.     Buzzer_ON
    152.     movlw    1
    153.     addwf    BORROW,    F
    154.     movlw    2
    155.     addwf    SENSOR2,    F
    156.  
    157. sensor10a
    158.     movf    COUNT,    W
    159.     xorlw    10
    160.     btfsc    STATUS,    2
    161.     retlw    0
    162.  
    163. ;---------------
    164. sensor11
    165.     DelayRoute4                ;call    Delay4
    166.     btfss    PORTD, 6
    167.     goto    sensor11a
    168.    
    169.     Buzzer_ON
    170.     movlw    1
    171.     addwf    BORROW,    F
    172.     movlw    4
    173.     addwf    SENSOR2,    F
    174.  
    175. sensor11a
    176.     movf    COUNT,    W
    177.     xorlw    11
    178.     btfsc    STATUS,    2
    179.     retlw    0
    180. ;    goto    sensor12
    181.  
    182. ;--------------
    183. sensor12
    184.     DelayRoute4                ;call    Delay4
    185.     btfss    PORTD, 7
    186.     goto    sensor12a
    187.    
    188.     Buzzer_ON
    189.     movlw    1
    190.     addwf    BORROW,    F
    191.     movlw    8
    192.     addwf    SENSOR2,    F
    193.  
    194. sensor12a
    195.     movf    COUNT,    W
    196.     xorlw    12
    197.     btfsc    STATUS,    2
    198.     retlw    0
    199.  
    200. ;--------REFRESH-SWITCH-------------------------
    201. Refresh_Switch
    202.  
    203.     retlw    0
    204.  
    205. ;-------7-SEGMENT-SELECTOR-DELAY----------------
    206. LED70
    207. subLED70a
    208.     movf    COUNT16,    W
    209.     xorlw    1
    210.     btfsc    STATUS,2
    211.     goto    subLED70b
    212.     goto    subLED70c
    213.    
    214. subLED70b
    215.     call    LED72
    216.     goto    subLED70A
    217.    
    218. subLED70c
    219.     movf    COUNT16,    W
    220.     xorlw    2
    221.     btfsc    STATUS,    2
    222.     clrf    COUNT16
    223.     call    LED71
    224.  
    225. subLED70A
    226.     movf    COUNT15,    W
    227.     xorlw    1
    228.     btfsc    STATUS,    2
    229.     goto    subLED70B
    230.     goto    subLED70C
    231.    
    232. subLED70B
    233.     clrf    COUNT15
    234.     incf    COUNT16,    F
    235.     goto    subLED70a
    236.    
    237. subLED70C    
    238.     movf    COUNT14,    W
    239.     xorlw    1
    240.     btfsc    STATUS,    2
    241.     goto    subLED70D
    242.     goto    subLED70E
    243.  
    244. subLED70D
    245.     clrf    COUNT14
    246.     incf    COUNT15,    F
    247.     goto    subLED70A
    248.  
    249. subLED70E
    250.     incf    COUNT13,    F
    251.     movf    COUNT13,    W
    252.     xorlw    100
    253.     btfsc    STATUS,    2
    254.     goto    subLED70F
    255.     retlw    0
    256.  
    257. subLED70F
    258.     clrf    COUNT13
    259.     incf    COUNT14,    F
    260.     goto    subLED70C
    261.    
    262. ;-------LED BLINKER-DELAY----------------
    263. LEDS
    264. subLEDSa
    265.     movf    COUNT20,    W
    266.     xorlw    1
    267.     btfsc    STATUS,2
    268.     goto    subLEDSb
    269.     goto    subLEDSc
    270.    
    271. subLEDSb
    272.     call    LED2
    273.     goto    subLEDSA
    274.    
    275. subLEDSc
    276.     movf    COUNT20,    W
    277.     xorlw    2
    278.     btfsc    STATUS,    2
    279.     clrf    COUNT20
    280.     call    LED1
    281.  
    282. subLEDSA
    283.     movf    COUNT19,    W
    284.     xorlw    1
    285.     btfsc    STATUS,    2
    286.     goto    subLEDSB
    287.     goto    subLEDSC
    288.    
    289. subLEDSB
    290.     clrf    COUNT19
    291.     incf    COUNT20,    F
    292.     goto    subLEDSa
    293.    
    294. subLEDSC    
    295.     movf    COUNT18,    W
    296.     xorlw    1
    297.     btfsc    STATUS,    2
    298.     goto    subLEDSD
    299.     goto    subLEDSE
    300.  
    301. subLEDSD
    302.     clrf    COUNT18
    303.     incf    COUNT19,    F
    304.     goto    subLEDSA
    305.  
    306. subLEDSE
    307.     incf    COUNT17,    F
    308.     movf    COUNT17,    W
    309.     xorlw    5
    310.     btfsc    STATUS,    2
    311.     goto    subLEDSF
    312.     retlw    0
    313.  
    314. subLEDSF
    315.     clrf    COUNT17
    316.     incf    COUNT18,    F
    317.     goto    subLEDSC
    318.  
    319.    
    320. ;-------7 SEGMENT DISPLAY SETTING & LEDs ---------------------------
    321.  
    322. LED71
    323.  
    324. ;---00-DISPLAY---------------------
    325. Step7100
    326.     movf    COUNT, W
    327.     xorlw    0
    328.     btfsc    STATUS, 2
    329.     goto    Step7100A
    330.     goto    Step7101
    331.    
    332. Step7100A
    333.     LED7100D                ;movlw    63
    334.     Move_to_Storage1                ;movwf    COUNT1
    335.    
    336.     LED7200                    ;movlw    63
    337.     Move_to_Storage2                ;movwf    COUNT2
    338.    
    339.     clrf    BORROW
    340.    
    341.     retlw    0
    342.  
    343. ;---01-DISPLAY---------------------
    344. Step7101
    345.     movf    COUNT, W
    346.     xorlw    1
    347.     btfsc    STATUS, 2
    348.     goto    Step7101A
    349.     goto    Step7102
    350.  
    351. Step7101A
    352.     LED7100D                ;movlw    63
    353.     Move_to_Storage1                ;movwf    COUNT1
    354.    
    355.     LED7201                    ;movlw    6
    356.     Move_to_Storage2                ;movwf    COUNT2
    357.  
    358.     retlw    0
    359.    
    360. ;---02-DISPLAY---------------------
    361. Step7102
    362.     movf    COUNT, W
    363.     xorlw    2
    364.     btfsc    STATUS, 2
    365.     goto    Step7102A
    366.     goto    Step7103
    367.  
    368. Step7102A
    369.     LED7100D                ;movlw    63
    370.     Move_to_Storage1                ;movwf    COUNT1
    371.    
    372.     LED7202                    ;movlw    91
    373.     Move_to_Storage2                ;movwf    COUNT2
    374.  
    375.     retlw    0
    376.  
    377. ;---03-DISPLAY---------------------
    378. Step7103
    379.  
    380.     movf    COUNT, W
    381.     xorlw    3
    382.     btfsc    STATUS, 2
    383.     goto    Step7103A
    384.     goto    Step7104
    385.  
    386. Step7103A
    387.     LED7100D                ;movlw    63
    388.     Move_to_Storage1                ;movwf    COUNT1
    389.    
    390.     LED7203                    ;movlw    79
    391.     Move_to_Storage2                ;movwf    COUNT2
    392.  
    393.     retlw    0
    394.  
    395. ;---04-DISPLAY---------------------
    396. Step7104
    397.     movf    COUNT, W
    398.     xorlw    4
    399.     btfsc    STATUS, 2
    400.     goto    Step7104A
    401.     goto    Step7105
    402.  
    403. Step7104A
    404.     LED7100D                ;movlw    63
    405.     Move_to_Storage1                ;movwf    COUNT1
    406.    
    407.     LED7204                    ;movlw    102
    408.     Move_to_Storage2                ;movwf    COUNT2
    409.  
    410.     retlw    0
    411.  
    412. ;---05-DISPLAY---------------------
    413. Step7105
    414.     movf    COUNT, W
    415.     xorlw    5
    416.     btfsc    STATUS, 2
    417.     goto    Step7105A
    418.     goto    Step7106
    419.    
    420. Step7105A
    421.     LED7100D                ;movlw    63
    422.     Move_to_Storage1                ;movwf    COUNT1
    423.    
    424.     LED7205                    ;movlw    109
    425.     Move_to_Storage2                ;movwf    COUNT2
    426.  
    427.     retlw    0
    428.  
    429. ;---06-DISPLAY---------------------
    430. Step7106
    431.     movf    COUNT, W
    432.     xorlw    6
    433.     btfsc    STATUS, 2
    434.     goto    Step7106A
    435.     goto    Step7107
    436.    
    437. Step7106A
    438.     LED7100D                ;movlw    63
    439.     Move_to_Storage1                ;movwf    COUNT1
    440.    
    441.     LED7206                    ;movlw    125
    442.     Move_to_Storage2                ;movwf    COUNT2
    443.  
    444.     retlw    0
    445.  
    446. ;---07-DISPLAY---------------------
    447. Step7107
    448.     movf    COUNT, W
    449.     xorlw    7
    450.     btfsc    STATUS, 2
    451.     goto    Step7107A
    452.     goto    Step7108
    453.    
    454. Step7107A
    455.     LED7100D                ;movlw    63
    456.     Move_to_Storage1                ;movwf    COUNT1
    457.    
    458.     LED7207                    ;movlw    7
    459.     Move_to_Storage2                ;movwf    COUNT2
    460.    
    461.     retlw    0
    462.  
    463. ;---08-DISPLAY---------------------
    464. Step7108
    465.     movf    COUNT, W
    466.     xorlw    8
    467.     btfsc    STATUS, 2
    468.     goto    Step7108A
    469.     goto    Step7109
    470.    
    471. Step7108A
    472.     LED7100D                ;movlw    63
    473.     Move_to_Storage1                ;movwf    COUNT1
    474.    
    475.     LED7208                    ;movlw    127
    476.     Move_to_Storage2                ;movwf    COUNT2
    477.  
    478.     retlw    0
    479.  
    480. ;---09-DISPLAY---------------------
    481. Step7109
    482.     movf    COUNT, W
    483.     xorlw    9
    484.     btfsc    STATUS, 2
    485.     goto    Step7109A
    486.     goto    Step7110
    487.    
    488. Step7109A
    489.     LED7100D                ;movlw    63
    490.     Move_to_Storage1                ;movwf    COUNT1
    491.    
    492.     LED7209                    ;movlw    103
    493.     Move_to_Storage2                ;movwf    COUNT2
    494.  
    495.     retlw    0
    496.  
    497. ;---10-DISPLAY---------------------
    498. Step7110
    499.     movf    COUNT, W
    500.     xorlw    10
    501.     btfsc    STATUS, 2
    502.     goto    Step7110A
    503.     goto    Step7111
    504.    
    505. Step7110A
    506.     LED7101D                    ;movlw    6
    507.     Move_to_Storage1                ;movwf    COUNT1
    508.    
    509.     LED7200                    ;movlw    63
    510.     Move_to_Storage2                ;movwf    COUNT2
    511.  
    512.     retlw    0
    513.  
    514. ;---11-DISPLAY---------------------
    515. Step7111
    516.     movf    COUNT, W
    517.     xorlw    11
    518.     btfsc    STATUS, 2
    519.     goto    Step7111A
    520.     goto    Step7112
    521.    
    522.  
     
  5. daredavel

    Thread Starter Member

    Feb 22, 2010
    32
    0
    Code ( (Unknown Language)):
    1. Step7111A
    2.     LED7101D                    ;movlw    6
    3.     Move_to_Storage1                ;movwf    COUNT1
    4.    
    5.     LED7201                    ;movlw    6
    6.     Move_to_Storage2                ;movwf    COUNT2
    7.  
    8.     retlw    0
    9.    
    10. ;---12-DISPLAY---------------------
    11. Step7112
    12.     movf    COUNT, W
    13.     xorlw    12
    14.     btfsc    STATUS, 2
    15.     goto    Step7112A
    16.     retlw    0
    17.    
    18. Step7112A
    19.     LED7101D                    ;movlw    6
    20.     Move_to_Storage1                ;movwf    COUNT1
    21.    
    22.     LED7202                    ;movlw    91
    23.     Move_to_Storage2                ;movwf    COUNT2
    24.  
    25.     retlw    0
    26.  
    27. ;-------7 SEGMENT DISPLAY PARTS MISSING & LEDs---------------------------
    28. LED72
    29.  
    30. ;---00-DISPLAY---------------------
    31. Step7200
    32.     ;movf    COUNT, W
    33.     movf    BORROW,    W
    34.     xorlw    0
    35.     btfsc    STATUS, 2
    36.     goto    Step7200A
    37.     goto    Step7201
    38.    
    39. Step7200A
    40.     LED7100                    ;movlw    63
    41.     Move_to_Storage1                ;movwf    COUNT1
    42.    
    43.     LED7200D                ;movlw    63
    44.     Move_to_Storage2                ;movwf    COUNT2
    45.  
    46.     clrf    BORROW
    47.    
    48.     retlw    0
    49.  
    50. ;---01-DISPLAY---------------------
    51. Step7201
    52.     ;movf    COUNT, W
    53.     movf    BORROW,    W
    54.     xorlw    1
    55.     btfsc    STATUS, 2
    56.     goto    Step7201A
    57.     goto    Step7202
    58.  
    59. Step7201A
    60.     LED7100                    ;movlw    63
    61.     Move_to_Storage1                ;movwf    COUNT1
    62.    
    63.     LED7201D                ;movlw    6
    64.     Move_to_Storage2                ;movwf    COUNT2
    65.  
    66.     retlw    0
    67.    
    68. Step7201B
    69.     LED7100                    ;movlw    63
    70.     Move_to_Storage1                ;movwf    COUNT1
    71.    
    72.     LED7201D                ;movlw    6
    73.     Move_to_Storage2                ;movwf    COUNT2
    74.  
    75.     retlw    0
    76.  
    77. ;---02-DISPLAY---------------------
    78. Step7202
    79.     ;movf    COUNT, W
    80.     movf    BORROW,    W
    81.     xorlw    2
    82.     btfsc    STATUS, 2
    83.     goto    Step7202A
    84.     goto    Step7203
    85.  
    86. Step7202A
    87.     LED7100                    ;movlw    63
    88.     Move_to_Storage1                ;movwf    COUNT1
    89.    
    90.     LED7202D                ;movlw    91
    91.     Move_to_Storage2                ;movwf    COUNT2
    92.  
    93.     retlw    0
    94.    
    95. Step7202B
    96.     LED7100                    ;movlw    63
    97.     Move_to_Storage1                ;movwf    COUNT1
    98.    
    99.     LED7202D                ;movlw    91
    100.     Move_to_Storage2                ;movwf    COUNT2
    101.  
    102.     retlw    0
    103.  
    104. ;---03-DISPLAY---------------------
    105. Step7203
    106.     ;movf    COUNT, W
    107.     movf    BORROW,    W
    108.     xorlw    3
    109.     btfsc    STATUS, 2
    110.     goto    Step7203A
    111.     goto    Step7204
    112.  
    113. Step7203A
    114.     LED7100                    ;movlw    63
    115.     Move_to_Storage1                ;movwf    COUNT1
    116.    
    117.     LED7203D                ;movlw    79
    118.     Move_to_Storage2                ;movwf    COUNT2
    119.  
    120.     retlw    0
    121.  
    122. Step7203B
    123.     LED7100                    ;movlw    63
    124.     Move_to_Storage1                ;movwf    COUNT1
    125.    
    126.     LED7203D                ;movlw    79
    127.     Move_to_Storage2                ;movwf    COUNT2
    128.  
    129.     retlw    0
    130.  
    131. ;---04-DISPLAY---------------------
    132. Step7204
    133.     ;movf    COUNT, W
    134.     movf    BORROW,    W
    135.     xorlw    4
    136.     btfsc    STATUS, 2
    137.     goto    Step7204A
    138.     goto    Step7205
    139.  
    140. Step7204A
    141.     LED7100                    ;movlw    63
    142.     Move_to_Storage1                ;movwf    COUNT1
    143.    
    144.     LED7204D                ;movlw    102
    145.     Move_to_Storage2                ;movwf    COUNT2
    146.  
    147.     retlw    0
    148.  
    149. Step7204B
    150.     LED7100                    ;movlw    63
    151.     Move_to_Storage1                ;movwf    COUNT1
    152.        
    153.     LED7204D                ;movlw    102
    154.     Move_to_Storage2                ;movwf    COUNT2
    155.  
    156.     retlw    0
    157.        
    158. ;---05-DISPLAY---------------------
    159. Step7205
    160.     ;movf    COUNT, W
    161.     movf    BORROW,    W
    162.     xorlw    5
    163.     btfsc    STATUS, 2
    164.     goto    Step7205A
    165.     goto    Step7206
    166.    
    167. Step7205A
    168.     LED7100                    ;movlw    63
    169.     Move_to_Storage1                ;movwf    COUNT1
    170.  
    171.     LED7205D                ;movlw    109
    172.     Move_to_Storage2                ;movwf    COUNT2
    173.  
    174.     retlw    0
    175.  
    176. Step7205B
    177.     LED7100                    ;movlw    63
    178.     Move_to_Storage1                ;movwf    COUNT1
    179.    
    180.     LED7205D                ;movlw    109
    181.     Move_to_Storage2                ;movwf    COUNT2
    182.  
    183.     retlw    0
    184.    
    185. ;---06-DISPLAY---------------------
    186. Step7206
    187.     ;movf    COUNT, W
    188.     movf    BORROW,    W
    189.     xorlw    6
    190.     btfsc    STATUS, 2
    191.     goto    Step7206A
    192.     goto    Step7207
    193.    
    194. Step7206A
    195.     LED7100                    ;movlw    63
    196.     Move_to_Storage1                ;movwf    COUNT1
    197.    
    198.     LED7206D                ;movlw    125
    199.     Move_to_Storage2                ;movwf    COUNT2
    200.  
    201.     retlw    0
    202.  
    203. Step7206B
    204.     LED7100                    ;movlw    63
    205.     Move_to_Storage1                ;movwf    COUNT1
    206.    
    207.     LED7206D                ;movlw    125
    208.     Move_to_Storage2                ;movwf    COUNT2
    209.  
    210.     retlw    0
    211.    
    212. ;---07-DISPLAY---------------------
    213. Step7207
    214.     ;movf    COUNT, W
    215.     movf    BORROW,    W
    216.     xorlw    7
    217.     btfsc    STATUS, 2
    218.     goto    Step7207A
    219.     goto    Step7208
    220.    
    221. Step7207A
    222.     LED7100                    ;movlw    63
    223.     Move_to_Storage1                ;movwf    COUNT1
    224.    
    225.     LED7207D                ;movlw    7
    226.     Move_to_Storage2                ;movwf    COUNT2
    227.  
    228.     retlw    0
    229.  
    230. Step7207B
    231.     LED7100                    ;movlw    63
    232.     Move_to_Storage1                ;movwf    COUNT1
    233.    
    234.     LED7207D                ;movlw    7
    235.     Move_to_Storage2                ;movwf    COUNT2
    236.  
    237.     retlw    0
    238.    
    239. ;---08-DISPLAY---------------------
    240. Step7208
    241.     ;movf    COUNT, W
    242.     movf    BORROW,    W
    243.     xorlw    8
    244.     btfsc    STATUS, 2
    245.     goto    Step7208A
    246.     goto    Step7209
    247.    
    248. Step7208A
    249.     LED7100                    ;movlw    63
    250.     Move_to_Storage1                ;movwf    COUNT1
    251.    
    252.     LED7208D                ;movlw    127
    253.     Move_to_Storage2                ;movwf    COUNT2
    254.  
    255.     retlw    0
    256.  
    257. Step7208B
    258.     LED7100                    ;movlw    63
    259.     Move_to_Storage1                ;movwf    COUNT1
    260.    
    261.     LED7208D                ;movlw    127
    262.     Move_to_Storage2                ;movwf    COUNT2
    263.  
    264.     retlw    0
    265.  
    266. ;---09-DISPLAY---------------------
    267. Step7209
    268.     ;movf    COUNT, W
    269.     movf    BORROW,    W
    270.     xorlw    9
    271.     btfsc    STATUS, 2
    272.     goto    Step7209A
    273.     goto    Step7210
    274.    
    275. Step7209A
    276.     LED7100                    ;movlw    63
    277.     Move_to_Storage1                ;movwf    COUNT1
    278.        
    279.     LED7209D                ;movlw    103
    280.     Move_to_Storage2                ;movwf    COUNT2
    281.  
    282.     retlw    0
    283.  
    284. Step7209B
    285.     LED7100                    ;movlw    63
    286.     Move_to_Storage1                ;movwf    COUNT1
    287.    
    288.     LED7209D                ;movlw    103
    289.     Move_to_Storage2                ;movwf    COUNT2
    290.  
    291.     retlw    0
    292.  
    293. ;---10-DISPLAY---------------------
    294. Step7210
    295.     ;movf    COUNT, W
    296.     movf    BORROW,    W
    297.     xorlw    10
    298.     btfsc    STATUS, 2
    299.     goto    Step7210A
    300.     goto    Step7211
    301.    
    302. Step7210A
    303.     LED7101                    ;movlw    6
    304.     Move_to_Storage1                ;movwf    COUNT1
    305.    
    306.     LED7200D                ;movlw    63
    307.     Move_to_Storage2                ;movwf    COUNT2
    308.  
    309.     retlw    0
    310.    
    311. Step7210B
    312.     LED7101                    ;movlw    6
    313.     Move_to_Storage1                ;movwf    COUNT1
    314.    
    315.     LED7200D                ;movlw    63
    316.     Move_to_Storage2                ;movwf    COUNT2
    317.  
    318.     retlw    0
    319.  
    320. ;---11-DISPLAY---------------------
    321. Step7211
    322.     ;movf    COUNT, W
    323.     movf    BORROW,    W
    324.     xorlw    11
    325.     btfsc    STATUS, 2
    326.     goto    Step7211A
    327.     goto    Step7212
    328.    
    329. Step7211A
    330.     LED7101                    ;movlw    6
    331.     Move_to_Storage1                ;movwf    COUNT1
    332.    
    333.     LED7201D                ;movlw    6
    334.     Move_to_Storage2                ;movwf    COUNT2
    335.  
    336.     retlw    0
    337.    
    338. Step7211B
    339.     LED7101                    ;movlw    6
    340.     Move_to_Storage1                ;movwf    COUNT1
    341.    
    342.     LED7201D                ;movlw    6
    343.     Move_to_Storage2                ;movwf    COUNT2
    344.    
    345.     retlw    0
    346.    
    347. ;---12-DISPLAY---------------------
    348. Step7212
    349.     ;movf    COUNT, W
    350.     movf    BORROW,    W
    351.     xorlw    12
    352.     btfsc    STATUS, 2
    353.     goto    Step7212A
    354.     retlw    0
    355.    
    356. Step7212A
    357.     LED7101                    ;movlw    6
    358.     Move_to_Storage1                ;movwf    COUNT1
    359.            
    360.     LED7202D                ;movlw    91
    361.     Move_to_Storage2                ;movwf    COUNT2
    362.    
    363.     retlw    0
    364.  
    365. Step7212B
    366.     LED7101                    ;movlw    6
    367.     Move_to_Storage1                ;movwf    COUNT1
    368.    
    369.     LED7202D                ;movlw    91
    370.     Move_to_Storage2                ;movwf    COUNT2
    371.    
    372.     retlw    0
    373.  
    374. ;-------LEDs ---------------------------
    375.  
    376. LED1
    377.  
    378.     movf    HEXCOUNT1,    W
    379.     Move_to_Storage3
    380.    
    381.     movf    HEXCOUNT2,    W
    382.     Move_to_Storage4
    383.  
    384.     retlw    0
    385.  
    386. ;-----------
    387. LED2
    388.  
    389.     movf    SENSOR1,    W
    390.     subwf    HEXCOUNT1,    W
    391.     Move_to_Storage3
    392.    
    393.     movf    SENSOR2,    W
    394.     subwf    HEXCOUNT2,    W
    395.     Move_to_Storage4
    396.  
    397.     retlw    0
    398.  
    399. ;----COUNT CONVERSION----------------
    400. Convert
    401.     clrf    HEXCOUNT1
    402.     clrf    HEXCOUNT2
    403.  
    404.     movf    COUNT,    W
    405.     xorlw    0
    406.     btfsc    STATUS,    2
    407.     goto    Convert0
    408.     goto    Next1
    409.  
    410. Convert0
    411.     movlw    0
    412.     movwf    HEXCOUNT1
    413.  
    414.     movlw    0
    415.     movwf    HEXCOUNT2
    416.     retlw    0
    417.  
    418. ;----------------
    419. Next1
    420.     movf    COUNT,    W
    421.     xorlw    1
    422.     btfsc    STATUS,    2
    423.     goto    Convert1
    424.     goto    Next2
    425.  
    426. Convert1
    427.     movlw    1
    428.     movwf    HEXCOUNT1
    429.  
    430.     movlw    0
    431.     movwf    HEXCOUNT2
    432.     retlw    0
    433.  
     
  6. daredavel

    Thread Starter Member

    Feb 22, 2010
    32
    0
    Code ( (Unknown Language)):
    1. Step7111A
    2.     LED7101D                    ;movlw    6
    3.     Move_to_Storage1                ;movwf    COUNT1
    4.    
    5.     LED7201                    ;movlw    6
    6.     Move_to_Storage2                ;movwf    COUNT2
    7.  
    8.     retlw    0
    9.    
    10. ;---12-DISPLAY---------------------
    11. Step7112
    12.     movf    COUNT, W
    13.     xorlw    12
    14.     btfsc    STATUS, 2
    15.     goto    Step7112A
    16.     retlw    0
    17.    
    18. Step7112A
    19.     LED7101D                    ;movlw    6
    20.     Move_to_Storage1                ;movwf    COUNT1
    21.    
    22.     LED7202                    ;movlw    91
    23.     Move_to_Storage2                ;movwf    COUNT2
    24.  
    25.     retlw    0
    26.  
    27. ;-------7 SEGMENT DISPLAY PARTS MISSING & LEDs---------------------------
    28. LED72
    29.  
    30. ;---00-DISPLAY---------------------
    31. Step7200
    32.     ;movf    COUNT, W
    33.     movf    BORROW,    W
    34.     xorlw    0
    35.     btfsc    STATUS, 2
    36.     goto    Step7200A
    37.     goto    Step7201
    38.    
    39. Step7200A
    40.     LED7100                    ;movlw    63
    41.     Move_to_Storage1                ;movwf    COUNT1
    42.    
    43.     LED7200D                ;movlw    63
    44.     Move_to_Storage2                ;movwf    COUNT2
    45.  
    46.     clrf    BORROW
    47.    
    48.     retlw    0
    49.  
    50. ;---01-DISPLAY---------------------
    51. Step7201
    52.     ;movf    COUNT, W
    53.     movf    BORROW,    W
    54.     xorlw    1
    55.     btfsc    STATUS, 2
    56.     goto    Step7201A
    57.     goto    Step7202
    58.  
    59. Step7201A
    60.     LED7100                    ;movlw    63
    61.     Move_to_Storage1                ;movwf    COUNT1
    62.    
    63.     LED7201D                ;movlw    6
    64.     Move_to_Storage2                ;movwf    COUNT2
    65.  
    66.     retlw    0
    67.    
    68. Step7201B
    69.     LED7100                    ;movlw    63
    70.     Move_to_Storage1                ;movwf    COUNT1
    71.    
    72.     LED7201D                ;movlw    6
    73.     Move_to_Storage2                ;movwf    COUNT2
    74.  
    75.     retlw    0
    76.  
    77. ;---02-DISPLAY---------------------
    78. Step7202
    79.     ;movf    COUNT, W
    80.     movf    BORROW,    W
    81.     xorlw    2
    82.     btfsc    STATUS, 2
    83.     goto    Step7202A
    84.     goto    Step7203
    85.  
    86. Step7202A
    87.     LED7100                    ;movlw    63
    88.     Move_to_Storage1                ;movwf    COUNT1
    89.    
    90.     LED7202D                ;movlw    91
    91.     Move_to_Storage2                ;movwf    COUNT2
    92.  
    93.     retlw    0
    94.    
    95. Step7202B
    96.     LED7100                    ;movlw    63
    97.     Move_to_Storage1                ;movwf    COUNT1
    98.    
    99.     LED7202D                ;movlw    91
    100.     Move_to_Storage2                ;movwf    COUNT2
    101.  
    102.     retlw    0
    103.  
    104. ;---03-DISPLAY---------------------
    105. Step7203
    106.     ;movf    COUNT, W
    107.     movf    BORROW,    W
    108.     xorlw    3
    109.     btfsc    STATUS, 2
    110.     goto    Step7203A
    111.     goto    Step7204
    112.  
    113. Step7203A
    114.     LED7100                    ;movlw    63
    115.     Move_to_Storage1                ;movwf    COUNT1
    116.    
    117.     LED7203D                ;movlw    79
    118.     Move_to_Storage2                ;movwf    COUNT2
    119.  
    120.     retlw    0
    121.  
    122. Step7203B
    123.     LED7100                    ;movlw    63
    124.     Move_to_Storage1                ;movwf    COUNT1
    125.    
    126.     LED7203D                ;movlw    79
    127.     Move_to_Storage2                ;movwf    COUNT2
    128.  
    129.     retlw    0
    130.  
    131. ;---04-DISPLAY---------------------
    132. Step7204
    133.     ;movf    COUNT, W
    134.     movf    BORROW,    W
    135.     xorlw    4
    136.     btfsc    STATUS, 2
    137.     goto    Step7204A
    138.     goto    Step7205
    139.  
    140. Step7204A
    141.     LED7100                    ;movlw    63
    142.     Move_to_Storage1                ;movwf    COUNT1
    143.    
    144.     LED7204D                ;movlw    102
    145.     Move_to_Storage2                ;movwf    COUNT2
    146.  
    147.     retlw    0
    148.  
    149. Step7204B
    150.     LED7100                    ;movlw    63
    151.     Move_to_Storage1                ;movwf    COUNT1
    152.        
    153.     LED7204D                ;movlw    102
    154.     Move_to_Storage2                ;movwf    COUNT2
    155.  
    156.     retlw    0
    157.        
    158. ;---05-DISPLAY---------------------
    159. Step7205
    160.     ;movf    COUNT, W
    161.     movf    BORROW,    W
    162.     xorlw    5
    163.     btfsc    STATUS, 2
    164.     goto    Step7205A
    165.     goto    Step7206
    166.    
    167. Step7205A
    168.     LED7100                    ;movlw    63
    169.     Move_to_Storage1                ;movwf    COUNT1
    170.  
    171.     LED7205D                ;movlw    109
    172.     Move_to_Storage2                ;movwf    COUNT2
    173.  
    174.     retlw    0
    175.  
    176. Step7205B
    177.     LED7100                    ;movlw    63
    178.     Move_to_Storage1                ;movwf    COUNT1
    179.    
    180.     LED7205D                ;movlw    109
    181.     Move_to_Storage2                ;movwf    COUNT2
    182.  
    183.     retlw    0
    184.    
    185. ;---06-DISPLAY---------------------
    186. Step7206
    187.     ;movf    COUNT, W
    188.     movf    BORROW,    W
    189.     xorlw    6
    190.     btfsc    STATUS, 2
    191.     goto    Step7206A
    192.     goto    Step7207
    193.    
    194. Step7206A
    195.     LED7100                    ;movlw    63
    196.     Move_to_Storage1                ;movwf    COUNT1
    197.    
    198.     LED7206D                ;movlw    125
    199.     Move_to_Storage2                ;movwf    COUNT2
    200.  
    201.     retlw    0
    202.  
    203. Step7206B
    204.     LED7100                    ;movlw    63
    205.     Move_to_Storage1                ;movwf    COUNT1
    206.    
    207.     LED7206D                ;movlw    125
    208.     Move_to_Storage2                ;movwf    COUNT2
    209.  
    210.     retlw    0
    211.    
    212. ;---07-DISPLAY---------------------
    213. Step7207
    214.     ;movf    COUNT, W
    215.     movf    BORROW,    W
    216.     xorlw    7
    217.     btfsc    STATUS, 2
    218.     goto    Step7207A
    219.     goto    Step7208
    220.    
    221. Step7207A
    222.     LED7100                    ;movlw    63
    223.     Move_to_Storage1                ;movwf    COUNT1
    224.    
    225.     LED7207D                ;movlw    7
    226.     Move_to_Storage2                ;movwf    COUNT2
    227.  
    228.     retlw    0
    229.  
    230. Step7207B
    231.     LED7100                    ;movlw    63
    232.     Move_to_Storage1                ;movwf    COUNT1
    233.    
    234.     LED7207D                ;movlw    7
    235.     Move_to_Storage2                ;movwf    COUNT2
    236.  
    237.     retlw    0
    238.    
    239. ;---08-DISPLAY---------------------
    240. Step7208
    241.     ;movf    COUNT, W
    242.     movf    BORROW,    W
    243.     xorlw    8
    244.     btfsc    STATUS, 2
    245.     goto    Step7208A
    246.     goto    Step7209
    247.    
    248. Step7208A
    249.     LED7100                    ;movlw    63
    250.     Move_to_Storage1                ;movwf    COUNT1
    251.    
    252.     LED7208D                ;movlw    127
    253.     Move_to_Storage2                ;movwf    COUNT2
    254.  
    255.     retlw    0
    256.  
    257. Step7208B
    258.     LED7100                    ;movlw    63
    259.     Move_to_Storage1                ;movwf    COUNT1
    260.    
    261.     LED7208D                ;movlw    127
    262.     Move_to_Storage2                ;movwf    COUNT2
    263.  
    264.     retlw    0
    265.  
    266. ;---09-DISPLAY---------------------
    267. Step7209
    268.     ;movf    COUNT, W
    269.     movf    BORROW,    W
    270.     xorlw    9
    271.     btfsc    STATUS, 2
    272.     goto    Step7209A
    273.     goto    Step7210
    274.    
    275. Step7209A
    276.     LED7100                    ;movlw    63
    277.     Move_to_Storage1                ;movwf    COUNT1
    278.        
    279.     LED7209D                ;movlw    103
    280.     Move_to_Storage2                ;movwf    COUNT2
    281.  
    282.     retlw    0
    283.  
    284. Step7209B
    285.     LED7100                    ;movlw    63
    286.     Move_to_Storage1                ;movwf    COUNT1
    287.    
    288.     LED7209D                ;movlw    103
    289.     Move_to_Storage2                ;movwf    COUNT2
    290.  
    291.     retlw    0
    292.  
    293. ;---10-DISPLAY---------------------
    294. Step7210
    295.     ;movf    COUNT, W
    296.     movf    BORROW,    W
    297.     xorlw    10
    298.     btfsc    STATUS, 2
    299.     goto    Step7210A
    300.     goto    Step7211
    301.    
    302. Step7210A
    303.     LED7101                    ;movlw    6
    304.     Move_to_Storage1                ;movwf    COUNT1
    305.    
    306.     LED7200D                ;movlw    63
    307.     Move_to_Storage2                ;movwf    COUNT2
    308.  
    309.     retlw    0
    310.    
    311. Step7210B
    312.     LED7101                    ;movlw    6
    313.     Move_to_Storage1                ;movwf    COUNT1
    314.    
    315.     LED7200D                ;movlw    63
    316.     Move_to_Storage2                ;movwf    COUNT2
    317.  
    318.     retlw    0
    319.  
    320. ;---11-DISPLAY---------------------
    321. Step7211
    322.     ;movf    COUNT, W
    323.     movf    BORROW,    W
    324.     xorlw    11
    325.     btfsc    STATUS, 2
    326.     goto    Step7211A
    327.     goto    Step7212
    328.    
    329. Step7211A
    330.     LED7101                    ;movlw    6
    331.     Move_to_Storage1                ;movwf    COUNT1
    332.    
    333.     LED7201D                ;movlw    6
    334.     Move_to_Storage2                ;movwf    COUNT2
    335.  
    336.     retlw    0
    337.    
    338. Step7211B
    339.     LED7101                    ;movlw    6
    340.     Move_to_Storage1                ;movwf    COUNT1
    341.    
    342.     LED7201D                ;movlw    6
    343.     Move_to_Storage2                ;movwf    COUNT2
    344.    
    345.     retlw    0
    346.    
    347. ;---12-DISPLAY---------------------
    348. Step7212
    349.     ;movf    COUNT, W
    350.     movf    BORROW,    W
    351.     xorlw    12
    352.     btfsc    STATUS, 2
    353.     goto    Step7212A
    354.     retlw    0
    355.    
    356. Step7212A
    357.     LED7101                    ;movlw    6
    358.     Move_to_Storage1                ;movwf    COUNT1
    359.            
    360.     LED7202D                ;movlw    91
    361.     Move_to_Storage2                ;movwf    COUNT2
    362.    
    363.     retlw    0
    364.  
    365. Step7212B
    366.     LED7101                    ;movlw    6
    367.     Move_to_Storage1                ;movwf    COUNT1
    368.    
    369.     LED7202D                ;movlw    91
    370.     Move_to_Storage2                ;movwf    COUNT2
    371.    
    372.     retlw    0
    373.  
    374. ;-------LEDs ---------------------------
    375.  
    376. LED1
    377.  
    378.     movf    HEXCOUNT1,    W
    379.     Move_to_Storage3
    380.    
    381.     movf    HEXCOUNT2,    W
    382.     Move_to_Storage4
    383.  
    384.     retlw    0
    385.  
    386. ;-----------
    387. LED2
    388.  
    389.     movf    SENSOR1,    W
    390.     subwf    HEXCOUNT1,    W
    391.     Move_to_Storage3
    392.    
    393.     movf    SENSOR2,    W
    394.     subwf    HEXCOUNT2,    W
    395.     Move_to_Storage4
    396.  
    397.     retlw    0
    398.  
    399. ;----COUNT CONVERSION----------------
    400. Convert
    401.     clrf    HEXCOUNT1
    402.     clrf    HEXCOUNT2
    403.  
    404.     movf    COUNT,    W
    405.     xorlw    0
    406.     btfsc    STATUS,    2
    407.     goto    Convert0
    408.     goto    Next1
    409.  
    410. Convert0
    411.     movlw    0
    412.     movwf    HEXCOUNT1
    413.  
    414.     movlw    0
    415.     movwf    HEXCOUNT2
    416.     retlw    0
    417.  
    418. ;----------------
    419. Next1
    420.     movf    COUNT,    W
    421.     xorlw    1
    422.     btfsc    STATUS,    2
    423.     goto    Convert1
    424.     goto    Next2
    425.  
    426. Convert1
    427.     movlw    1
    428.     movwf    HEXCOUNT1
    429.  
    430.     movlw    0
    431.     movwf    HEXCOUNT2
    432.     retlw    0
    433.  
    434. ;-----------------
    435. Next2
    436.     movf    COUNT,    W
    437.     xorlw    2
    438.     btfsc    STATUS,    2
    439.     goto    Convert2
    440.     goto    Next3
    441.  
    442. Convert2
    443.     movlw    3
    444.     movwf    HEXCOUNT1
    445.  
    446.     movlw    0
    447.     movwf    HEXCOUNT2
    448.     retlw    0
    449.  
    450. ;------
    451. Next3
    452.     movf    COUNT,    W
    453.     xorlw    3
    454.     btfsc    STATUS,    2
    455.     goto    Convert3
    456.     goto    Next4
    457.  
    458. Convert3
    459.     movlw    7
    460.     movwf    HEXCOUNT1
    461.  
    462.     movlw    0
    463.     movwf    HEXCOUNT2
    464.     retlw    0
    465.  
     
  7. daredavel

    Thread Starter Member

    Feb 22, 2010
    32
    0
    Code ( (Unknown Language)):
    1. ;-----------------
    2. Next2
    3.     movf    COUNT,    W
    4.     xorlw    2
    5.     btfsc    STATUS,    2
    6.     goto    Convert2
    7.     goto    Next3
    8.  
    9. Convert2
    10.     movlw    3
    11.     movwf    HEXCOUNT1
    12.  
    13.     movlw    0
    14.     movwf    HEXCOUNT2
    15.     retlw    0
    16. ;------
    17. Next3
    18.     movf    COUNT,    W
    19.     xorlw    3
    20.     btfsc    STATUS,    2
    21.     goto    Convert3
    22.     goto    Next4
    23.  
    24. Convert3
    25.     movlw    7
    26.     movwf    HEXCOUNT1
    27.  
    28.     movlw    0
    29.     movwf    HEXCOUNT2
    30.     retlw    0
    31. ;-----------------
    32. Next4
    33.     movf    COUNT,    W
    34.     xorlw    4
    35.     btfsc    STATUS,    2
    36.     goto    Convert4
    37.     goto    Next5
    38.  
    39. Convert4
    40.     movlw    15
    41.     movwf    HEXCOUNT1
    42.  
    43.     movlw    0
    44.     movwf    HEXCOUNT2
    45.     retlw    0
    46. ;---------------------
    47. Next5
    48.     movf    COUNT,    W
    49.     xorlw    5
    50.     btfsc    STATUS,    2
    51.     goto    Convert5
    52.     goto    Next6
    53.  
    54. Convert5
    55.     movlw    31
    56.     movwf    HEXCOUNT1
    57.  
    58.     movlw    0
    59.     movwf    HEXCOUNT2
    60.     retlw    0
    61. ;----------------------
    62. Next6
    63.     movf    COUNT,    W
    64.     xorlw    6
    65.     btfsc    STATUS,    2
    66.     goto    Convert6
    67.     goto    Next7
    68.  
    69. Convert6
    70.     movlw    63
    71.     movwf    HEXCOUNT1
    72.  
    73.     movlw    0
    74.     movwf    HEXCOUNT2
    75.     retlw    0
    76. ;----------------------
    77. Next7
    78.     movf    COUNT,    W
    79.     xorlw    7
    80.     btfsc    STATUS,    2
    81.     goto    Convert7
    82.     goto    Next8
    83.  
    84. Convert7
    85.     movlw    127
    86.     movwf    HEXCOUNT1
    87.  
    88.     movlw    0
    89.     movwf    HEXCOUNT2
    90.     retlw    0
    91. ;-----------------------
    92. Next8
    93.     movf    COUNT,    W
    94.     xorlw    8
    95.     btfsc    STATUS,    2
    96.     goto    Convert8
    97.     goto    Next9
    98.  
    99. Convert8
    100.     movlw    255
    101.     movwf    HEXCOUNT1
    102.  
    103.     movlw    0
    104.     movwf    HEXCOUNT2
    105.     retlw    0
    106. ;------------------
    107. Next9
    108.     movf    COUNT,    W
    109.     xorlw    9
    110.     btfsc    STATUS,    2
    111.     goto    Convert9
    112.     goto    Next10
    113.  
    114. Convert9
    115.     movlw    255
    116.     movwf    HEXCOUNT1
    117.  
    118.     movlw    1
    119.     movwf    HEXCOUNT2
    120.     retlw    0
    121. ;----------------------------------
    122. Next10
    123.     movf    COUNT,    W
    124.     xorlw    10
    125.     btfsc    STATUS,    2
    126.     goto    Convert10
    127.     goto    Next11
    128.  
    129. Convert10
    130.     movlw    255
    131.     movwf    HEXCOUNT1
    132.  
    133.     movlw    3
    134.     movwf    HEXCOUNT2
    135.     retlw    0
    136. ;--------------------
    137. Next11
    138.     movf    COUNT,    W
    139.     xorlw    11
    140.     btfsc    STATUS,    2
    141.     goto    Convert11
    142.     goto    Next12
    143.  
    144. Convert11
    145.     movlw    255
    146.     movwf    HEXCOUNT1
    147.  
    148.     movlw    7
    149.     movwf    HEXCOUNT2
    150.     retlw    0
    151. ;--------------------
    152. Next12
    153.     movf    COUNT,    W
    154.     xorlw    12
    155.     btfsc    STATUS,    2
    156.     goto    Convert12
    157.     retlw    0
    158.  
    159. Convert12
    160.     movlw    255
    161.     movwf    HEXCOUNT1
    162.  
    163.     movlw    15
    164.     movwf    HEXCOUNT2
    165.     retlw    0
    166.  
    167.  
    168. ;-----OUTPUT-DATA-TO-7-SEGMENT DISPLAY----------------------------------------
    169. WRITE
    170.     Clear_PORTC
    171.     LED71Seq
    172.     LEDSeqOut
    173.     Assign_to_Storage1            ;    movf    COUNT1, W
    174.     LED71Out
    175.     DelayRoute1            ;    call    Delay1
    176.    
    177.     Clear_PORTC
    178.     LED72Seq
    179.     LEDSeqOut
    180.     Assign_to_Storage2            ;    movf    COUNT2,    W
    181.     LED72Out
    182.     DelayRoute1            ;    call    Delay1
    183.    
    184.     Clear_PORTC
    185.     Clear_PORTD
    186.     LEDSeq
    187.     LEDSeqOut
    188.     Assign_to_Storage3            ;    movf    COUNT3,    W
    189.     LEDAOut
    190.     DelayRoute1            ;    call    Delay1
    191.  
    192.     Clear_PORTC
    193.     Clear_PORTD
    194.     LEDSeq
    195.     LEDSeqOut
    196.     Assign_to_Storage4            ;    movf    COUNT4,    W
    197.     LEDBOut
    198.     DelayRoute1            ;    call    Delay1
    199.  
    200.     retlw    0
    201.  
    202. ;-------DELAY1------------------------------------------------------------------------------------
    203. Delay1    
    204.  
    205.     movlw    1
    206.     movwf    COUNT10
    207.    
    208. Delay2    
    209.     movlw    15
    210.     movwf    COUNT11
    211.  
    212. Delay3
    213.     movlw    255
    214.     movwf    COUNT12
    215.  
    216. DelX    
    217.     decfsz    COUNT12, F
    218.     goto    DelX
    219.  
    220.     decfsz    COUNT11, F
    221.     goto    Delay3
    222.  
    223.     decfsz    COUNT10, F
    224.     goto    Delay2
    225.  
    226.     retlw    00
    227.  
    228. ;------DELAY4---------------------------------------------------------------------------------------
    229. Delay4
    230.     movlw    1
    231.     movwf    COUNT5
    232.    
    233. Delay5    
    234.     movlw    30
    235.     movwf    COUNT6
    236. Delay6
    237.     movlw    255
    238.     movwf    COUNT7
    239.  
    240. DelX2    
    241.     decfsz    COUNT7, F
    242.     goto    DelX2
    243.  
    244.     decfsz    COUNT6, F
    245.     goto    Delay6
    246.  
    247.     decfsz    COUNT5, F
    248.     goto    Delay5
    249.  
    250.     retlw    00
    251. ;-----------------------------------------------------------------------------------
    252.  
    253.         END                     ; directive 'end of program'
    254.  
    255. ;-----------------------------------------------------------------------------
    There you go guys..pls do help me guys! i really need all of your help!
     
Loading...