вака некако е тоа истото од погоре во асемблер
кај шо има точка запирка тоа ти е програмата во бејзик .. а другото е асемблер
5_led.mbas,17 :: if gpio.3 = 1 ' Ako se pritisni SHIFT kopceto site pinovi se vlezni
BTFSS GPIO+0, 3
GOTO L__main4
;12F675_led.mbas,18 :: then TRISIO = 1
MOVLW 1
MOVWF TRISIO+0
;12F675_led.mbas,19 :: if gpio.0 = 1 'Ako se pricni kopceto N odi napred
BTFSS GPIO+0, 0
GOTO L__main7
;12F675_led.mbas,20 :: then IzlezA = 1 IzlezC = 1
BSF GPIO+0, 0
BSF GPIO+0, 1
;12F675_led.mbas,21 :: Delay_ms(500)
MOVLW 3
MOVWF R11+0
MOVLW 138
MOVWF R12+0
MOVLW 85
MOVWF R13+0
L__main9:
DECFSZ R13+0, 1
GOTO L__main9
DECFSZ R12+0, 1
GOTO L__main9
DECFSZ R11+0, 1
GOTO L__main9
NOP
NOP
GOTO L__main8
;12F675_led.mbas,22 :: else TRISIO = 0 TRISIO.3 = 1 'ako ne se pritisni ostanuvaat isti
L__main7:
CLRF TRISIO+0
BSF TRISIO+0, 3
;12F675_led.mbas,23 :: Delay_ms(100)
MOVLW 130
MOVWF R12+0
MOVLW 221
MOVWF R13+0
L__main10:
DECFSZ R13+0, 1
GOTO L__main10
DECFSZ R12+0, 1
GOTO L__main10
NOP
NOP
;12F675_led.mbas,24 :: end if