Rysik писал(а): я бы понял а тут как бы +0 % к продвижению схемы Add(MainForm,2953706,105,119) { Width=545 Height=534 } Add(COMEX,4388831,350,329) { Port=7 Point(onDSR) Point(onCTS) Point(onDCD) Point(onRING) link(onSyncWrite,8083177:doText,[(415,335)(415,300)]) link(onSyncRead,8385189:doAdd,[]) link(onDSR,16742351:doEvent,[(416,356)(416,412)]) link(onCTS,2617667:doEvent,[(409,363)(409,454)]) link(onDCD,6022491:doEvent,[(401,370)(401,496)]) link(onRING,14131674:doEvent,[(394,377)(394,538)]) } Add(Memo,8385189,441,343) { Left=30 Top=15 Width=225 Height=360 } Add(Button,4534229,105,175) { Left=30 Top=390 TabOrder=-1 Caption="Com6" link(onClick,16641812:doEvent1,[]) } Add(Hub,16641812,175,175) { link(onEvent1,11441645:doOpen,[]) link(onEvent2,7693171:doTimer,[(210,188)(210,195)]) } Add(Timer,7693171,231,189) { Interval=2000 Enable=1 link(onTimer,2609663:doData,[]) } Add(DoData,2609663,287,189) { Data=String(1234567890) link(onEventData,11441645:doWrite,[]) } Add(Button,10660975,231,329) { Left=95 Top=390 TabOrder=-1 Caption="Com8" link(onClick,4388831:doOpen,[]) } Add(Button,13797935,231,364) { Left=95 Top=415 TabOrder=-1 Caption="Close" link(onClick,4388831:doClose,[(309,370)(309,342)]) } Add(Memo,4276976,476,189) { Left=265 Top=15 Width=225 Height=360 } Add(Button,14310842,231,399) { Left=95 Top=440 TabOrder=-1 Caption="Write" Data=String(0987654321) link(onClick,4388831:doWrite,[(323,405)(323,349)]) } Add(Label,8083177,441,294) { Left=290 Top=395 Caption="" AutoSize=1 } Add(Button,2196735,231,224) { Left=30 Top=440 TabOrder=-1 Caption="DTR" link(onClick,12553443:doSwitch,[]) } Add(Button,16560162,231,259) { Left=30 Top=465 TabOrder=-1 Caption="RTS" link(onClick,1060070:doSwitch,[]) } Add(Switch,12553443,287,224) { DataOn=Integer(1) DataOff=Integer(0) link(onSwitch,11441645:doDTR,[(363,230)(363,202)]) } Add(Switch,1060070,287,259) { DataOn=Integer(1) DataOff=Integer(0) link(onSwitch,11441645:doRTS,[(375,265)(375,209)]) } Add(COMEX,11441645,406,175) { Port=5 Point(onDSR) Point(onCTS) Point(onRING) Point(doDTR) Point(doRTS) link(onSyncRead,4276976:doAdd,[]) } Add(Label,8262668,105,224) { Left=295 Top=415 Width=27 Height=17 Caption="DSR" } Add(Label,8972716,112,231) { Left=340 Top=415 Width=25 Height=17 Caption="CTS" } Add(Label,5043200,119,238) { Left=435 Top=415 Width=15 Height=17 Caption="RI" } Add(LED,1658534,497,399) { Left=295 Top=440 } Add(LED,3008249,497,441) { Left=340 Top=440 } Add(LED,8212475,497,525) { Left=430 Top=440 } Add(IndexToChanel,16742351,441,406) { link(onEvent1,1658534:doOff,[]) link(onEvent2,1658534:doOn,[]) } Add(IndexToChanel,2617667,441,448) { link(onEvent1,3008249:doOff,[]) link(onEvent2,3008249:doOn,[]) } Add(IndexToChanel,14131674,441,532) { link(onEvent1,8212475:doOff,[]) link(onEvent2,8212475:doOn,[]) } Add(Label,3941013,126,245) { Left=385 Top=415 Width=27 Height=17 Caption="DCD" } Add(LED,13512637,497,483) { Left=385 Top=440 } Add(IndexToChanel,6022491,441,490) { link(onEvent1,13512637:doOff,[]) link(onEvent2,13512637:doOn,[]) } Add(Button,1388006,287,140) { Left=30 Top=415 TabOrder=-1 Caption="Close" link(onClick,11441645:doClose,[(363,146)(363,188)]) }
Как подключаться к выходам DTR и RTS ищи в гугле.
|