|
ｿｽ@ｿｽｿｽMScommｿｽﾌ趣ｿｽMｿｽﾒゑｿｽLoopｿｽｿｽｿｽﾌエｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉは？
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽfｿｽsｿｽa 2006/03/15(ｿｽｿｽ) 16:45:13
ｿｽ@ｿｽｿｽﾆの通信ｿｽｿｽMSCommｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽgｿｽpｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾌ難ｿｽeｿｽﾍ、ｿｽ@ｿｽがｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽIDｿｽiｿｽlｿｽjｿｽｿｽﾇみ出ｿｽｿｽｿｽｿｽｿｽﾟゑｿｽ
ｿｽｿｽｿｽｿｽｿｽ轤ｩｿｽｿｽRｿｽ}ｿｽｿｽｿｽhｿｽ送ゑｿｽAｿｽ@ｿｽがｿｽﾔゑｿｽｿｽlｿｽｿｽけゑｿｽｿｽﾌでゑｿｽｿｽB
ｿｽｿｽｿｽﾌ値ｿｽﾍズｿｽｿｽｿｽYｿｽｿｽｿｽﾆ返ゑｿｽｿｽﾄ暦ｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽ@ｿｽｿｽﾉゑｿｽｿｽｿｽﾄ、ｿｽｿｽｿｽｿｽｿｽiｿｽｿｽｿｽｿｽｿｽｿｽｿｽjｿｽｿｽ
ｿｽｿｽｿｽﾌ趣ｿｽｿｽﾔゑｿｽﾙなゑｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌゑｿｽｿｽﾟ、InBufferCountｿｽﾅ一律ｿｽﾉ規ｿｽｿｽoｿｽｿｽｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽﾈ会ｿｽｿｽﾌようｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽxｿｽｿｽｿｽﾔゑｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽ闕橸ｿｽﾞようｿｽﾉゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾈゑｿｽｿｽARThreshold=1ｿｽﾉゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
(1)'ｿｽｿｽMｿｽﾜゑｿｽｿｽﾍタｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽﾜで待ゑｿｽ
ｿｽ@Do While timCommOut.Enabled = True: DoEvents: Loop .....(a)
ｿｽ@If bgTimeOut = False Then 'ｿｽｿｽMｿｽﾈゑｿｽ
ｿｽ@ｿｽF
ｿｽ@ｿｽF(ｿｽｿｽｿｽﾌ鯉ｿｽﾌ擾ｿｽｿｽｿｽ)
(2)OnComｿｽCｿｽxｿｽｿｽｿｽgｿｽﾉゑｿｽ
ｿｽ@Private Sub MSComm1_OnComm()
ｿｽ@ Select Case MSComm1.CommEvent
ｿｽ@ :
ｿｽ@Case comEvReceive
ｿｽ@ timInterval.Enabled = True
ｿｽ@ bgTimePass = False
ｿｽ@ Do While bgTimePass = False: DoEvents: Loop .....(b)
ｿｽ@ sBuf = MSComm1.Input
ｿｽ@ sgCommGet = sgCommGet & sBuf
ｿｽ@ :
ｿｽ@ :ｿｽiｿｽｿｽｿｽｿｽｿｽj
ｿｽ@timCommOut.Enabled = False
ｿｽ@bgTimeOut = False
ｿｽ@End Select
ｿｽ@sgCommGet = ""
ｿｽ@End Sub
(3)ｿｽeｿｽ^ｿｽCｿｽ}ｿｽ[
ｿｽ@Private Sub timCommOut_Timer()
ｿｽ@ timCommOut.Enabled = False
ｿｽ@ bgTimeOut = True
ｿｽ@End Sub
----------
ｿｽ@Private Sub timInterval_Timer()
ｿｽ@ timInterval.Enabled = False
ｿｽ@ bgTimePass = True
ｿｽ@End Sub
ｿｽｿｽｿｽｿｽｿｽVBｿｽｿｽﾅ托ｿｽｿｽ轤ｹｿｽｿｽﾆ、ｿｽｿｽL(b)ｿｽｿｽ DoEvents ｿｽｿｽ
ｿｽuｿｽｿｽｿｽsｿｽｿｽｿｽGｿｽｿｽｿｽ['28'ｿｽFｿｽXｿｽ^ｿｽbｿｽNｿｽﾌ域がｿｽsｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBｿｽv
ｿｽｿｽｿｽoｿｽﾄ止ｿｽﾜゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌ擾ｿｽﾔで、F5ｿｽｿｽｿｽｿｽｿｽｿｽiｿｽpｿｽｿｽｿｽｿｽｿｽｿｽjｿｽﾆ厄ｿｽｿｽｿｽｿｽﾉ最鯉ｿｽﾜで行ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌ厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽAｿｽｿｽｿｽｿｽｿｽｿｽﾍ托ｿｽｿｽﾌ包ｿｽｿｽ@ｿｽｿｽｿｽﾇゑｿｽｿｽｿｽAｿｽﾆゑｿｽｿｽｿｽｿｽｿｽﾎゑｿｽｿｽwｿｽｿｽｿｽA
ｿｽAｿｽhｿｽoｿｽCｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ擾ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽsｿｽｿｽｿｽl 2006/03/15(ｿｽｿｽ) 17:21:52
DoEventsｿｽｿｽｿｽｿｽsｿｽｿｽｿｽｿｽﾆ、ｿｽｿｽｿｽﾌ趣ｿｽｿｽ_ｿｽﾅイｿｽxｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽ鼾ｿｽAｿｽｿｽｿｽｿｽｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽｿｽﾚゑｿｽﾜゑｿｽｿｽB
comEvReceiveｿｽCｿｽxｿｽｿｽｿｽgｿｽﾍ、Inputｿｽｿｽｿｽｿｽﾜで費ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾂまゑｿｽAｿｽｿｽｿｽｿｽﾌ場合ｿｽｿｽMSComm1_OnCommｿｽｿｽｿｽｿｽｿｽｿｽｿｽrｿｽｿｽｿｽﾅ会ｿｽｿｽxｿｽｿｽﾄばゑｿｽAｿｽXｿｽ^ｿｽbｿｽNｿｽﾌ茨ｿｽｿｽHｿｽｿｽｿｽﾂぶゑｿｽｿｽｿｽｿｽﾟに趣ｿｽｿｽsｿｽｿｽｿｽGｿｽｿｽｿｽ[28ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌｿｽｿｽWｿｽbｿｽNｿｽﾌままゑｿｽｿｽｿｽｿｽﾈゑｿｽAｿｽｿｽMｿｽfｿｽ[ｿｽ^ｿｽﾍ難ｿｽｿｽｿｽoｿｽbｿｽtｿｽ@ｿｽﾉ蓄ｿｽｿｽｿｽﾈゑｿｽｿｽｿｽ(Inputｿｽｿｽｿｽﾄ趣ｿｽMｿｽoｿｽbｿｽtｿｽ@ｿｽｿｽNｿｽｿｽｿｽAｿｽｿｽｿｽﾂゑｿｽ)ｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽﾒつ包ｿｽｿｽｿｽｿｽﾉなゑｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾊはゑｿｽｿｽﾌようｿｽﾈ趣ｿｽｿｽﾔで趣ｿｽMｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽ闖ｿｽﾍ行ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽ@ｿｽ側ｿｽﾌ仕ｿｽlｿｽﾉ托ｿｽｿｽMｿｽｿｽｿｽｿｽｿｽﾌ目茨ｿｽ(EOFｿｽｿｽ)ｿｽﾍ厄ｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽBｿｽｿｽｿｽﾊはゑｿｽｿｽﾌ目茨ｿｽｿｽPｿｽｿｽﾌ趣ｿｽMｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾄ擾ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾐでゑｿｽｿｽ 2006/03/15(ｿｽｿｽ) 17:57:04
ｿｽﾅ具ｿｽMSCommｿｽgｿｽpｿｽｿｽｿｽﾄなゑｿｽｿｽﾌで、ｿｽｿｽzｿｽﾌｿｽｿｽxｿｽｿｽｿｽﾅゑｿｽｿｽｿｽ
OnCommｿｽCｿｽxｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾔ隔ｿｽｿｽZｿｽoｿｽｿｽｿｽｿｽlｿｽﾉゑｿｽｿｽｿｽ
ｿｽfｿｽ[ｿｽ^ｿｽﾌ具ｿｽﾘゑｿｽ判断ｿｽｿｽｿｽﾄはどゑｿｽｿｽｿｽｿｽうｿｽH
ｿｽ痰ｦｿｽｿｽ100msｿｽﾈ擾ｿｽﾔ隔ｿｽｿｽｿｽJｿｽｿｽｿｽｿｽｿｽｿｽfｿｽ[ｿｽ^ｿｽｿｽﾘゑｿｽﾆゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽAｿｽsｿｽｿｽｿｽlｿｽｿｽｿｽが鯉ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽlｿｽﾉ包ｿｽｿｽﾊは終ｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽfｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾈ気ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽ范ｴｿｽ@ｿｽｿｽｿｽｿｽ 2006/03/15(ｿｽｿｽ) 21:27:02
>ｿｽｿｽｿｽﾌゑｿｽｿｽﾟ、InBufferCountｿｽﾅ一律ｿｽﾉ規ｿｽｿｽoｿｽｿｽｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽﾈ会ｿｽｿｽﾌようｿｽｿｽ
>ｿｽｿｽｿｽｿｽｿｽｿｽxｿｽｿｽｿｽﾔゑｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽ闕橸ｿｽﾞようｿｽﾉゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾈゑｿｽｿｽHｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ痰｢ｿｽｿｽｿｽｿｽｿｽｿｽﾌでは。
>ｿｽｿｽｿｽﾌ厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽAｿｽｿｽｿｽｿｽｿｽｿｽﾍ托ｿｽｿｽﾌ包ｿｽｿｽ@ｿｽｿｽｿｽﾇゑｿｽｿｽｿｽAｿｽﾆゑｿｽｿｽｿｽｿｽｿｽﾎゑｿｽｿｽwｿｽｿｽｿｽA
>ｿｽAｿｽhｿｽoｿｽCｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ擾ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾈ単ｿｽﾈ仕ｿｽlｿｽﾌ撰ｿｽｿｽｿｽｿｽｿｽKｿｽvｿｽﾅゑｿｽｿｽﾋ。
ｿｽｿｽｿｽﾆゑｿｽｿｽﾎ機ｿｽｿｽﾉ対ゑｿｽｿｽｿｽIDｿｽﾌ托ｿｽｿｽMｿｽvｿｽｿｽｿｽｿｽoｿｽｿｽｿｽﾄゑｿｽｿｽ迚橸ｿｽｿｽｿｽｿｽｿｽﾔゑｿｽﾜでのタｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽﾝ抵ｿｽ
ｿｽｿｽｿｽKｿｽvｿｽﾆゑｿｽｿｽAIDｿｽｿｽけ趣ｿｽｿｽｿｽｿｽｿｽｿｽﾍゑｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽｿｽ驍ｾｿｽｿｽｿｽﾈのゑｿｽｿｽAIDｿｽｿｽけ趣ｿｽｿｽｿｽﾄ趣ｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽﾉ移ゑｿｽKｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾈどでゑｿｽｿｽB
GTB 2006/03/16(ｿｽｿｽ) 10:39:17
ｿｽｿｽｿｽXｿｽﾌアｿｽhｿｽoｿｽCｿｽXｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽFｿｽｿｽｿｽｿｽﾌゑｿｽｿｽwｿｽEｿｽﾌとゑｿｽｿｽｿｽAｿｽﾊ信ｿｽdｿｽlｿｽﾌ厄ｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽ@ｿｽかｿｽｿｽﾌ会ｿｽｿｽｿｽｿｽﾍ、ｿｽeｿｽLｿｽXｿｽgｿｽﾅ撰ｿｽｿｽsｿｽｿｽｿｽﾅゑｿｽｿｽBｿｽｿｽﾘゑｿｽｿｽ<CR>ｿｽﾅゑｿｽｿｽｿｽｿｽA
ｿｽｿｽｿｽMｿｽｿｽｿｽｿｽｿｽﾌ目茨ｿｽﾍゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽ@ｿｽｿｽｿｽRｿｽ}ｿｽｿｽｿｽhｿｽﾉゑｿｽｿｽAｿｽｿｽｿｽﾌ行ｿｽｿｽｿｽ笊ｶｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾏゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾉ本ｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾌ仕ｿｽlｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽﾔゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽlｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽfｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽBｿｽｿｽｿｽｿｽﾍ包ｿｽｿｽｿｽｿｽﾄ機ｿｽ側ｿｽﾌハｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾚ的
ｿｽｿｽｿｽｿｽﾋてゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽnｿｽ[ｿｽhｿｽｿｽNGｿｽﾌ場合ｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽｿｽｿｽXｿｽ|ｿｽｿｽｿｽXｿｽｿｽｿｽｿｽｿｽﾜでにタｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽ
ｿｽﾝゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽﾌ値ｿｽﾍゑｿｽｿｽｿｽｿｽｿｽxｿｽTｿｽｿｽｿｽvｿｽｿｽｿｽｿｽﾌゑｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽｿｽｿｽ謔ｻｿｽﾌ値
ｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽﾍ趣ｿｽMｿｽｿｽｿｽﾂつの会ｿｽﾍ・ｿｽｿｽｿｽfｿｽﾅはなゑｿｽｿｽﾄ、ｿｽｿｽMｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽﾜとめて擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾅ擾ｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽ(1)ｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽｿｽiｿｽｿｽｿｽﾌ鯉ｿｽﾌ擾ｿｽｿｽｿｽｿｽjｿｽﾌとゑｿｽｿｽｿｽﾅ、ｿｽﾔゑｿｽｿｽﾄゑｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽﾌ抵ｿｽｿｽｿｽｿｽｿｽAｿｽKｿｽvｿｽﾈ包ｿｽｿｽｿｽｿｽ抜ゑｿｽｿｽｿｽ閧ｻｿｽﾌ値ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽfｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌゑｿｽｿｽﾟ趣ｿｽMｿｽｿｽｿｽｿｽｿｽｿｽﾒつゑｿｽｿｽﾟゑｿｽLoopｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽこの包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽしｿｽｿｽｿｽﾈゑｿｽｿｽ謔､ｿｽﾈので、ｿｽｿｽｿｽﾌ趣ｿｽiｿｽｿｽﾜめ、ｿｽFｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽkｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾟて考ｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽAｿｽﾄ度ｿｽAｿｽhｿｽoｿｽCｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ范ｴｿｽ@ｿｽｿｽｿｽｿｽ 2006/03/16(ｿｽｿｽ) 11:37:42
>ｿｽnｿｽ[ｿｽhｿｽｿｽNGｿｽﾌ場合ｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽｿｽｿｽXｿｽ|ｿｽｿｽｿｽXｿｽｿｽｿｽｿｽｿｽﾜでにタｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽ
>ｿｽﾝゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽmｿｽﾉは機ｿｽがIDｿｽｿｽｿｽMｿｽvｿｽｿｽｿｽｿｽけて、IDｿｽ送信ｿｽｿｽｿｽIｿｽｿｽｿｽﾜでの趣ｿｽｿｽﾔでゑｿｽｿｽﾋ。
ｿｽ@ｿｽ側ｿｽﾅ托ｿｽｿｽ閧ｷｿｽｿｽｿｽﾉはゑｿｽｿｽｿｽｿｽﾈゑｿｽｿｽ鼾ｿｽﾍ、ｿｽpｿｽ¥ｿｽRｿｽｿｽｿｽｿｽｿｽｿｽｿｽ迹暦ｿｽMｿｽvｿｽｿｽｿｽｿｽoｿｽｿｽｿｽｿｽ
IDｿｽｿｽｿｽMｿｽｿｽｿｽｿｽﾜでの趣ｿｽｿｽﾔにタｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽﾝ定すｿｽ驍ｱｿｽﾆになゑｿｽﾜゑｿｽｿｽB
ｿｽXｿｽﾉ、ｿｽｿｽMｿｽfｿｽ[ｿｽ^ｿｽ[ｿｽﾌ終ｿｽｿｽ閧ｪｿｽtｿｽHｿｽ[ｿｽ}ｿｽbｿｽgｿｽIｿｽﾉ費ｿｽｿｽfｿｽsｿｽ¥ｿｽﾅゑｿｽｿｽｿｽｿｽｿｽA
ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾌ設定時ｿｽﾔ難ｿｽﾉ撰ｿｽｿｽｿｽｿｽｿｽIDｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ暦ｿｽｿｽ驍ｩｿｽﾛゑｿｽｿｽﾌ費ｿｽｿｽfｿｽﾉなゑｿｽﾜゑｿｽｿｽB
ｿｽｿｽﾜゑｿｽｿｽﾌフｿｽｿｽｿｽ[ｿｽﾍ、ｿｽｿｽｿｽｿｽﾈとゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽ@ｿｽ@ｿｽPｿｽAｿｽｿｽｿｽMｿｽvｿｽｿｽ
ｿｽ@ｿｽ@ｿｽQｿｽAｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽﾌタｿｽCｿｽ}ｿｽ[ｿｽXｿｽ^ｿｽ[ｿｽg
ｿｽ@ｿｽ@ｿｽRｿｽAｿｽｿｽM
ｿｽ@ｿｽ@ｿｽSｿｽAｿｽ^ｿｽCｿｽｿｽｿｽAｿｽbｿｽv
ｿｽ@ｿｽ@ｿｽTｿｽAｿｽｿｽMｿｽfｿｽ[ｿｽ^ｿｽ[ｿｽﾌ鯉ｿｽｿｽｿｽ
ｿｽﾜゑｿｽｿｽAｿｽ@ｿｽｿｽﾉゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽsｿｽｿｽIDｿｽ送ゑｿｽﾔゑｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽAｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾌ趣ｿｽｿｽﾔゑｿｽ
500msｿｽｿｽLｿｽｿｽﾎ十ｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽﾎ、ｿｽｿｽMｿｽﾌとゑｿｽｿｽｿｽﾉタｿｽCｿｽ}ｿｽ[ｿｽﾍゑｿｽｿｽｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ@ sBuf = MSComm1.Input
ｿｽ@sgCommGet = sgCommGet & sBuf
ｿｽｿｽｿｽ黷ｾｿｽｿｽｿｽｿｽOKｿｽﾅ、ｿｽｿｽｿｽﾔ難ｿｽﾉ托ｿｽｿｽｿｽ黷ｽｿｽfｿｽ[ｿｽ^ｿｽ[ｿｽﾍ包ｿｽｿｽｿｽｿｽｿｽﾉ托ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽﾜゑｿｽｿｽB
ｿｽﾐでゑｿｽｿｽ 2006/03/16(ｿｽｿｽ) 14:07:15
ｿｽｿｽｿｽﾍ搾ｿｽｿｽｿｽｿｽﾟてまとゑｿｽﾉソｿｽ[ｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽA(ｿｽｿｽｿｽｿｽ)
OnCommｿｽｿｽﾌタｿｽCｿｽ}ｿｽｿｽSｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ会ｿｽｿｽLｿｽﾌ様ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽﾟなのゑｿｽｿｽﾈ？ｿｽｿｽｿｽﾗゑｿｽｿｽｿｽｿｽGｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽﾍ手抜ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾝ抵ｿｽ(ｿｽｿｽｿｽXｿｽ|ｿｽｿｽｿｽXｿｽp)
Do
ｿｽ@ｿｽ@ｿｽｿｽｿｽXｿｽ|ｿｽｿｽｿｽXｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽｿｽｿｽｿｽｿｽIｿｽｿｽ
ｿｽ@ｿｽ@ｿｽfｿｽ[ｿｽ^ｿｽｿｽ1ｿｽoｿｽCｿｽgｿｽﾈ擾ｿｽｿｽMｿｽｿｽｿｽｿｽｿｽｿｽIｿｽｿｽ
Loop
ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽ‾
ifｿｽ@ｿｽfｿｽ[ｿｽ^ｿｽｿｽ1ｿｽoｿｽCｿｽgｿｽﾈ擾ｿｽｿｽMｿｽ@Then
ｿｽ@ｿｽ@ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾄ設抵ｿｽ(ｿｽｿｽMｿｽIｿｽｿｽｿｽp)
ｿｽ@ｿｽ@Do
ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽｿｽｿｽｿｽｿｽIｿｽｿｽ
ｿｽ@ｿｽ@Loop
ｿｽ@ｿｽ@ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽ‾
ｿｽ@ｿｽ@ｿｽｿｽMｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽ
End If
GTB 2006/03/16(ｿｽｿｽ) 17:37:20
ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ@ｿｽかｿｽｿｽﾌ返ゑｿｽﾍ撰ｿｽｿｽsｿｽﾆ擾ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽﾅ托ｿｽ27ｿｽsｿｽi992ｿｽｿｽｿｽｿｽｿｽjｿｽﾅゑｿｽｿｽB
OnCommｿｽｿｽﾌタｿｽCｿｽ}ｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ鼾ｿｽﾍ難ｿｽｿｽｿｽ20ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ轤｢ｿｽｿｽｿｽｿｽｿｽけ趣ｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽ
ｿｽﾌでタｿｽCｿｽ}ｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽ范ｴｿｽ@ｿｽｿｽｿｽｿｽﾌ擾ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽtｿｽｿｽｿｽ[ｿｽｿｽgｿｽせｿｽﾄゑｿｽ轤､ｿｽｿｽ
ｿｽ@ｿｽ@ｿｽPｿｽAｿｽｿｽｿｽMｿｽvｿｽｿｽ
ｿｽ@ｿｽ@ｿｽQｿｽAｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽﾌタｿｽCｿｽ}ｿｽ[ｿｽXｿｽ^ｿｽ[ｿｽg
ｿｽ@ｿｽ@ｿｽRｿｽAｿｽSｿｽﾄ趣ｿｽMｿｽﾜゑｿｽｿｽﾍタｿｽCｿｽｿｽｿｽAｿｽbｿｽv
ｿｽ@ｿｽ@ｿｽ@ｿｽ@ｿｽiｿｽｿｽMｿｽﾈゑｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽ‾ｿｽﾟゑｿｽj
ｿｽ@ｿｽ@ｿｽSｿｽAｿｽｿｽMｿｽﾈゑｿｽﾎデｿｽ[ｿｽ^ｿｽﾌ鯉ｿｽｿｽｿｽ
ｿｽﾉなゑｿｽﾜゑｿｽｿｽB
ｿｽｿｽLｿｽRｿｽﾌ「ｿｽSｿｽﾄ趣ｿｽMｿｽiｿｽPｿｽｿｽｿｽOnCommｿｽｿｽﾅ全ｿｽﾄゑｿｽｿｽMｿｽｿｽｿｽﾄ、
ｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽ‾ｿｽﾟゑｿｽjｿｽvｿｽﾉ厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽmｿｽｿｽｿｽﾉ皆ｿｽｿｽｿｽｿｽﾌアｿｽhｿｽoｿｽCｿｽXｿｽﾌとゑｿｽｿｽｿｽAOnCommｿｽｿｽﾌ待ゑｿｽTimerｿｽﾍ厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgTimerｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽｿｽｿｽATimerｿｽRｿｽｿｽｿｽgｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽPｿｽﾂで済みまゑｿｽｿｽｿｽ
ｿｽﾇゑｿｽｿｽﾌゑｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾄみゑｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽ范ｴｿｽ@ｿｽｿｽｿｽｿｽ 2006/03/16(ｿｽｿｽ) 18:20:37
>ｿｽｿｽLｿｽRｿｽﾌ「ｿｽSｿｽﾄ趣ｿｽMｿｽiｿｽPｿｽｿｽｿｽOnCommｿｽｿｽﾅ全ｿｽﾄゑｿｽｿｽMｿｽｿｽｿｽﾄ、
>ｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽ‾ｿｽﾟゑｿｽjｿｽvｿｽﾉ厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
RThresholdｿｽｿｽPｿｽﾉゑｿｽｿｽﾄまゑｿｽｿｽﾌで、ｿｽｿｽMｿｽｿｽｿｽｿｽｿｽｿｽｿｽPｿｽｿｽｿｽｿｽｿｽﾈ擾ｿｽｿｽComｿｽCｿｽxｿｽｿｽｿｽg
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽ]ｿｽｿｽｿｽﾄ、ｿｽｿｽｿｽｿｽfｿｽ[ｿｽ^ｿｽ[ｿｽﾌ撰ｿｽｿｽﾍボｿｽ[ｿｽｿｽｿｽ[ｿｽgｿｽﾆマｿｽVｿｽｿｽｿｽXｿｽsｿｽ[ｿｽhｿｽA
ｿｽｿｽｿｽﾌ托ｿｽｿｽﾌタｿｽXｿｽNｿｽｿｽｿｽﾉ依托ｿｽｿｽｿｽｿｽﾄ会ｿｽｿｽｿｽｿｽｿｽｿｽｿｽMｿｽoｿｽｿｽｿｽｿｽﾌゑｿｽｿｽﾍ不ｿｽmｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽLoopｿｽｿｽして趣ｿｽMｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽﾍ厄ｿｽｿｽｿｽｿｽｿｽLｿｽｿｽﾜゑｿｽｿｽが、
ｿｽｿｽｿｽﾌようｿｽﾉゑｿｽｿｽﾈゑｿｽｿｽｿｽﾎなゑｿｽﾈゑｿｽｿｽｿｽｿｽRｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽﾊゑｿｽOnCommｿｽCｿｽxｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ趣ｿｽｿｽｿｽｿｽIｿｽﾉバｿｽbｿｽtｿｽ@ｿｽｿｽｿｽｿｽﾇみ趣ｿｽｿｽ
ｿｽ¥ｿｽｿｽｿｽﾉゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ_ｿｽ性ｿｽｿｽｿｽLｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽﾌ辺に会ｿｽｿｽｿｽｿｽｿｽｿｽ痰｢ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽCｿｽｿｽｿｽｿｽｿｽﾄなゑｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽB
ｿｽﾐでゑｿｽｿｽ 2006/03/17(ｿｽｿｽ) 08:27:35
OnCommｿｽｿｽﾅｿｽｿｽ[ｿｽvｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾆ、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽOnComm
ｿｽCｿｽxｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽﾓ厄ｿｽｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽH
OnCommｿｽｿｽｿｽLoopｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾆ会ｿｽｿｽLｿｽﾆ大差ｿｽﾈゑｿｽｿｽ謔､ｿｽｿｽ
ｿｽCｿｽｿｽｿｽEｿｽEｿｽEｿｽB
ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽﾝ抵ｿｽ(ｿｽｿｽｿｽXｿｽ|ｿｽｿｽｿｽXｿｽp)
Do
ｿｽ@ｿｽ@ｿｽ^ｿｽCｿｽｿｽｿｽAｿｽEｿｽgｿｽｿｽｿｽｿｽｿｽｿｽIｿｽｿｽ
ｿｽ@ｿｽ@If MSComm1.InBufferCount > 0 Then
ｿｽ@ｿｽ@ｿｽ@ｿｽ@sgCommGet = sgCommGet & MSComm1.Inputｿｽ@ｿｽ@ｿｽ@
ｿｽ@ｿｽ@End If
Loop
ｿｽ^ｿｽCｿｽ}ｿｽ[ｿｽｿｽ‾
If ｿｽｿｽM Thenｿｽ@ｿｽEｿｽEｿｽEｿｽE
GTB 2006/03/17(ｿｽｿｽ) 09:33:06
ｿｽｿｽﾉゑｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽSｿｽｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽけ趣ｿｽ驍ｱｿｽﾆゑｿｽｿｽoｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉ、
ｿｽuｿｽｿｽｿｽ[ｿｽNｿｽ|ｿｽCｿｽｿｽｿｽgｿｽﾅ止ｿｽﾟゑｿｽｿｽｿｽけゑｿｽ黷ｽｿｽﾌで、ｿｽPｿｽｿｽｿｽｿｽTimerｿｽｿｽﾇ会ｿｽｿｽｿｽｿｽﾄみゑｿｽ
ｿｽﾌでゑｿｽｿｽｿｽｿｽB
ｿｽFｿｽｿｽｿｽｿｽﾌアｿｽhｿｽoｿｽCｿｽXｿｽﾉ従ｿｽｿｽｿｽﾄ、ｿｽｿｽ闥ｼｿｽｿｽｿｽﾄみまゑｿｽｿｽB
ｿｽﾜゑｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽ邇ｿｿｽ竄ｷｿｽ驍ｩｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽが、ｿｽｿｽｿｽﾌ趣ｿｽｿｽﾍゑｿｽしｿｽｿｽ
ｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBm(__)m
