Moc děkuju ale bohuzel bych to potreboval jeste trosicku upravit...ja mam synchronizační 255 potom mezera a hodnota 0 az 8 to je cislo serva pak zas mezera a je tu 3 byt a tem ma hodnotu 0 až 254...Tak jsem myslel že bych moh takhle upravit ten tvuj kod ale bohuzel to takhle nefaka..asi to bude tou mezerou mezi cislem serva a jeho nastavovaci hodnotou.
Jinak moc dik i za tohle řešeni.
kód:
If Ischarwaiting() = 1 Then
Prijaty_bajt = Inkey()
If Prijaty_bajt = 255 Then
Inputbin Servo(1) , 2 ' přijmi 8 bajtů a ulož do pole "Servo"
End If
End If
Select Case Servo(1)
Case 0 : Servo0 = Servo(2)
Case 1 : Servo1 = Servo(2)
Case 2 : Servo2 = Servo(2)
Case 3 : Servo3 = Servo(2)
End Select
Zdá se že kód zbytečně komplikuješ.
Předpokládám, že "mezera" při vysílání je časová prodleva, ne znak mezery (ascii 32).
Data tedy vypadají takto:
255 - cislo_serva - hodnota_serva - 255 - cislo_serva - hodnota_serva........
kód:
Dim Servo(8) As Byte
Dim Temp As Byte
Dim Cislo As Byte
Dim Hodnota As Byte
Enable Interrupts
Do
If Ischarwaiting() = 1 Then
Temp = Inkey()
If Temp = 255 Then
Inputbin Cislo
Inputbin Hodnota
Servo(cislo) = Hodnota
End If
End If
Loop
End
Pro časování serv použij hodnoty z pole "Servo()".
Časy uváděny v GMT + 1 hodina Jdi na stránku Předchozí1, 2
Strana 2 z 2
Nemůžete odesílat nové téma do tohoto fóra. Nemůžete odpovídat na témata v tomto fóru. Nemůžete upravovat své příspěvky v tomto fóru. Nemůžete mazat své příspěvky v tomto fóru. Nemůžete hlasovat v tomto fóru. Nemůžete připojovat soubory k příspěvkům Můžete stahovat a prohlížet přiložené soubory
Informace na portálu Elektro bastlírny jsou prezentovány za účelem vzdělání čtenářů a rozšíření zájmu o elektroniku. Autoři článků na serveru neberou žádnou zodpovědnost za škody vzniklé těmito zapojeními. Rovněž neberou žádnou odpovědnost za případnou újmu na zdraví vzniklou úrazem elektrickým proudem. Autoři a správci těchto stránek nepřejímají záruku za správnost zveřejněných materiálů. Předkládané informace a zapojení jsou zveřejněny bez ohledu na případné patenty třetích osob. Nároky na odškodnění na základě změn, chyb nebo vynechání jsou zásadně vyloučeny. Všechny registrované nebo jiné obchodní známky zde použité jsou majetkem jejich vlastníků. Uvedením nejsou zpochybněna z toho vyplývající vlastnická práva. Použití konstrukcí v rozporu se zákonem je přísně zakázáno. Vzhledem k tomu, že původ předkládaných materiálů nelze žádným způsobem dohledat, nelze je použít pro komerční účely! Tento nekomerční server nemá z uvedených zapojení či konstrukcí žádný zisk. Nezodpovídáme za pravost předkládaných materiálů třetími osobami a jejich původ. V případě, že zjistíte porušení autorského práva či jiné nesrovnalosti, kontaktujte administrátory na diskuzním fóru EB.