*******************************
** LANIOCu̎gp@ **
*******************************

LANIOCuLELanio.dllgp邱ƂɂALANIOAvP[V瑀
邱Ƃł܂

E{\tgEFA̒쌠͕ЂۗL܂B 
E{\tgEFA̓ۏ؂уT|[g͍sĂ܂B
E{\tgEFAɂ邨ql̑QA편vAO҂̂Ȃ鐿ɂ܂Ă
  Ђ͈؂̐ӔC𕉂˂܂B
E{\tgEFA͎OɒʒmeύXAzz~邱Ƃ܂B

 Ή

  LANIOCugpł@́ALA-3R2PALA-3R2P-PALA-7P-AALA-7P-PA
  LA-5P-PALA-5RALA-5T2SALA-5T2S-PłB
  CuMicrosoft VisualC++ version6.0AVisualBasic version6.0A
  VisualC++.NETAVisualBasic.NETŎgp\łB


 eł̓@ɂ

   VisualC++ Version6.0̏ꍇ

  1.vWFNĝtH_LELanio.libLELanio.hRs[

  2.VisualStudiõj[o[[vWFNg][vWFNg֒ǉ][t@C]
    IA[vWFNgփt@Cǉ]_CAO{bNXJ

  3.[t@C̎]ŁuׂẴt@C(*.*)vI

  4.LELanio.libLELanio.hI[OK]


   VisualC++.NET̏ꍇ

  1.vWFNĝtH_LELanio.libLELanio.hRs[

  2.\[VGNXv[ɂĒǉvWFNgIA
    VisualStudiõj[o[[vWFNg][ڂ̒ǉ]IA
    [ڂ̒ǉ]_CAO{bNXJ

  3.LELanio.libLELanio.hI[OK]


   VisualBasic Version6.0̏ꍇ

  1.vWFNĝtH_LELanio.basRs[

  2.VisualBasic̃j[o[[vWFNg][WW[̒ǉ]IA
    [WW[̒ǉ]_CAO{bNXJ

  3.[̃t@C]^uI

  4.LELanio.basIA[OK]


   VisualBasic.NET̏ꍇ

  1.vWFNĝtH_LELanio.vbRs[

  2.VisualStudiõj[o[[vWFNg][ڂ̒ǉ]IA
    [ڂ̒ǉ]_CAO{bNXJ

  3.LELanio.vbIA[OK]


 dllt@Cɂ

  AvP[V̎śALELanio.dllȉ̂ꂩ̃tH_
  Rs[ĂKv܂B

  Est@ĈtH_
  EJgtH_
  EWindowstH_̃VXetH_
  iWindows2000/XP/Vistȁꍇ"system32"AWindows98̏ꍇ"system"j
  EWindowstH_
  EϐPATHɐݒ肳ĂtH_


AvP[V烉Cugp鎞̎菇

  LANIOCugpƂ́A܂ɂ͈ȉ̂悤Ȏ菇𓥂݂܂B

  1.Cu

    Y֐FLELanioInit

  2.LANɐڑĂLANIO
    iLELanioConnectDirect֐Őڑꍇ͕Kv܂j

    Y֐FLELanioSearch

  3.LANIȌ擾
    iLELanioConnectALELanioConnectDirect֐Őڑꍇ͕Kv܂j
    擾ۂɂ́ALELanioSearchɂČꂽɃCuŊU
    ꂽLANIOԍKvƂȂ܂B

    Y֐FLELanioGetIpAddressALELanioGetMacAddress
                  LELanioGetIdALELanioGetModel

  4.w肵LANIOƐڑ

    Y֐FLELanioConnectALELanioConnectByIdModel
                  LELanioConnectByIpAddressALELanioConnectByMacAddress
                  LELanioConnectDirect

  5.ڑLANIOPIOɑ΂Ċe폈s
    e폈̍ۂɂ́ALANIOڑ֐ԂLANIOnhKvƂȂ܂B

    Y֐FLELanioOutPioALELanioOutPioAll
                  LELanioInPioALELanioInPioAll
                  LELanioGetOutALELanioGetOutAll

  6.LANIOƂ̐ڑI
    ڑIɂ́ALANIOڑ֐ԂLANIOnhKvƂȂ܂B

    Y֐FLELanioClose

  7.CȕIs

    Y֐FLELanioEnd

  ̑̊֐ƂẮAe̊֐ŃG[ꍇɂ̃G[v𒲂
  LELanioGetLastError֐ALANIOɃfID擾w肷
  LELanioSetAutoRequestIdModel֐܂B


LANIOCǔ^`

  VisualC++łLANIOnȟ^ƂhLANIOgpł܂B


e֐̃t@X

 AIAG[擾֐
LANIOCȕAIACuŔG[̎擾֐łB

 LELanioInit

LANIOCu܂B
̊֐sOɑ̊֐͎sł܂B

p@   : VC : LELanioInit()
         VB : LELanioInit As Long
   : Ȃ
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioInit();
         VB : Dim error As Long
              error = LELanioInit
         LANIOCu܂B

 LELanioEnd

LANIOCu̎gpI܂BvOI鎞ɎsĂB
ڑLANIOΐؒf܂B
ĂюgpĊJꍇLELanioInitĂђKv܂B

p@   : VC : LELanioEnd()
         VB : LELanioEnd As Long
   : Ȃ
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioEnd();
         VB : Dim error As Long
              error = LELanioEnd
         LANIOCu̎gpI܂B

 LELanioGetLastError

OɔG[ԍ擾܂B߂l̓G[ԍłB
e֐̎s̖߂lG[ꍇǍ𒲂ׂ̂Ɏgp܂B
10000ȏ̏ꍇWinsock̃\PbgG[A1`̏ꍇLANIODLL̃G[łB
 1 Ă܂BLELanioInitsĂB
 2 ʁALANIOł܂łB
 3 ŔLANIO葽lw肵܂B
 4 w肳ꂽLANIO𔭌ł܂łB
 5 LANIOƐڑĂ܂BLELanioConnectsĂB
 6 w肳ꂽ͎sł܂B
 7 łɐڑĂ܂B
 8 ڑő吔𒴉߂܂B
 9 sȖ߂lԂ܂Biݒ肵lُł\܂j

p@   : VC : LELanioGetLastError()
         VB : LELanioGetLastError As Long
   : Ȃ
߂l : G[̏Ԃ܂
     : VC : int error = LELanioGetLastError();
         VB : Dim error As Long
              error = LELanioGetLastError
         ϐerrorLANIO̒ÕG[ԍ擾܂B


 LANIO֐
LANɂLANIO֐QłB

 LELanioSetAutoRequestIdModel

̊֐LELanioSearch̎sɁAILANIOIDModel擾@\ɂ
Ă̐ݒ܂B
LELanioSearchɎsKv܂B
LELanioSearchsA̋@\LŁALANIÕVÃ|[gԍ
ݒ肪̊֐Ŏw肵ԍƈvꍇAILELanioRequestIdModel֐
̏s܂B

p@   : VC : LELanioSetAutoRequestIdModel(BOOL enable, int port)
         VB : LELanioSetAutoRequestIdModel(ByVal enable As Long,
                  ByVal port As Long)
   : enable  ̋@\gpꍇTRUE(1)AȂꍇFALSE(0)
         port    IDModel擾VÃ|[gԍ
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetAutoRequestIdModel(TRUE,10500);
         VB : Dim error As Long
              error = LELanioSetAutoRequestIdModel(1,10500)
         AVÃ|[gԍ10500ɐݒ肳ĂLANIOIDModel
         擾悤ɐݒ肵܂B

 LELanioSearch

LANɂLANIO܂B
ŏɔLANIO菇ɓI0ԍ蓖ĂAȍ~̏擾֐
Ȃǂɂ͂̓ILANIOԍƂĎw肷邱ƂɂȂ܂B
LANIOڑ֐ŐڑLANIOꍇÅ֐sƐڑ͏I
B

p@   : VC : LELanioSearch(int msec)
         VB : LELanioSearch Lib(ByVal msec As Long)
   : msec    ^CAEgԁiP mbj
߂l : LANIO̐BłȂꍇ0BG[-1
     : VC : int laniocount = LELanioSearch(500);
         VB : Dim laniocount As Long
              laniocount = LELanioSearch(500)
         LANɐڑĂLANIO^CAEg500msecŌA
         laniocountɑ܂B


 LANIO擾֐
LELanioSearchŌLANIO̊e擾֐QłB
LELanioSearchłȂΎsł܂B

 LELanioGetIpAddress

LANIOIPAhX擾܂B
IPAhX͕`ŁA"192.168.0.1"̌`ƂȂ܂B

p@   : VC : LELanioGetIpAddress(int lanio, char *ipaddress)
         VB : LELanioGetIpAddress(ByVal lanio As Long,
                  ByVal ipaddress As String)
   : lanio       LANIOԍ
         ipaddress   IPAhX擾obt@ւ̃|C^
                     16oCg̗̈悪KvłB
߂l : G[0AI0ȊOԂ܂
     : VC : char ipaddress[16];
              int error = LELanioGetIpAddress(0,ipaddress);
         VB : Dim error As Long
              Dim ipaddress As String * 16
              error = LELanioGetIpAddress(0,ipaddress)
         ipaddress̃|C^ɁAŏɔLANIOIPAhX擾܂B

 LELanioGetMacAddress

LANIOMACAhX擾܂B
MACAhX̓oCi6oCǧ`ƂȂ܂B

p@   : VC : LELanioGetMacAddress(int lanio, unsigned char *macaddress)
         VB : LELanioGetMacAddress(ByVal lanio As Long, 
                  ByRef macaddress As Byte)
   : lanio       LANIOԍ
         macaddress  MACAhX擾obt@ւ̃|C^
                     6oCg̗̈悪KvłB
߂l : G[0AI0ȊOԂ܂
     : VC : unsigned char macaddress[6];
              int error = LELanioGetMacAddress(0,macaddress);
         VB : Dim error As Long
              Dim macaddress(6) As Byte
              error = LELanioGetMacAddress(0,macaddress(0))
         macaddress̃|C^ɁAŏɔLANIOMACAhX擾܂B

 LELanioGetId

LANIOIDԍ擾܂B
LELanioSetAutoRequestIdModelɂIDԍƃf擾sĂ邩A
LELanioSearchLELanioRequestIdModelɂIDԍƃf𓾂Ă邩
ǂ炩łKv܂B擾ĂȂꍇ̒l-1ƂȂ܂B

p@   : VC : LELanioGetId(int lanio, int *id)
         VB : LELanioGetId(ByVal lanio As Long, ByRef id As Long)
   : lanio   LANIOԍ
         id      LANIOID擾obt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int id;
              int error = LELanioReceiveId(0,&id);
         VB : Dim error As Long
              Dim Id As Long
              error = LELanioReceiveId(0,Id)
         ŏɔLANIOIDidɎ擾܂B

 LELanioGetModel

LANIÕf擾܂B
LELanioSetAutoRequestIdModelɂIDԍƃf擾sĂ邩A
LELanioSearchLELanioRequestIdModelɂIDԍƃf𓾂Ă邩
ǂ炩łKv܂Bf̐l̈Ӗ͎̒ʂłB
 1 LA-3R2PALA-3R2P-P
 2 LA-7PALA-7P-P
 3 LA-5R
 4 LA-5T2SALA-5T2S-P
 5 LA-5P-P
擾ĂȂꍇ̒l-1ƂȂ܂B

p@   : VC : LELanioGetModel(int lanio, int *model)
         VB : LELanioGetModel(ByVal lanio As Long, ByRef model As Long)
   : lanio   LANIOԍ
         model   LANIÕf擾obt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int model;
              int error = LELanioReceiveModel(0,&model)
         VB : Dim error As Long
              Dim Model As Long
              error = LELanioReceiveModel(0,Model)
         ŏɔLANIÕfmodelɎ擾܂B

 LELanioRequestIdModel

LANIOɑ΂IDƃfԍ₵܂B

p@   : VC : LELanioRequestIdModel(int lanio, int *id, int *model)
         VB : LELanioRequestIdModel(ByVal lanio As Long,
                  ByRef id As Long, ByRef model As Long)
   : lanio   LANIOԍ
         id      LANIOID擾obt@ւ̃|C^
         model   LANIÕf擾obt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int id, model;
              int error = LELanioRequestIdModel(0,&id,&model);
         VB : Dim error As Long
              Dim Id As Long
              Dim Model As Long
              error = LELanioRequestIdModel(0,Id,Model)
         ŏɔLANIOIDƃfԍidAmodel̃|C^Ɏ擾܂B


 LANIOڑ֐
ǂLANIOƓo͂邩w肷֐łB߂l͑SLANIOnhƂȂ
G[-1łB
LANIOnh͐ڑPIOؒfɕKvƂȂ܂B
LELanioConnectDirectāALELanioSearchɂĔLANIOɑ΂Ă̂
sł܂B
ڑ\̍ő吔256łB

 LELanioConnect

LELanioSearchɂĔꂽԂw肵Đڑ܂B

p@   : VC : LELanioConnect(int lanio)
         VB : LELanioConnect(ByVal lanio As Long)
   : lanio   LANIOԍ
߂l : G[-1AILANIOnhԂ܂
     : VC : hLANIO handle = LELanioConnect(0);
         VB : Dim handle As Long
              handle = LELanioConnect(0)
         ŏɔLANIOƐڑ܂B

 LELanioConnectByIdModel

IDƃfw肵Đڑ܂BfID̋@킪ꍇ͐
ɐڑ܂B

p@   : VC : LELanioConnectByIdModel(int id, int model)
         VB : LELanioConnectByIdModel(ByVal id As Long, ByVal model As Long)
   : id      LANIOIDԍ
         model   LANIÕf
߂l : G[-1AILANIOnhԂ܂
     : VC : hLANIO handle = LELanioConnectById(15,1);
         VB : Dim handle As Long
              handle = LELanioConnectById(15,1)
         ID15ԂLA-3R2PƐڑ܂B

 LELanioConnectByIpAddress

IPAhXw肵Đڑ܂B

p@   : VC : LELanioConnectByIpAddress(char *ipaddress)
         VB : LELanioConnectByIpAddress(ByVal ipaddress As String)
   : ipaddress   IPAhXobt@ւ̃|C^
߂l : G[-1AILANIOnhԂ܂
     : VC : hLANIO handle = LELanioConnectByIpAddress(ipaddress);
         VB : Dim handle As Long
              handle = LELanioConnectByIpAddress(ipaddress)
         ϐipaddressɊi[ꂽIPAhXLANIOƐڑ܂B

 LELanioConnectByMacAddress

MACAhXw肵Đڑ܂B

p@   : VC : LELanioConnectByMacAddress(unsigned char *macaddress)
         VB : LELanioConnectByMacAddress(ByRef macaddress As Byte)
   : macaddress  MACAhXobt@ւ̃|C^
߂l : G[-1AILANIOnhԂ܂
     : VC : hLANIO handle = LELanioConnectByMacAddress(macaddress);
         VB : Dim handle As Long
              handle = LELanioConnectByMacAddress(macaddress)
         ϐmacaddressɊi[ꂽMACAhXLANIOƐڑ܂B

 LELanioConnectDirect

IPAhXURLw肵Đڑ܂B
LELanioConnectByIpAddressƂ̈ႢLANɑ݂ȂLANIOΏۂƂ邱ƂłB
̊֐̂LELanioSearch̕Kv͂܂B

p@   : VC : LELanioConnectDirect(char *address, int msec)
         VB : LELanioConnectDirect(ByVal address As String, ByVal msec As Long)
   : address IPAhX܂urlobt@ւ̃|C^
         msec    ^CAEgԁiP mbj
߂l : G[-1AILANIOnhԂ܂
     : VC : hLANIO handle = LELanioConnectDirect("dummy.co.jp",5000);
         VB : Dim handle As Long
              handle = LELanioConnectDirect("dummy.co.jp",5000)
         dummy.co.jpURLŃANZXłLANIOƃ^CAEg5bŐڑ܂B


 LANIOؒf֐
LANIOƂ̐ڑI鎞Ɏgp܂B
LANIOڑ֐Ŗ߂lƂēLANIOnhŁAؒfLANIOw肵܂B

 LELanioClose

LANIOƂ̐ڑؒf܂B

p@   : VC : LELanioClose(hLANIO handle)
         VB : LELanioClose(ByVal handle As Long)
   : handle  LANIOnh
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioClose(handle);
         VB : Dim error As Long
              error = LELanioClose(handle)
         LANIOnhhandleLANIOƂ̐ڑI܂B


 o͊֐
LANIO̓o̓|[g𑀍삷֐łB
LANIOڑ֐Ŗ߂lƂēLANIOnhŁA삷LANIOw肵܂B

 LELanioOutPio

LANIODO𑀍삵܂B_Pʂ̑Ɏgp܂B

p@   : VC : LELanioOutPio(hLANIO handle, int pio, BOOL active)
         VB : LELanioOutPio(ByVal handle As Long,
                  ByVal pio As Long, ByVal active As Long)
   : handle  LANIOnh
         pio     삷DO|[gԍBDO1=0ADO2=1...
         active  ONȂ1AOFFȂ0
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioOutPio(handle,2,1);
         VB : Dim error As Long
              error = LELanioOutPio(handle,2,1)
         LANIOnhhandleLANIODO3ONɂ܂B

 LELanioOutPioAll

LANIODO𑀍삵܂BSĂDOɑ΂Ăɑ삷鎞Ɏgp܂B

p@   : VC : LELanioOutPioAll(hLANIO handle, int piobit)
         VB : LELanioOutPioAll(ByVal handle As Long, ByVal piobit As Long)
   : handle  LANIOnh
         piobit  DO|[g̐ݒBŉʃrbgDO1ADO2...ɑΉ܂B
                 ONȂ1AOFFȂ0ƂȂ܂B
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioOutPioAll(handle,0x05);
         VB : Dim error As Long
              error = LELanioOutPioAll(handle,&H5)
         LANIOnhhandleLANIODO1ADO3ONɁAȊOOFFɂ܂B

 LELanioInPio

LANIODI擾܂B_Pʂ̎擾Ɏgp܂B

p@   : VC : LELanioInPio(hLANIO handle, int pio, BOOL *active)
         VB : LELanioInPio(ByVal handle As Long,
                  ByVal pio As Long, ByRef active As Long)
   : handle  LANIOnh
         pio     擾DI|[gԍBDI1=0ADI2=1...ɑΉ܂B
         active  ONȂ1AOFFȂ0obt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioInPio(handle,2,&active);
         VB : Dim error As Long
              Dim active As Long
              error = LELanioInPio(handle,2,active)
         LANIOnhhandleLANIODI3ԂactiveɎ擾܂B

 LELanioInPioAll

LANIODI擾܂BSĂDIɑ΂ĂɎ擾鎞Ɏgp܂B

p@   : VC : LELanioInPioAll(hLANIO handle, int *piobit)
         VB : LELanioInPioAll(ByVal handle As Long, ByRef piobit As Long)
   : handle  LANIOnh
         piobit  DI|[g̓eobt@ւ̃|C^B
                 ŉʃrbgDI1ADI2...
                 ONȂ1AOFFȂ0ƂȂ܂B
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioInPioAll(handle,&piobit);
         VB : Dim error As Long
              Dim piobit As Long
              error = LELanioInPioAll(handle,piobit)
         LANIOnhhandleLANIODIԂpiobitɎ擾܂B

 LELanioGetOut

LANIǑ݂DOԂ擾܂B_Pʂ̎擾Ɏgp܂B

p@   : VC : LELanioGetOut(hLANIO handle, int pio, BOOL *active)
         VB : LELanioGetOut(ByVal handle As Long,
                  ByVal pio As Long, ByRef active As Long)
   : handle  LANIOnh
         pio     擾DO|[gԍBDO1=0ADO2=1...ɑΉ܂B
         active  ONȂ1AOFFȂ0obt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetOut(handle,2,&active);
         VB : Dim error As Long
              Dim active As Long
              error = LELanioGetOut(handle,2,active)
         LANIOnhhandleLANIǑ݂DO3ԂactiveɎ擾܂B

 LELanioGetOutAll

LANIǑ݂DOԂ擾܂BSĂDOɑ΂ĂɎ擾鎞Ɏgp܂B

p@   : VC : LELanioGetOutAll(hLANIO handle, int *piobit)
         VB : LELanioGetOutAll(ByVal handle As Long, ByRef piobit As Long)
   : handle  LANIOnh
         piobit  DO|[g̓eobt@ւ̃|C^B
                 ŉʃrbgDO1ADO2...
                 ONȂ1AOFFȂ0ƂȂ܂B
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetOutAll(handle,&piobit);
         VB : Dim error As Long
              Dim piobit As Long
              error = LELanioGetOutAll(handle,piobit)
         LANIOnhhandleLANIǑ݂DOԂpiobitɎ擾܂B

 o͒[qON/OFF֐
LANIO̓o̓|[g̎ON/OFFw肷֐łB
LA-5RALA-5T2S(-P)ł̂ݎgpł܂B
LANIOڑ֐Ŗ߂lƂēLANIOnhŁA삷LANIOw肵܂B

 LELanioSetAutoSwitchingActive

LANIȌo͒[qON/OFF̊Jn/~s܂

p@   : VC : LELanioSetAutoSwitchingActive(hLANIO handle, BOOL active)
         VB : LELanioSetAutoSwitchingActive(ByVal handle As Long,
                  ByVal active As Long)
   : handle  LANIOnh
         active  ON/OFFJn=0ȊOA~=0
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetAutoSwitchingActive(handle,1);
         VB : Dim error As Long
              error = LELanioSetAutoSwitchingActive(handle,1)
         LANIOnhhandleLANIȌo͒[qON/OFFJn܂B

 LELanioGetAutoSwitchingActive

LANIȌo͒[qON/OFF̊Jn/~ݒ擾܂

p@   : VC : LELanioGetAutoSwitchingActive(hLANIO handle, BOOL *active)
         VB : LELanioGetAutoSwitchingActive(ByVal handle As Long,
                  ByRef active As Long)
   : handle  LANIOnh
         active  ON/OFFԂobt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetAutoSwitchingActive(handle,&active);
         VB : Dim error As Long
              Dim active As Long
              error = LELanioGetAutoSwitchingActive(handle,active)
         LANIOnhhandleLANIȌo͒[qON/OFFactiveɎ擾܂B

 LELanioSetAutoSwitchingTime

LANIȌo͒[qON/OFF̎ݒ肵܂
100~b`14000~b͈̔͂Ŏwł܂B
2000~b܂ł100~bPʂŁA1000~bPʂł̎wƂȂ܂B

p@   : VC : LELanioSetAutoSwitchingTime(hLANIO handle, int msec)
         VB : LELanioSetAutoSwitchingTime(ByVal handle As Long,
                  ByVal msec As Long)
   : handle  LANIOnh
         msec    iP mbj
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetAutoSwitchingTime(handle,1);
         VB : Dim error As Long
              error = LELanioSetAutoSwitchingTime(handle,1)
         LANIOnhhandleLANIȌo͒[qON/OFF̎1000~b
         ݒ肵܂B

 LELanioGetAutoSwitchingTime

LANIȌo͒[qON/OFF̎ݒ擾܂

p@   : VC : LELanioGetAutoSwitchingTime(hLANIO handle, int *msec)
         VB : LELanioGetAutoSwitchingTime(ByVal handle As Long,
                  ByRef msec As Long)
   : handle  LANIOnh
         msec    iP mbjobt@ւ̃|C^
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetAutoSwitchingTime(handle,&msec);
         VB : Dim error As Long
              Dim msec As Long
              error = LELanioGetAutoSwitchingTime(handle,msec)
         LANIOnhhandleLANIȌo͒[qON/OFF̎msec
         擾܂B

 LELanioSetAutoSwitchingPio

LANIȌo͒[qON/OFFsDOݒ肵܂B

p@   : VC : LELanioSetAutoSwitchingPio(hLANIO handle, int autoswdo)
         VB : LELanioSetAutoSwitchingPio(ByVal handle As Long,
                  ByVal autoswdo As Long)
   : handle   LANIOnh
         autoswdo ŉʃrbgADO1`DO5ŎON/OFFs[q1
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetAutoSwitchingPio(handle,5);
         VB : Dim error As Long
              error = LELanioSetAutoSwitchingPio(handle,5)
         LANIOnhhandleLANIȌo͒[qON/OFFs[qD0AD2
         ݒ肵܂B

 LELanioGetAutoSwitchingPio

LANIȌo͒[qON/OFFsDOݒ擾܂

p@   : VC : LELanioGetAutoSwitchingPio(hLANIO handle, int *autoswdo)
         VB : LELanioGetAutoSwitchingPio(ByVal handle As Long,
                  ByRef autoswdo As Long)
   : handle   LANIOnh
         autoswdo ŉʃrbgADO1`DO5ŎON/OFFs[q1
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetAutoSwitchingPio(handle,&autoswdo);
         VB : Dim error As Long
              Dim autoswdo As Long
              error = LELanioGetAutoSwitchingPio(handle,autoswdo)
         LANIOnhhandleLANIȌo͒[qON/OFFs[qautoswdo
         ݒ肵܂B

 o͉@\ݒ֐
LANIO̓o͉@\w肷֐łB
LA-5P-Pł̂ݎgpł܂B

LANIOڑ֐Ŗ߂lƂēLANIOnhŁA삷LANIOw肵܂B

 LELanioSetDisconnectionTime

LANIO̖ʐMԂɂȂ̐ؒfԂݒ肷

p@   : VC : LELanioSetDisconnectionTime(hLANIO handle, int time);
         VB : LELanioSetDisconnectionTime(ByVal handle As Long, 
                ByVal time As Long )
   : handle  LANIOnh
         time    
                0x00:  0ms    0x04: 3sec  0x08:50sec  0x0c:10min
                0x01:300ms    0x05: 5sec  0x09: 1min  0x0d:30min
                0x02:500ms    0x06:10sec  0x0a: 3min  0x0e:50min
                0x03: 1sec    0x07:30sec  0x0b: 5min  0x0f:Ȃ
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetDisconnectionTime(handle,6);
         VB : Dim error As Long
              error = LELanioSetDisconnectionTime(handle,6)
         LANIO̖ʐMԂɂȂ̐ؒfԂ10secɐݒ肵܂B

 LELanioGetDisconnectionTime

LANIO̖ʐMԂɂȂ̐ؒfԂ擾

p@   : VC : LELanioGetDisconnectionTime(hLANIO handle, int *time);
         VB : LELanioGetDisconnectionTime(ByVal handle As Long, 
                ByRef time As Long )
   : handle  LANIOnh
         time    
                0x00:  0ms    0x04: 3sec  0x08:50sec  0x0c:10min
                0x01:300ms    0x05: 5sec  0x09: 1min  0x0d:30min
                0x02:500ms    0x06:10sec  0x0a: 3min  0x0e:50min
                0x03: 1sec    0x07:30sec  0x0b: 5min  0x0f:Ȃ
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetDisconnectionTime(handle,&time);
         VB : Dim error As Long
              Dim time As Long
              error = LELanioGetDisconnectionTime(handle,time)
         LANIO̖ʐMԂɂȂ̐ؒfԂtimeɎ擾܂B

 LELanioSetNoticeTime

LANIO̒ʒmԂݒ肷

p@   : VC : LELanioSetNoticeTime(hLANIO handle, int time);
         VB : LELanioSetNoticeTime(ByVal handle As Long, 
                ByVal time As Long )
   : handle  LANIOnh
         time    
                0x00:ʒmȂ 0x04: 3min     0x08:ݒ֎~  0x0c:ݒ֎~
                0x01:10sec    0x05:ݒ֎~  0x09:ݒ֎~  0x0d:ݒ֎~
                0x02:30sec    0x06:ݒ֎~  0x0a:ݒ֎~  0x0e:ݒ֎~
                0x03:60sec    0x07:ݒ֎~  0x0b:ݒ֎~  0x0f:ݒ֎~
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetNoticeTime(handle,2);
         VB : Dim error As Long
              error = LELanioSetNoticeTime(handle,2)
         LANIO̒ʒmԂ30secɐݒ肵܂B

 LELanioGetNoticeTime

LANIO̒ʒmԂ擾

p@   : VC : LELanioGetNoticeTime(hLANIO handle, int *time);
         VB : LELanioGetNoticeTime(ByVal handle As Long, 
                ByRef time As Long )
   : handle  LANIOnh
         time    
                0x00:ʒmȂ 0x04: 3min    0x08:  ---   0x0c:  ---
                0x01:10sec    0x05:  ---    0x09:  ---   0x0d:  ---
                0x02:30sec    0x06:  ---    0x0a:  ---   0x0e:  ---
                0x03:60sec    0x07:  ---    0x0b:  ---   0x0f:  ---
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetNoticeTime(handle,&time);
         VB : Dim error As Long
              Dim time As Long
              error = LELanioGetNoticeTime(handle,time)
         LANIO̒ʒmԂtimeɎ擾܂B

 DIoԐݒ
LANIODIoԂw肷֐łB
LA-5P-Pł̂ݎgpł܂B

 LELanioSetDiDetectTime

LANIODIoԂݒ肷

p@   : VC : LELanioSetDiDetectTime(hLANIO handle, int time);
         VB : LELanioSetDiDetectTime(ByVal handle As Long, 
                ByVal time As Long )
   : handle  LANIOnh
         time    (msP 4ms`20msj
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetDiDetectTime(handle,10);
         VB : Dim error As Long
              error = LELanioSetDiDetectTime(handle,10)
         LANIÕ`^O̊Ԃ10msecɐݒ肵܂B

 LELanioGetDiDetectTime

LANIODIoԂ擾

p@   : VC : LELanioGetDiDetectTime(hLANIO handle, int *time);
         VB : LELanioGetDiDetectTime(ByVal handle As Long, 
                ByRef time As Long )
   : handle  LANIOnh
         time    (msP 4ms`20msj
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetDiDetectTime(handle,&time);
         VB : Dim error As Long
              Dim time As Long
              error = LELanioGetDiDetectTime(handle,time)
         LANIODIoԂtimeɎ擾܂B

 [A[ggݒ֐
LANIÕ[A[ggݒw肷֐łB
LA-5P-Pł̂ݎgpł܂B

 LELanioSetDiMailEnable

LANIODI[A[gݒ肵܂

p@   : VC : LELanioSetDiMailEnable(hLANIO handle, int enable);
         VB : LELanioSetDiMailEnable(ByVal handle As Long, 
                ByVal enable As Long )
   : handle  LANIOnh
         enable  [A[gsrbg1Ŏw
                 ŉʃrbgDI1ADI2...
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetDiMailEnable(handle,100);
         VB : Dim error As Long
              error = LELanioSetDiMailEnable(handle,0x1F)
         LA-5P-PDI1`DI5[A[gLɂ


DI1(1rbg)DI2(2rbg)DI3(3rbg)DI4(4rbg)DI5(5rbg)

L(1)       L(1)       L(1)       L(1)       L(1)       



 LELanioGetDiMailEnable

LANIODI[A[g擾܂

p@   : VC : LELanioGetDiMailEnable(hLANIO handle, int *enable);
         VB : LELanioGetDiMailEnable(ByVal handle As Long, 
                ByRef enable As Long )
   : handle  LANIOnh
         enable  [A[gsrbg1Ŏw
                 ŉʃrbgDI1ADI2...
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetDiMailEnable(handle,&enable);
         VB : Dim error As Long
              Dim enable As Long
              error = LELanioGetDiMailEnable(handle,enable)
         LANIÕ[A[gs͒[qenableɎ擾܂B


 LELanioSetDiMailLogic

LANIODI[A[g_ݒ肵܂

p@   : VC : LELanioSetDiMailLogic(hLANIO handle, int logic);
         VB : LELanioSetDiMailLogic(ByVal handle As Long, 
                ByVal logic As Long )
   : handle  LANIOnh
         logic   オGbWŃ[A[gsrbg1Ŏw
                 ŉʃrbgDI1ADI2...
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioSetDiMailLogic(handle,0x1F);
         VB : Dim error As Long
              error = LELanioSetDiMailLogic(handle,0x1F)
         LA-5P-PDI1`DI5ON(DILED_)̂ƂCP1[q([A[g[q)
         HIGHɂ


DI1(1rbg)DI2(2rbg)DI3(3rbg)DI4(4rbg)DI5(5rbg)

ON(1)          ON(1)        ON(1)         ON(1)         ON(1)         


 LELanioGetDiMailLogic

LANIODI[A[g_擾܂

p@   : VC : LELanioGetDiMailLogic(hLANIO handle, int *logic);
         VB : LELanioGetDiMailLogic(ByVal handle As Long, 
                ByRef logic As Long )
   : handle  LANIOnh
         logic   オGbWŃ[A[gsrbg1Ŏw
                 ŉʃrbgDI1ADI2...
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioGetDiMailLogic(handle,&logic);
         VB : Dim error As Long
              Dim logic As Long
              error = LELanioGetDiMailLogic(handle,logic)
         LANIÕ[A[gs_logicɎ擾܂B

 LELanioPulseModeOn

LA-5P-PPulseModeɓ܂

p@   : VC : LELanioPulseModeOn(hLANIO handle);
         VB : LELanioPulseModeOn(ByVal handle)
   : handle  LANIOnh
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeOn(handle);
         VB : Dim error As Long
              error = LELanioPulseModeOn(handle)
         LA-5P-PPulseModeɓ܂

 LELanioPulseModeOff

LA-5P-PPulseModeI܂

p@   : VC : LELanioPulseModeOff(hLANIO handle);
         VB : LELanioPulseModeOff(ByVal handle)
   : handle  LANIOnh
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeOff(handle);
         VB : Dim error As Long
              error = LELanioPulseModeOff(handle)
         LA-5P-PPulseModeI܂

 LELanioPulseModeGetState

LA-5P-PPulseModeԂ擾܂

p@   : VC : LELanioPulseModeGetState(hLANIO handle, int *mode);
         VB : LELanioPulseModeGetState(ByVal handle As Long, 
                ByRef mode As Long )
   : handle  LANIOnh
         mode    PulseModeԁB[hȂ1A[hłȂ0
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeGetState(handle,&mode);
         VB : Dim error As Long
              Dim mode As Long
              error = LELanioPulseModeGetState(handle,mode)
         LA-5P-PPulseModeԂmodeɎ擾܂

 LELanioPulseModeGetCount

PulseModẽpX擾܂

p@   : VC : LELanioPulseModeGetCount(hLANIO handle, int *value);
         VB : LELanioPulseModeGetCount(ByVal handle As Long, 
                ByRef value As Long )
   : handle  LANIOnh
         mode    PulseModeԁB[hȂ1A[hłȂ0
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeGetCount(handle,&value);
         VB : Dim error As Long
              Dim value As Long
              error = LELanioPulseModeGetCount(handle,value)
         PulseModẽpXvalueɎ擾܂

 LELanioPulseModeSetConfig

PulseMode̐ݒ܂

p@   : VC : LELanioPulseModeSetConfig(hLANIO handle,
                int pio, BOOL edge, int time, int chatter);
         VB : LELanioPulseModeSetConfig(ByVal handle As Long, 
                ByVal pio As Long, ByVal edge As Long,
                ByVal time As Long, ByVal chatter As Long )
   : handle  LANIOnh
         pio     삷DI|[gԍBDI1=0ADI2=1...
         edge    0ŗオA1ŗGbW
         time    莞 0:START-STOP  1:100msec  2:1sec  3:10sec
         chatter `^O} 0:Ȃ  1`3:ݒs  4`20:4`20msec
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeSetConfig(handle,0,1,2,4);
         VB : Dim error As Long
              error = LELanioPulseModeSetConfig(handle,0,1,2,4)
         PulseModeDI1AGbWA1secA`^O4msɐݒ肵܂B

 LELanioPulseModeGetConfig

PulseMode̐ݒ擾܂

p@   : VC : LELanioPulseModeGetConfig(hLANIO handle,
                int *pio, BOOL *edge, int *time, int *chatter);
         VB : LELanioPulseModeGetConfig(ByVal handle As Long, 
                ByRef pio As Long, ByRef edge As Long,
                ByRef time As Long, ByRef chatter As Long )
   : handle  LANIOnh
         pio     삷DI|[gԍBDI1=0ADI2=1...
         edge    0ŗオA1ŗGbW
         time    莞 0:START-STOP  1:100msec  2:1sec  3:10sec
         chatter `^O} 0:Ȃ  1`3:ݒs  4`20:4`20msec
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeGetConfig(handle,&pio,&edge,&time,&chatter);
         VB : Dim error As Long
              Dim pio As Long
              Dim edge As Long
              Dim time As Long
              Dim chatter As Long
              error = LELanioPulseModeGetConfig(handle,handle,pio,edge,chatter)
         PulseMode̐ݒpioAedgeAtimeAchatterɎ擾܂B

 LELanioPulseModeContinuesOn

pXAJn܂
LELanioPulseModeSetConfigtime0iSTART-STOPjɂĂKv܂

p@   : VC : LELanioPulseModeContinuesOn(hLANIO handle);
         VB : LELanioPulseModeContinuesOn(ByVal handle)
   : handle  LANIOnh
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeContinuesOn(handle);
         VB : Dim error As Long
              error = LELanioPulseModeContinuesOn(handle)
         pXAJn܂

 LELanioPulseModeContinuesOff

pXAI܂

p@   : VC : LELanioPulseModeContinuesOff(hLANIO handle);
         VB : LELanioPulseModeContinuesOff(ByVal handle)
   : handle  LANIOnh
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeContinuesOff(handle);
         VB : Dim error As Long
              error = LELanioPulseModeContinuesOff(handle)
         pXAI܂

 LELanioPulseModeContinuesGetState

pXAԂ擾܂

p@   : VC : LELanioPulseModeContinuesGetState(hLANIO handle, int *mode);
         VB : LELanioPulseModeContinuesGetState(ByVal handle As Long, 
                ByRef mode As Long )
   : handle  LANIOnh
         mode    pXAԁB[hȂ1A[hłȂ0
߂l : G[0AI0ȊOԂ܂
     : VC : int error = LELanioPulseModeContinuesGetState(handle,&mode);
         VB : Dim error As Long
              Dim mode As Long
              error = LELanioPulseModeContinuesGetState(handle,mode)
         pXAԂmodeɎ擾܂

