Bueno, intente, intente e intente incluso buscar en Anteojos... pero nada...
Gracias al amigo que tiro ideas...
Bueno, a los bifes, logre que funcione el ISIS pero como siempre remilgoso necesita ASM para funcionar... puede ser el Proton el problema... no tengo un debugger suficiente... pero al hecho concreto.
Antes de cada cambio de pin, hay que hacer TRISE=0, no se puede usar OUPUT porte.x y ni hablar de LOW o HIGH, siempre
tildan a ISIS.
Acá va un ejemplo de como me quedo. Por si a alguien mas le sirve... Exitos, hasta la victoria
DelayMS 1000 'DelayMS 500 : 'DelayMS 500
TRISE=0 '************* Misteriosamane necesario
@bcf LED3g ;Low LED3g
Print At 7,15, "Sleep " '
HSerOut ["Conejo[X=",Dec XAxis," Y=",Dec YAxis,"]", BIN TRISA,"-",BIN PORTA, 0X0D,0X0A] '
DelayMS 100 '@sleep USART no compatible con Sleep...
TRISE=0 '************* Misteriosamane necesario
@bsf LED3g ;High LED3g
GoSub PrintData '
If PushBT2=1 Then '
wVar=wVar + I2C_WREG 'No funciona la multiplicacion en WORDS
HBusIn I2C_CTRL, wVar,[Str RCstring]
Print At 0,0, Inverse 1, Rep 32\24
Print At 0,0, Inverse 0, HEX wVar/16,":", Str RCstring
EndIf
bADCreg=%11100001 'Control de canal, seleccion de puerto ADC
GoSub ADC99 'Aqui apunta a la rutina en ASM posteada antes
XAxis = wADC.HighByte 'Como es left justified, con el Byte Alto, sobra precision.
GoTo Pcheck