Buenas tardes
No se si me podéis ayudar estoy intentando sacar la temperatura en un lcd con 16f628a y un MAX 6675 en proteus sale todo perfecto, pero en la protoboard no me sale la temperatura este es el código en proton, alguna idea???
De ante mano gracias.
Device 16F628A
Declare Xtal 4
Declare LCD_DTPin PORTB.4
Declare LCD_RSPin PORTB.0
Declare LCD_ENPin PORTB.1
Declare LCD_Interface 4
Declare LCD_Lines 2
Symbol SO = PORTA.1
Symbol CS = PORTA.2
Symbol SCK = PORTA.3
Dim X As Word
Dim Y As Byte
loop:
Low CS
SHIn SO,SCK,0,[X\16]
High CS
Print $FE,$83,"TEMP"
Print $FE,$87,Dec X >> 5 ," C"
Y = X & %1000000000000000 >> 1
If Y <> 0 Then
Print $FE,$C3,"TC OPEN"
Else Print $FE,$C3,"MaxiBoost"
EndIf
DelayMS 250
GoTo loop
