Ув. администраторы, перенесите пожалуйста эту тему в раздел "Proton PicBasic", я извиняюсь, как то опрометчиво создал тему не там где ей место. Вот такого вида код:
Device 16F628A
Declare Xtal 4
Config BODEN_OFF, PWRTE_ON, WDT_OFF, lvp_off, MCLRE_OFF, INTRC_OSC_NOCLKOUT, CP_OFF, DATA_CP_OFF
Include "modedefs.bas"
Dim I As Byte
Dim C As Byte
Dim line1[16] As Byte 'Байт
Dim line2[16] As Byte 'Байт
Dim var0 As Byte 'Байт
Dim L As Byte 'Байт
Dim BAYT As Byte
'Dim OUTBUF[8] As Byte
Dim INBUF[96] As Byte
TRISB = %01000000
TRISA = %00000000
PortB_Pullups 1
All_Digital 1
loop:
For I = 0 To 95
SerIn PORTB.6, T9600, 500, sub1, [BAYT]
INBUF[I] = BAYT
Next I
sub1:
For I=0 to 15
line1[I]=inbuf[I]
next
print at 1,1, str line1
for i=0 to 15
line2[i]=inbuf[i + 16]
next
print at 2,1, str line2
При выводе не 2-х строчный индикатор, 2-я строка (от начала) должна выглядеть вот так "On-line:" (без кавычек), НО, после двоеточия сыпятся еще какие то каракули, я так понимаю из приемного буфера, подтянул (помимо внутренней подтяжки) сначала к + через 4.7 кОма, на одну каракулю стало меньше, подтянул к минусу через такой же номинал, тоже самое, причем системы в этом наборе символов нет, иногда совпадают после выключения иногда нет, после двоеточия рандомайз сплошной, как с этим бороться, подскажите?
