led.cdb
上传用户:dahaojd
上传日期:2008-01-29
资源大小:14357k
文件大小:1014k
源码类别:

DSP编程

开发平台:

C/C++

  1.     param iIsUsed :: 0
  2.     param iId :: 0
  3.     param iDelUser :: "USER"
  4.     param iDelMsg :: "ok"
  5.     param iHwi :: HWI_INT10
  6.     param iIntrSelectNum :: 3
  7. }
  8. object External_Pin_4 :: ISRC {
  9.     param iComment :: "<add comments here>"
  10.     param iIsUsed :: 0
  11.     param iId :: 0
  12.     param iDelUser :: "USER"
  13.     param iDelMsg :: "ok"
  14.     param iHwi :: HWI_INT4
  15.     param iIntrSelectNum :: 4
  16. }
  17. object External_Pin_5 :: ISRC {
  18.     param iComment :: "<add comments here>"
  19.     param iIsUsed :: 0
  20.     param iId :: 0
  21.     param iDelUser :: "USER"
  22.     param iDelMsg :: "ok"
  23.     param iHwi :: HWI_INT5
  24.     param iIntrSelectNum :: 5
  25. }
  26. object External_Pin_6 :: ISRC {
  27.     param iComment :: "<add comments here>"
  28.     param iIsUsed :: 0
  29.     param iId :: 0
  30.     param iDelUser :: "USER"
  31.     param iDelMsg :: "ok"
  32.     param iHwi :: HWI_INT6
  33.     param iIntrSelectNum :: 6
  34. }
  35. object External_Pin_7 :: ISRC {
  36.     param iComment :: "<add comments here>"
  37.     param iIsUsed :: 0
  38.     param iId :: 0
  39.     param iDelUser :: "USER"
  40.     param iDelMsg :: "ok"
  41.     param iHwi :: HWI_INT7
  42.     param iIntrSelectNum :: 7
  43. }
  44. object EDMA_Controller :: ISRC {
  45.     param iComment :: "<add comments here>"
  46.     param iIsUsed :: 0
  47.     param iId :: 0
  48.     param iDelUser :: "USER"
  49.     param iDelMsg :: "ok"
  50.     param iHwi :: HWI_INT8
  51.     param iIntrSelectNum :: 8
  52. }
  53. object HSRTDX11 :: ISRC {
  54.     param iComment :: "<add comments here>"
  55.     param iIsUsed :: 0
  56.     param iId :: 0
  57.     param iDelUser :: "USER"
  58.     param iDelMsg :: "ok"
  59.     param iHwi :: HWI_INT11
  60.     param iIntrSelectNum :: 10
  61. }
  62. object HSRTDX12 :: ISRC {
  63.     param iComment :: "<add comments here>"
  64.     param iIsUsed :: 0
  65.     param iId :: 0
  66.     param iDelUser :: "USER"
  67.     param iDelMsg :: "ok"
  68.     param iHwi :: HWI_INT12
  69.     param iIntrSelectNum :: 11
  70. }
  71. object MCSP_0_Transmit :: ISRC {
  72.     param iComment :: "<add comments here>"
  73.     param iIsUsed :: 0
  74.     param iId :: 0
  75.     param iDelUser :: "USER"
  76.     param iDelMsg :: "ok"
  77.     param iHwi :: HWI_UNUSED
  78.     param iIntrSelectNum :: 12
  79. }
  80. object MCSP_0_Receive :: ISRC {
  81.     param iComment :: "<add comments here>"
  82.     param iIsUsed :: 0
  83.     param iId :: 0
  84.     param iDelUser :: "USER"
  85.     param iDelMsg :: "ok"
  86.     param iHwi :: HWI_UNUSED
  87.     param iIntrSelectNum :: 13
  88. }
  89. object MCSP_1_Transmit :: ISRC {
  90.     param iComment :: "<add comments here>"
  91.     param iIsUsed :: 0
  92.     param iId :: 0
  93.     param iDelUser :: "USER"
  94.     param iDelMsg :: "ok"
  95.     param iHwi :: HWI_UNUSED
  96.     param iIntrSelectNum :: 14
  97. }
  98. object MCSP_1_Receive :: ISRC {
  99.     param iComment :: "<add comments here>"
  100.     param iIsUsed :: 0
  101.     param iId :: 0
  102.     param iDelUser :: "USER"
  103.     param iDelMsg :: "ok"
  104.     param iHwi :: HWI_UNUSED
  105.     param iIntrSelectNum :: 15
  106. }
  107. object HPI_PCI_to_DSP :: ISRC {
  108.     param iComment :: "<add comments here>"
  109.     param iIsUsed :: 0
  110.     param iId :: 0
  111.     param iDelUser :: "USER"
  112.     param iDelMsg :: "ok"
  113.     param iHwi :: HWI_UNUSED
  114.     param iIntrSelectNum :: 0
  115. }
  116. object EMIFA_SDRAM_Timer :: ISRC {
  117.     param iComment :: "<add comments here>"
  118.     param iIsUsed :: 0
  119.     param iId :: 0
  120.     param iDelUser :: "USER"
  121.     param iDelMsg :: "ok"
  122.     param iHwi :: HWI_UNUSED
  123.     param iIntrSelectNum :: 3
  124. }
  125. object GPIO_Interrupt_4 :: ISRC {
  126.     param iComment :: "<add comments here>"
  127.     param iIsUsed :: 0
  128.     param iId :: 0
  129.     param iDelUser :: "USER"
  130.     param iDelMsg :: "ok"
  131.     param iHwi :: HWI_INT4
  132.     param iIntrSelectNum :: 4
  133. }
  134. object GPIO_Interrupt_5 :: ISRC {
  135.     param iComment :: "<add comments here>"
  136.     param iIsUsed :: 0
  137.     param iId :: 0
  138.     param iDelUser :: "USER"
  139.     param iDelMsg :: "ok"
  140.     param iHwi :: HWI_INT5
  141.     param iIntrSelectNum :: 5
  142. }
  143. object GPIO_Interrupt_6 :: ISRC {
  144.     param iComment :: "<add comments here>"
  145.     param iIsUsed :: 0
  146.     param iId :: 0
  147.     param iDelUser :: "USER"
  148.     param iDelMsg :: "ok"
  149.     param iHwi :: HWI_INT6
  150.     param iIntrSelectNum :: 6
  151. }
  152. object GPIO_Interrupt_7 :: ISRC {
  153.     param iComment :: "<add comments here>"
  154.     param iIsUsed :: 0
  155.     param iId :: 0
  156.     param iDelUser :: "USER"
  157.     param iDelMsg :: "ok"
  158.     param iHwi :: HWI_INT7
  159.     param iIntrSelectNum :: 7
  160. }
  161. object EDMA_Interrupt :: ISRC {
  162.     param iComment :: "<add comments here>"
  163.     param iIsUsed :: 0
  164.     param iId :: 0
  165.     param iDelUser :: "USER"
  166.     param iDelMsg :: "ok"
  167.     param iHwi :: HWI_INT8
  168.     param iIntrSelectNum :: 8
  169. }
  170. object JTAGRTDX9 :: ISRC {
  171.     param iComment :: "<add comments here>"
  172.     param iIsUsed :: 0
  173.     param iId :: 0
  174.     param iDelUser :: "USER"
  175.     param iDelMsg :: "ok"
  176.     param iHwi :: HWI_UNUSED
  177.     param iIntrSelectNum :: 9
  178. }
  179. object EMU_DTDMA :: ISRC {
  180.     param iComment :: "<add comments here>"
  181.     param iIsUsed :: 0
  182.     param iId :: 0
  183.     param iDelUser :: "USER"
  184.     param iDelMsg :: "ok"
  185.     param iHwi :: HWI_INT9
  186.     param iIntrSelectNum :: 9
  187. }
  188. object EMU_RTDX_RX :: ISRC {
  189.     param iComment :: "<add comments here>"
  190.     param iIsUsed :: 0
  191.     param iId :: 0
  192.     param iDelUser :: "USER"
  193.     param iDelMsg :: "ok"
  194.     param iHwi :: HWI_INT10
  195.     param iIntrSelectNum :: 10
  196. }
  197. object EMU_RTDX_TX :: ISRC {
  198.     param iComment :: "<add comments here>"
  199.     param iIsUsed :: 0
  200.     param iId :: 0
  201.     param iDelUser :: "USER"
  202.     param iDelMsg :: "ok"
  203.     param iHwi :: HWI_INT11
  204.     param iIntrSelectNum :: 11
  205. }
  206. object GPIO_Interrupt_0 :: ISRC {
  207.     param iComment :: "<add comments here>"
  208.     param iIsUsed :: 0
  209.     param iId :: 0
  210.     param iDelUser :: "USER"
  211.     param iDelMsg :: "ok"
  212.     param iHwi :: HWI_UNUSED
  213.     param iIntrSelectNum :: 16
  214. }
  215. object MCSP_2_Transmit :: ISRC {
  216.     param iComment :: "<add comments here>"
  217.     param iIsUsed :: 0
  218.     param iId :: 0
  219.     param iDelUser :: "USER"
  220.     param iDelMsg :: "ok"
  221.     param iHwi :: HWI_UNUSED
  222.     param iIntrSelectNum :: 17
  223. }
  224. object MCSP_2_Receive :: ISRC {
  225.     param iComment :: "<add comments here>"
  226.     param iIsUsed :: 0
  227.     param iId :: 0
  228.     param iDelUser :: "USER"
  229.     param iDelMsg :: "ok"
  230.     param iHwi :: HWI_UNUSED
  231.     param iIntrSelectNum :: 18
  232. }
  233. object Timer_2 :: ISRC {
  234.     param iComment :: "<add comments here>"
  235.     param iIsUsed :: 0
  236.     param iId :: 0
  237.     param iDelUser :: "USER"
  238.     param iDelMsg :: "ok"
  239.     param iHwi :: HWI_UNUSED
  240.     param iIntrSelectNum :: 19
  241. }
  242. object EMIFB_SDRAM_Timer :: ISRC {
  243.     param iComment :: "<add comments here>"
  244.     param iIsUsed :: 0
  245.     param iId :: 0
  246.     param iDelUser :: "USER"
  247.     param iDelMsg :: "ok"
  248.     param iHwi :: HWI_UNUSED
  249.     param iIntrSelectNum :: 20
  250. }
  251. object PCI_WAKEUP :: ISRC {
  252.     param iComment :: "<add comments here>"
  253.     param iIsUsed :: 0
  254.     param iId :: 0
  255.     param iDelUser :: "USER"
  256.     param iDelMsg :: "ok"
  257.     param iHwi :: HWI_UNUSED
  258.     param iIntrSelectNum :: 21
  259. }
  260. object ICINT0 :: ISRC {
  261.     param iComment :: "<add comments here>"
  262.     param iIsUsed :: 0
  263.     param iId :: 0
  264.     param iDelUser :: "USER"
  265.     param iDelMsg :: "ok"
  266.     param iHwi :: HWI_UNUSED
  267.     param iIntrSelectNum :: 22
  268. }
  269. object UTOPIA_Interrupt :: ISRC {
  270.     param iComment :: "<add comments here>"
  271.     param iIsUsed :: 0
  272.     param iId :: 0
  273.     param iDelUser :: "USER"
  274.     param iDelMsg :: "ok"
  275.     param iHwi :: HWI_UNUSED
  276.     param iIntrSelectNum :: 23
  277. }
  278. object EMAC_MDIO_INT :: ISRC {
  279.     param iComment :: "<add comments here>"
  280.     param iIsUsed :: 0
  281.     param iId :: 0
  282.     param iDelUser :: "USER"
  283.     param iDelMsg :: "ok"
  284.     param iHwi :: HWI_UNUSED
  285.     param iIntrSelectNum :: 24
  286. }
  287. object VPINT0 :: ISRC {
  288.     param iComment :: "<add comments here>"
  289.     param iIsUsed :: 0
  290.     param iId :: 0
  291.     param iDelUser :: "USER"
  292.     param iDelMsg :: "ok"
  293.     param iHwi :: HWI_UNUSED
  294.     param iIntrSelectNum :: 25
  295. }
  296. object VPINT1 :: ISRC {
  297.     param iComment :: "<add comments here>"
  298.     param iIsUsed :: 0
  299.     param iId :: 0
  300.     param iDelUser :: "USER"
  301.     param iDelMsg :: "ok"
  302.     param iHwi :: HWI_UNUSED
  303.     param iIntrSelectNum :: 26
  304. }
  305. object VPINT2 :: ISRC {
  306.     param iComment :: "<add comments here>"
  307.     param iIsUsed :: 0
  308.     param iId :: 0
  309.     param iDelUser :: "USER"
  310.     param iDelMsg :: "ok"
  311.     param iHwi :: HWI_UNUSED
  312.     param iIntrSelectNum :: 27
  313. }
  314. object AXINT0 :: ISRC {
  315.     param iComment :: "<add comments here>"
  316.     param iIsUsed :: 0
  317.     param iId :: 0
  318.     param iDelUser :: "USER"
  319.     param iDelMsg :: "ok"
  320.     param iHwi :: HWI_UNUSED
  321.     param iIntrSelectNum :: 28
  322. }
  323. object ARINT0 :: ISRC {
  324.     param iComment :: "<add comments here>"
  325.     param iIsUsed :: 0
  326.     param iId :: 0
  327.     param iDelUser :: "USER"
  328.     param iDelMsg :: "ok"
  329.     param iHwi :: HWI_UNUSED
  330.     param iIntrSelectNum :: 29
  331. }
  332. type LOG {
  333.     isa ObjectMgr
  334.     prop name :: "LOG"
  335.     prop Label :: "LOG - Event Log Manager"
  336.     prop IsContainedIn :: INS
  337.     prop GlobalIcon :: 113
  338.     prop InstanceIcon :: 114
  339.     prop InstanceHelpTopic :: (207)
  340.     prop GlobalHelpTopic :: (107)
  341.     prop InstancePropertyPage :: ("{B7240DE8-AA51-11cf-9BFE-0000C0AC14C7}")
  342.     prop GlobalPropertyPage :: ("{B7240DE9-AA51-11cf-9BFE-0000C0AC14C7}")
  343.     prop maxObjs :: (32767)
  344.     prop AllocType :: ("2, _globalAllocDesc, _memSeg, _placement, _printfAllocDesc, _memSeg, _placement")
  345.     prop _globalAllocDesc :: ("%8t .%1L: {%12tn  %1U_A_TABBEG = .;n _%1U_A_TABBEG = .;n %2Sn %1U_A_TABEND = .;n _%1U_A_TABEND = .;n  %1U_A_TABLEN = (. - _%1U_A_TABBEG) / %3d;n _%1U_A_TABLEN = (. - _%1U_A_TABBEG) / %3d;%8tn }, name, _linkString, _objSize")
  346.     prop _printfAllocDesc :: ("%8t .printf (COPY): {}")
  347.     prop _placement :: (0x7fffffff / 2)
  348.     prop AllocInst :: ("1, _instAllocDesc, _objMemSeg, _placement")
  349.     prop _fillValue :: if GBL.DSPWORDSIZE == 16 {0xffff} else {0xffffffff}
  350.     prop _instAllocDesc :: ("%8t /* %0s buffer */n .%0s$buf: align = 0x%1x fill = 0x%2x {}, _objAlign, _fillValue")
  351.     prop _objSize :: if GBL.DSPTYPE == 55 {(2 * (6 * 4))} else {(6 * 4)}
  352.     prop _memSeg :: LOG.OBJMEMSEG
  353.     prop _linkString :: if self.gNumOf > 0 {"*(.%1L)"} else {"/* no %1U objects */"}
  354.     prop _objAlign :: if GBL.DSPTYPE == 55 {self.buflen * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE) * 2} else {self.buflen * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE)}
  355.     prop _objMemSeg :: self.bufseg
  356.     prop LogType :: self.iType
  357.     prop LogFormat :: self.iFormat
  358.     prop cGen :: 1
  359.     prop cHeaderName :: if self.gNumOf > 0 {"log.h"} else {""}
  360.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far LOG_Obj %0r;n"} else {"extern LOG_Obj %0r;n"})
  361.     prop dataSize :: ($d = 0, scan ($i; LOG) {if ($i.IsConfObj()) {$d += $i.buflen} , $d += (6 * 4)}, $d)
  362.     global gUser :: "USER" { 
  363.         prop Visible :: 0
  364.         prop Writable :: 0
  365.         prop NoGen :: 1
  366.     }
  367.     global gSetOf :: 0 { 
  368.         prop Visible :: 0
  369.         prop Writable :: 0
  370.         prop NoGen :: 1
  371.     }
  372.     global gNumOf :: 1 { 
  373.         prop Visible :: 0
  374.         prop Writable :: 0
  375.         prop NoGen :: 1
  376.     }
  377.     global gDirty :: 0 { 
  378.         prop Visible :: 0
  379.         prop Writable :: 0
  380.         prop NoGen :: 1
  381.     }
  382.     global gInitFlag :: 1 { 
  383.         prop Visible :: 0
  384.         prop Writable :: 0
  385.         prop NoGen :: 1
  386.     }
  387.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  388.         prop Visible :: 0
  389.         prop Writable :: 0
  390.         prop NoGen :: 1
  391.     }
  392.     global OBJMEMSEG :: ISRAM { 
  393.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  394.         prop MemberType :: MEM
  395.         prop MemberTest :: MEM.dataMember($1)
  396.         prop Label :: "Object Memory"
  397.         prop JSName :: "OBJMEMSEG"
  398.         prop Visible :: 1
  399.         prop Writable :: 1
  400.         prop NoGen :: 1
  401.     }
  402.     global ENABLED :: 1 { 
  403.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  404.         prop Label :: "Compile in logging"
  405.         prop Visible :: 0
  406.         prop Writable :: 0
  407.         prop NoGen :: 0
  408.     }
  409.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  410.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  411.         prop Label :: "comment"
  412.         prop JSName :: "comment"
  413.         prop Visible :: 1
  414.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  415.         prop NoGen :: 1
  416.     }
  417.     inst iIsUsed :: 0 { 
  418.         prop Visible :: 0
  419.         prop Writable :: 0
  420.         prop NoGen :: 1
  421.     }
  422.     inst iId :: 0 { 
  423.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  424.         prop Style :: 0x01
  425.         prop Visible :: 0
  426.         prop Writable :: 1
  427.         prop NoGen :: 1
  428.     }
  429.     inst iDelUser :: "USER" { 
  430.         prop Visible :: 0
  431.         prop Writable :: 0
  432.         prop NoGen :: 1
  433.     }
  434.     inst iDelMsg :: "ok" { 
  435.         prop Visible :: 0
  436.         prop Writable :: 0
  437.         prop NoGen :: 1
  438.     }
  439.     inst bufseg :: = self.OBJMEMSEG { 
  440.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  441.         prop MemberType :: MEM
  442.         prop MemberTest :: MEM.dataMember($1)
  443.         prop Label :: "bufseg"
  444.         prop JSName :: "bufSeg"
  445.         prop Visible :: 1
  446.         prop Writable :: 1
  447.         prop NoGen :: 0
  448.     }
  449.     inst buflen :: 64 { 
  450.         prop Type :: "{A11FE980-C07A-11cf-9BFE-0000C0AC14C7}"
  451.         prop Enum :: "0,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768"
  452.         prop Label :: "buflen (words)"
  453.         prop JSName :: "bufLen"
  454.         prop Visible :: 1
  455.         prop Writable :: 1
  456.         prop NoGen :: 0
  457.         prop Set :: (GlobalStatus.gDirty = 1, self.buflen = $1, "ok")
  458.     }
  459.     inst logtype :: "circular" { 
  460.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  461.         prop Enum :: "circular,fixed"
  462.         prop Label :: "logtype"
  463.         prop JSName :: "logType"
  464.         prop Visible :: 1
  465.         prop Writable :: 1
  466.         prop NoGen :: 0
  467.     }
  468.     inst iType :: "printf" { 
  469.         prop Label :: "datatype"
  470.         prop JSName :: "dataType"
  471.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  472.         prop Enum :: "printf,raw data"
  473.         prop Visible :: 1
  474.         prop Writable :: if self.iType == "system" {0} else {1}
  475.         prop NoGen :: 1
  476.     }
  477.     inst iFormat :: "0x%x, 0x%x, 0x%x" { 
  478.         prop Label :: "format"
  479.         prop JSName :: "format"
  480.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  481.         prop Visible :: 1
  482.         prop Writable :: if self.iType == "raw data" {1} else {0}
  483.         prop NoGen :: 1
  484.     }
  485. }
  486. object LOG_system :: LOG {
  487.     param iComment :: "This object is required by the system to accumulate execution trace information"
  488.     param iIsUsed :: 1
  489.     param iId :: 0
  490.     param iDelUser :: "LOG"
  491.     param iDelMsg :: "LOG_system is a system log and cannot be deleted."
  492.     param buflen :: 64
  493.     param logtype :: "circular"
  494.     param iType :: "system"
  495.     param iFormat :: "0x%x, 0x%x, 0x%x"
  496. }
  497. type PIP {
  498.     isa ObjectMgr
  499.     prop Label :: "PIP - Buffered Pipe Manager"
  500.     prop IsContainedIn :: IOF
  501.     prop GlobalIcon :: 117
  502.     prop InstanceIcon :: 118
  503.     prop GlobalHelpTopic :: (109)
  504.     prop InstanceHelpTopic :: (209)
  505.     prop name :: "PIP"
  506.     prop maxObjs :: (32767)
  507.     prop dataSize :: ($b = 0, scan ($i; PIP) {if ($i.IsConfObj()) {$b += (12 + $i.framesize) * $i.numframes + 100} }, $b)
  508.     prop InstancePropertyPage :: ("{B7240DF0-AA51-11cf-9BFE-0000C0AC14C8}")
  509.     prop GlobalPropertyPage :: ("{B7240DF1-AA51-11cf-9BFE-0000C0AC14C8}")
  510.     prop localCreate :: ("ok")
  511.     prop AllocType :: ("1, _globalAllocDesc, _memSeg, _placement")
  512.     prop _globalAllocDesc :: ("%8t .%1L: {%12tn  %1U_A_TABBEG = .;n _%1U_A_TABBEG = .;n %2Sn %1U_A_TABEND = .;n _%1U_A_TABEND = .;n  %1U_A_TABLEN = (. - _%1U_A_TABBEG) / %3d;n _%1U_A_TABLEN = (. - _%1U_A_TABBEG) / %3d;%8tn }, name, _linkString, _objSize")
  513.     prop AllocInst :: ("1, _instAllocDesc, _objMemSeg, _placement")
  514.     prop _instAllocDesc :: (if self.bufalign > 1 {"%8t /* %0s buffer */n .pip%1d: align = 0x%2x {}, _objId, _objAlign"} else {"%8t /* %0s buffer */n .pip%1d: {}, _objId"})
  515.     prop _placement :: (0x7fffffff / 2)
  516.     prop _objId :: self.iId
  517.     prop _objAlign :: self.bufalign * 4
  518.     prop _objMemSeg :: self.bufseg
  519.     prop _linkString :: if (self.gNumOf + self.gNumEmbed) > 0 {"*(.%1L)"} else {"/* no %1U objects */"}
  520.     prop _memSeg :: PIP.OBJMEMSEG
  521.     prop _objSize :: 100
  522.     prop mkId :: (self.iId = self.gNextId++, self.gNumOf++, self.iId)
  523.     prop cGen :: 1
  524.     prop cHeaderName :: if self.gNumOf > 0 {"pip.h"} else {""}
  525.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far PIP_Obj %0r;n"} else {"extern PIP_Obj %0r;n"})
  526.     global gUser :: "USER" { 
  527.         prop Visible :: 0
  528.         prop Writable :: 0
  529.         prop NoGen :: 1
  530.     }
  531.     global gSetOf :: 0 { 
  532.         prop Visible :: 0
  533.         prop Writable :: 0
  534.         prop NoGen :: 1
  535.     }
  536.     global gNumOf :: 0 { 
  537.         prop Visible :: 0
  538.         prop Writable :: 0
  539.         prop NoGen :: 1
  540.     }
  541.     global gDirty :: 0 { 
  542.         prop Visible :: 0
  543.         prop Writable :: 0
  544.         prop NoGen :: 1
  545.     }
  546.     global gInitFlag :: 1 { 
  547.         prop Visible :: 0
  548.         prop Writable :: 0
  549.         prop NoGen :: 1
  550.     }
  551.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  552.         prop Visible :: 0
  553.         prop Writable :: 0
  554.         prop NoGen :: 1
  555.     }
  556.     global OBJMEMSEG :: ISRAM { 
  557.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  558.         prop MemberType :: MEM
  559.         prop MemberTest :: MEM.dataMember($1)
  560.         prop Label :: "Object Memory"
  561.         prop JSName :: "OBJMEMSEG"
  562.         prop Visible :: 1
  563.         prop Writable :: 1
  564.         prop NoGen :: 1
  565.     }
  566.     global gNumEmbed :: 2 { 
  567.         prop NoGen :: 0
  568.     }
  569.     global gNextId :: 0
  570.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  571.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  572.         prop Label :: "comment"
  573.         prop JSName :: "comment"
  574.         prop Visible :: 1
  575.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  576.         prop NoGen :: 1
  577.     }
  578.     inst iIsUsed :: 0 { 
  579.         prop Visible :: 0
  580.         prop Writable :: 0
  581.         prop NoGen :: 1
  582.     }
  583.     inst iId :: 0 { 
  584.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  585.         prop Style :: 0x01
  586.         prop Visible :: 0
  587.         prop Writable :: 1
  588.         prop NoGen :: 1
  589.     }
  590.     inst iDelUser :: "USER" { 
  591.         prop Visible :: 0
  592.         prop Writable :: 0
  593.         prop NoGen :: 1
  594.     }
  595.     inst iDelMsg :: "ok" { 
  596.         prop Visible :: 0
  597.         prop Writable :: 0
  598.         prop NoGen :: 1
  599.     }
  600.     inst bufseg :: = self.OBJMEMSEG { 
  601.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  602.         prop JSName :: "bufSeg"
  603.         prop MemberType :: MEM
  604.         prop MemberTest :: MEM.dataMember($1)
  605.         prop Visible :: 1
  606.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  607.         prop NoGen :: 1
  608.     }
  609.     inst bufalign :: 1 { 
  610.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  611.         prop JSName :: "bufAlign"
  612.         prop Style :: 0x01 | 0x02
  613.         prop Visible :: 1
  614.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  615.         prop NoGen :: 1
  616.         prop Set :: ($e = "ok", if ($1 == 0) {$e = self.error("Cannot set align value to 0")} else {self.bufalign = $1}, $e)
  617.     }
  618.     inst buf :: "<NULL>" { 
  619.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  620.         prop Visible :: 0
  621.         prop Writable :: 0
  622.         prop NoGen :: 0
  623.     }
  624.     inst framesize :: 8 { 
  625.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  626.         prop Label :: "framesize (words)"
  627.         prop JSName :: "frameSize"
  628.         prop Style :: if GBL.DSPTYPE == 62 {0x02} else {0x01 | 0x02}
  629.         prop Visible :: 1
  630.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  631.         prop NoGen :: 0
  632.         prop Set :: (if ($1 < 1) {self.error("framesize must be >= 1.")} else {GlobalStatus.gDirty = 1, self.framesize = $1, "ok"})
  633.     }
  634.     inst numframes :: 2 { 
  635.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  636.         prop Style :: 0x01
  637.         prop JSName :: "numFrames"
  638.         prop Visible :: 1
  639.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  640.         prop NoGen :: 0
  641.         prop Set :: (if ($1 < 1) {self.error("Pipes must contain at least 1 frame.")} else {GlobalStatus.gDirty = 1, self.numframes = $1, "ok"})
  642.     }
  643.     inst monitor :: "reader" { 
  644.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  645.         prop JSName :: "monitor"
  646.         prop Enum :: "reader,writer,none"
  647.         prop Visible :: 1
  648.         prop Writable :: 1
  649.         prop NoGen :: 0
  650.     }
  651.     inst notifyWriter :: @_FXN_F_nop { 
  652.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  653.         prop JSName :: "notifyWriterFxn"
  654.         prop Visible :: 1
  655.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  656.         prop NoGen :: 0
  657.         prop TabName :: "Notify Functions"
  658.     }
  659.     inst nwarg0 :: 0 { 
  660.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  661.         prop JSName :: "notifyWriterArg0"
  662.         prop Visible :: 1
  663.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  664.         prop NoGen :: 0
  665.         prop TabName :: "Notify Functions"
  666.     }
  667.     inst nwarg1 :: 0 { 
  668.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  669.         prop JSName :: "notifyWriterArg1"
  670.         prop Visible :: 1
  671.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  672.         prop NoGen :: 0
  673.         prop TabName :: "Notify Functions"
  674.     }
  675.     inst notifyReader :: @_FXN_F_nop { 
  676.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  677.         prop JSName :: "notifyReaderFxn"
  678.         prop Visible :: 1
  679.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  680.         prop NoGen :: 0
  681.         prop TabName :: "Notify Functions"
  682.     }
  683.     inst nrarg0 :: 0 { 
  684.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  685.         prop JSName :: "notifyReaderArg0"
  686.         prop Visible :: 1
  687.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  688.         prop NoGen :: 0
  689.         prop TabName :: "Notify Functions"
  690.     }
  691.     inst nrarg1 :: 0 { 
  692.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  693.         prop JSName :: "notifyReaderArg1"
  694.         prop Visible :: 1
  695.         prop Writable :: (if self.iDelUser == "USER" {1} else {0})
  696.         prop NoGen :: 0
  697.         prop TabName :: "Notify Functions"
  698.     }
  699.     inst bufFrameAlign :: = self._objAlign { 
  700.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  701.         prop Visible :: 0
  702.         prop Writable :: 0
  703.         prop NoGen :: 0
  704.     }
  705. }
  706. type SEM {
  707.     isa ObjectMgr
  708.     prop name :: "SEM"
  709.     prop Label :: "SEM - Semaphore Manager"
  710.     prop IsContainedIn :: SYN
  711.     prop GlobalIcon :: 137
  712.     prop InstanceIcon :: 138
  713.     prop GlobalHelpTopic :: (310)
  714.     prop InstanceHelpTopic :: (410)
  715.     prop InstancePropertyPage :: ("{D01ACC04-38DD-11d1-988B-0020AFEE33C6}")
  716.     prop GlobalPropertyPage :: ("{D01ACC05-38DD-11d1-988B-0020AFEE33C6}")
  717.     prop maxObjs :: (32767)
  718.     prop AllocType :: (if (self.gNumOf > 0) {"1, _globalAllocDesc, _memSeg, _placement"} )
  719.     prop _globalAllocDesc :: ("%8t .sem: {}")
  720.     prop _placement :: (0x7fffffff / 2)
  721.     prop _memSeg :: self.OBJMEMSEG
  722.     prop dataSize :: ((8 + 3) * SEM.gNumOf * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE))
  723.     prop cGen :: 1
  724.     prop cHeaderName :: if self.gNumOf > 0 {"sem.h"} else {""}
  725.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far SEM_Obj %0r;n"} else {"extern SEM_Obj %0r;n"})
  726.     global gUser :: "USER" { 
  727.         prop Visible :: 0
  728.         prop Writable :: 0
  729.         prop NoGen :: 1
  730.     }
  731.     global gSetOf :: 0 { 
  732.         prop Visible :: 0
  733.         prop Writable :: 0
  734.         prop NoGen :: 1
  735.     }
  736.     global gNumOf :: 0 { 
  737.         prop Visible :: 0
  738.         prop Writable :: 0
  739.         prop NoGen :: 1
  740.     }
  741.     global gDirty :: 0 { 
  742.         prop Visible :: 0
  743.         prop Writable :: 0
  744.         prop NoGen :: 1
  745.     }
  746.     global gInitFlag :: 1 { 
  747.         prop Visible :: 0
  748.         prop Writable :: 0
  749.         prop NoGen :: 1
  750.     }
  751.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  752.         prop Visible :: 0
  753.         prop Writable :: 0
  754.         prop NoGen :: 1
  755.     }
  756.     global CALLBACKOBJ :: nil { 
  757.         prop Visible :: 0
  758.         prop Writable :: 0
  759.         prop NoGen :: 1
  760.     }
  761.     global OBJMEMSEG :: ISRAM { 
  762.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  763.         prop MemberType :: MEM
  764.         prop MemberTest :: MEM.dataMember($1)
  765.         prop Label :: "Object Memory"
  766.         prop JSName :: "OBJMEMSEG"
  767.         prop Visible :: 1
  768.         prop Writable :: 1
  769.         prop NoGen :: 1
  770.     }
  771.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  772.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  773.         prop Label :: "comment"
  774.         prop JSName :: "comment"
  775.         prop Visible :: 1
  776.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  777.         prop NoGen :: 1
  778.     }
  779.     inst iIsUsed :: 0 { 
  780.         prop Visible :: 0
  781.         prop Writable :: 0
  782.         prop NoGen :: 1
  783.     }
  784.     inst iId :: 0 { 
  785.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  786.         prop Style :: 0x01
  787.         prop Visible :: 0
  788.         prop Writable :: 1
  789.         prop NoGen :: 1
  790.     }
  791.     inst iDelUser :: "USER" { 
  792.         prop Visible :: 0
  793.         prop Writable :: 0
  794.         prop NoGen :: 1
  795.     }
  796.     inst iDelMsg :: "ok" { 
  797.         prop Visible :: 0
  798.         prop Writable :: 0
  799.         prop NoGen :: 1
  800.     }
  801.     inst iCount :: 0 { 
  802.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  803.         prop Style :: 0x02
  804.         prop Label :: "Initial semaphore count"
  805.         prop JSName :: "count"
  806.         prop Visible :: 1
  807.         prop Writable :: 1
  808.     }
  809. }
  810. type MBX {
  811.     isa ObjectMgr
  812.     prop name :: "MBX"
  813.     prop Label :: "MBX - Mailbox Manager"
  814.     prop IsContainedIn :: SYN
  815.     prop GlobalIcon :: 131
  816.     prop InstanceIcon :: 132
  817.     prop GlobalHelpTopic :: (307)
  818.     prop InstanceHelpTopic :: (407)
  819.     prop InstancePropertyPage :: ("{0EB45D44-38C1-11d1-988B-0020AFEE33C6}")
  820.     prop GlobalPropertyPage :: ("{0EB45D45-38C1-11d1-988B-0020AFEE33C6}")
  821.     prop maxObjs :: (32767)
  822.     prop AllocType :: (if (self.gNumOf > 0) {"1, _bssAllocDesc, _memSeg, _placement"} )
  823.     prop _bssAllocDesc :: ("%8t .mbx: {}")
  824.     prop _placement :: (0x7fffffff / 2)
  825.     prop _memSeg :: self.OBJMEMSEG
  826.     prop AllocInst :: ("1 _instAllocDesc, _instMemSeg, _placement")
  827.     prop _instAllocDesc :: ("%8t .%0s$que: align = 0x4 {%12tn %0s$queElems = .;n . += %1d;%8tn }, _qElemSize")
  828.     prop _instMemSeg :: self.iMbxSeg
  829.     prop _qElemSize :: (if ((GBL.DSPTYPE == 55) || (GBL.DSPTYPE == 28)) {$a = self.iMsgSize, if ($a & 0x1) {$a += 1} , (2 + $a) * self.iMbxLength * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE) * 2} else {(2 + self.iMsgSize) * self.iMbxLength * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE)})
  830.     prop dataSize :: ($d = 0, scan ($i; MBX) {$d += (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE) * (($i.iMsgSize + 2) * $i.iMbxLength + 29)}, $d)
  831.     prop cGen :: 1
  832.     prop cHeaderName :: if self.gNumOf > 0 {"mbx.h"} else {""}
  833.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far MBX_Obj %0r;n"} else {"extern MBX_Obj %0r;n"})
  834.     global gUser :: "USER" { 
  835.         prop Visible :: 0
  836.         prop Writable :: 0
  837.         prop NoGen :: 1
  838.     }
  839.     global gSetOf :: 0 { 
  840.         prop Visible :: 0
  841.         prop Writable :: 0
  842.         prop NoGen :: 1
  843.     }
  844.     global gNumOf :: 0 { 
  845.         prop Visible :: 0
  846.         prop Writable :: 0
  847.         prop NoGen :: 1
  848.     }
  849.     global gDirty :: 0 { 
  850.         prop Visible :: 0
  851.         prop Writable :: 0
  852.         prop NoGen :: 1
  853.     }
  854.     global gInitFlag :: 1 { 
  855.         prop Visible :: 0
  856.         prop Writable :: 0
  857.         prop NoGen :: 1
  858.     }
  859.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  860.         prop Visible :: 0
  861.         prop Writable :: 0
  862.         prop NoGen :: 1
  863.     }
  864.     global CALLBACKOBJ :: nil { 
  865.         prop Visible :: 0
  866.         prop Writable :: 0
  867.         prop NoGen :: 1
  868.     }
  869.     global OBJMEMSEG :: ISRAM { 
  870.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  871.         prop MemberType :: MEM
  872.         prop MemberTest :: MEM.dataMember($1)
  873.         prop Label :: "Object Memory"
  874.         prop JSName :: "OBJMEMSEG"
  875.         prop Visible :: 1
  876.         prop Writable :: 1
  877.         prop NoGen :: 1
  878.     }
  879.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  880.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  881.         prop Label :: "comment"
  882.         prop JSName :: "comment"
  883.         prop Visible :: 1
  884.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  885.         prop NoGen :: 1
  886.     }
  887.     inst iIsUsed :: 0 { 
  888.         prop Visible :: 0
  889.         prop Writable :: 0
  890.         prop NoGen :: 1
  891.     }
  892.     inst iId :: 0 { 
  893.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  894.         prop Style :: 0x01
  895.         prop Visible :: 0
  896.         prop Writable :: 1
  897.         prop NoGen :: 1
  898.     }
  899.     inst iDelUser :: "USER" { 
  900.         prop Visible :: 0
  901.         prop Writable :: 0
  902.         prop NoGen :: 1
  903.     }
  904.     inst iDelMsg :: "ok" { 
  905.         prop Visible :: 0
  906.         prop Writable :: 0
  907.         prop NoGen :: 1
  908.     }
  909.     inst iMsgSize :: 1 { 
  910.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  911.         prop Style :: 0x02
  912.         prop Label :: "Message Size"
  913.         prop JSName :: "messageSize"
  914.         prop Visible :: 1
  915.         prop Writable :: 1
  916.         prop Set :: (if ($1 == 0) {self.error("Message size cannot be zero")} else {GlobalStatus.gDirty = 1, self.iMsgSize = $1, "ok"})
  917.     }
  918.     inst iMbxLength :: 1 { 
  919.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  920.         prop Style :: 0x02
  921.         prop Label :: "Mailbox Length"
  922.         prop JSName :: "length"
  923.         prop Visible :: 1
  924.         prop Writable :: 1
  925.         prop Set :: (if ($1 == 0) {self.error("Mailbox length cannot be zero")} else {GlobalStatus.gDirty = 1, self.iMbxLength = $1, "ok"})
  926.     }
  927.     inst iMbxSeg :: MBX.OBJMEMSEG { 
  928.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  929.         prop MemberType :: MEM
  930.         prop MemberTest :: MEM.dataMember($1)
  931.         prop Label :: "Element memory segment"
  932.         prop JSName :: "elementSeg"
  933.         prop Visible :: 1
  934.         prop Writable :: 1
  935.     }
  936. }
  937. type QUE {
  938.     isa ObjectMgr
  939.     prop name :: "QUE"
  940.     prop Label :: "QUE - Atomic Queue Manager"
  941.     prop IsContainedIn :: SYN
  942.     prop GlobalIcon :: 133
  943.     prop InstanceIcon :: 134
  944.     prop IsConfMod :: 1
  945.     prop GlobalHelpTopic :: (309)
  946.     prop InstanceHelpTopic :: (409)
  947.     prop InstancePropertyPage :: ("{D01ACC01-38DD-11d1-988B-0020AFEE33C6}")
  948.     prop GlobalPropertyPage :: ("{D01ACC02-38DD-11d1-988B-0020AFEE33C6}")
  949.     prop maxObjs :: (32767)
  950.     prop AllocType :: (if (self.gNumOf > 0) {"1, _globalAllocDesc, _memSeg, _placement"} )
  951.     prop _globalAllocDesc :: ("%8t .que: {}")
  952.     prop _placement :: (0x7fffffff / 2)
  953.     prop _memSeg :: self.OBJMEMSEG
  954.     prop dataSize :: (2 * QUE.gNumOf * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE))
  955.     prop cGen :: 1
  956.     prop cHeaderName :: if self.gNumOf > 0 {"que.h"} else {""}
  957.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far QUE_Obj %0r;n"} else {"extern QUE_Obj %0r;n"})
  958.     global gUser :: "USER" { 
  959.         prop Visible :: 0
  960.         prop Writable :: 0
  961.         prop NoGen :: 1
  962.     }
  963.     global gSetOf :: 0 { 
  964.         prop Visible :: 0
  965.         prop Writable :: 0
  966.         prop NoGen :: 1
  967.     }
  968.     global gNumOf :: 0 { 
  969.         prop Visible :: 0
  970.         prop Writable :: 0
  971.         prop NoGen :: 1
  972.     }
  973.     global gDirty :: 0 { 
  974.         prop Visible :: 0
  975.         prop Writable :: 0
  976.         prop NoGen :: 1
  977.     }
  978.     global gInitFlag :: 1 { 
  979.         prop Visible :: 0
  980.         prop Writable :: 0
  981.         prop NoGen :: 1
  982.     }
  983.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  984.         prop Visible :: 0
  985.         prop Writable :: 0
  986.         prop NoGen :: 1
  987.     }
  988.     global CALLBACKOBJ :: nil { 
  989.         prop Visible :: 0
  990.         prop Writable :: 0
  991.         prop NoGen :: 1
  992.     }
  993.     global OBJMEMSEG :: ISRAM { 
  994.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  995.         prop MemberType :: MEM
  996.         prop MemberTest :: MEM.dataMember($1)
  997.         prop Label :: "Object Memory"
  998.         prop JSName :: "OBJMEMSEG"
  999.         prop Visible :: 1
  1000.         prop Writable :: 1
  1001.         prop NoGen :: 1
  1002.     }
  1003.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  1004.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1005.         prop Label :: "comment"
  1006.         prop JSName :: "comment"
  1007.         prop Visible :: 1
  1008.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  1009.         prop NoGen :: 1
  1010.     }
  1011.     inst iIsUsed :: 0 { 
  1012.         prop Visible :: 0
  1013.         prop Writable :: 0
  1014.         prop NoGen :: 1
  1015.     }
  1016.     inst iId :: 0 { 
  1017.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1018.         prop Style :: 0x01
  1019.         prop Visible :: 0
  1020.         prop Writable :: 1
  1021.         prop NoGen :: 1
  1022.     }
  1023.     inst iDelUser :: "USER" { 
  1024.         prop Visible :: 0
  1025.         prop Writable :: 0
  1026.         prop NoGen :: 1
  1027.     }
  1028.     inst iDelMsg :: "ok" { 
  1029.         prop Visible :: 0
  1030.         prop Writable :: 0
  1031.         prop NoGen :: 1
  1032.     }
  1033. }
  1034. type LCK {
  1035.     isa ObjectMgr
  1036.     prop name :: "LCK"
  1037.     prop Label :: "LCK - Resource Lock Manager"
  1038.     prop IsContainedIn :: SYN
  1039.     prop GlobalIcon :: 129
  1040.     prop InstanceIcon :: 130
  1041.     prop IsConfMod :: 1
  1042.     prop GlobalHelpTopic :: (306)
  1043.     prop InstanceHelpTopic :: (406)
  1044.     prop InstancePropertyPage :: ("{0EB45D40-38C1-11d1-988B-0020AFEE33C6}")
  1045.     prop GlobalPropertyPage :: ("{0EB45D41-38C1-11d1-988B-0020AFEE33C6}")
  1046.     prop maxObjs :: (32767)
  1047.     prop AllocType :: (if (self.gNumOf > 0) {"1, _bssAllocDesc, _memSeg, _placement"} )
  1048.     prop _bssAllocDesc :: ("%8t .lck: {}")
  1049.     prop _objAllocDesc :: ("%8t .LCK$obj: {}")
  1050.     prop _placement :: (0x7fffffff / 2)
  1051.     prop _memSeg :: self.OBJMEMSEG
  1052.     prop dataSize :: ((8 + 2) * LCK.gNumOf * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE))
  1053.     prop cGen :: 1
  1054.     prop cHeaderName :: if self.gNumOf > 0 {"lck.h"} else {""}
  1055.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far LCK_Obj %0r;n"} else {"extern LCK_Obj %0r;n"})
  1056.     global gUser :: "USER" { 
  1057.         prop Visible :: 0
  1058.         prop Writable :: 0
  1059.         prop NoGen :: 1
  1060.     }
  1061.     global gSetOf :: 0 { 
  1062.         prop Visible :: 0
  1063.         prop Writable :: 0
  1064.         prop NoGen :: 1
  1065.     }
  1066.     global gNumOf :: 0 { 
  1067.         prop Visible :: 0
  1068.         prop Writable :: 0
  1069.         prop NoGen :: 1
  1070.     }
  1071.     global gDirty :: 0 { 
  1072.         prop Visible :: 0
  1073.         prop Writable :: 0
  1074.         prop NoGen :: 1
  1075.     }
  1076.     global gInitFlag :: 1 { 
  1077.         prop Visible :: 0
  1078.         prop Writable :: 0
  1079.         prop NoGen :: 1
  1080.     }
  1081.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1082.         prop Visible :: 0
  1083.         prop Writable :: 0
  1084.         prop NoGen :: 1
  1085.     }
  1086.     global CALLBACKOBJ :: nil { 
  1087.         prop Visible :: 0
  1088.         prop Writable :: 0
  1089.         prop NoGen :: 1
  1090.     }
  1091.     global OBJMEMSEG :: ISRAM { 
  1092.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  1093.         prop MemberType :: MEM
  1094.         prop MemberTest :: MEM.dataMember($1)
  1095.         prop Label :: "Object Memory"
  1096.         prop JSName :: "OBJMEMSEG"
  1097.         prop Visible :: 1
  1098.         prop Writable :: 1
  1099.         prop NoGen :: 1
  1100.     }
  1101.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  1102.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1103.         prop Label :: "comment"
  1104.         prop JSName :: "comment"
  1105.         prop Visible :: 1
  1106.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  1107.         prop NoGen :: 1
  1108.     }
  1109.     inst iIsUsed :: 0 { 
  1110.         prop Visible :: 0
  1111.         prop Writable :: 0
  1112.         prop NoGen :: 1
  1113.     }
  1114.     inst iId :: 0 { 
  1115.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1116.         prop Style :: 0x01
  1117.         prop Visible :: 0
  1118.         prop Writable :: 1
  1119.         prop NoGen :: 1
  1120.     }
  1121.     inst iDelUser :: "USER" { 
  1122.         prop Visible :: 0
  1123.         prop Writable :: 0
  1124.         prop NoGen :: 1
  1125.     }
  1126.     inst iDelMsg :: "ok" { 
  1127.         prop Visible :: 0
  1128.         prop Writable :: 0
  1129.         prop NoGen :: 1
  1130.     }
  1131. }
  1132. type SIO {
  1133.     isa ObjectMgr
  1134.     prop name :: "SIO"
  1135.     prop Label :: "SIO - Stream Input and Output Manager"
  1136.     prop IsContainedIn :: IOF
  1137.     prop GlobalIcon :: 139
  1138.     prop InstanceIcon :: 140
  1139.     prop GlobalHelpTopic :: (311)
  1140.     prop InstanceHelpTopic :: (411)
  1141.     prop InstancePropertyPage :: ("{7C4C9A60-763E-11d1-988B-0020AFEE33C6}")
  1142.     prop GlobalPropertyPage :: ("{7C4C9A61-763E-11d1-988B-0020AFEE33C6}")
  1143.     prop DependsOn :: "DEV,UDEV,DGN,DHL,DPI"
  1144.     prop maxObjs :: (32767)
  1145.     prop AllocType :: (if (self.gNumOf > 0) {"2, _bssAllocDesc, _memSeg, _placement,
  1146.           _objAllocDesc, _memSeg, _placement"} )
  1147.     prop _bssAllocDesc :: ("%8t .SIO$bss: {%12tn *(.SIO$bss)%8tn }")
  1148.     prop _objAllocDesc :: ("%8t .SIO$obj: {%12tn *(.SIO$obj)%8tn }")
  1149.     prop _placement :: (0x7fffffff / 2)
  1150.     prop _memSeg :: self.OBJMEMSEG
  1151.     prop AllocInst :: ("1, _instBufDesc, _instBufSeg, _placement")
  1152.     prop _instBufDesc :: (if self.iAlign > 1 {"%8t .%0s$bufs: align = 0x%1x {}, _objAlign"} else {"%8t .%0s$bufs: {}"})
  1153.     prop _objAlign :: self.iAlign
  1154.     prop _instBufSeg :: self.iBufSegid
  1155.     prop defDev :: ($h = nil, $i = nil, $j = nil, scan ($h; nil) {if ($h.isDriver == 1) {scan ($i; $h) {if ($j == nil && $i.iIsTerminal != 0 && $i.iIsVirtual == 0) {$j = $i, break} }} }, $j)
  1156.     prop devList :: ($h = nil, $i = nil, $j = nil, scan ($h; nil) {if ($h.isDriver == 1) {scan ($i; $h) {if ($j == nil && $i.iIsTerminal != 0 && $i.iIsVirtual == 0) {$j = $i, scan ($a; DIO) {if ($a == $i) {$i.numTimeUse++} }, break} }} }, $j)
  1157.     prop setDev :: ($h = nil, $i = nil, $j = nil, scan ($h; nil) {if ($h.isDriver == 1) {scan ($i; $h) {if ($i == $1) {$j = $i} }} }, $j)
  1158.     prop localCanCreate :: (if (self.defDev == nil) {self.error("A driver device must be created before creating a stream.")} else {"ok"})
  1159.     prop localDelete :: (scan ($a; DIO) {if ($a == self.iDevice) {self.iDevice.numTimeUse--} }, "ok")
  1160.     prop cGen :: 1
  1161.     prop cHeaderName :: if self.gNumOf > 0 {"sio.h"} else {""}
  1162.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far SIO_Obj %0r;n"} else {"extern SIO_Obj %0r;n"})
  1163.     global gUser :: "USER" { 
  1164.         prop Visible :: 0
  1165.         prop Writable :: 0
  1166.         prop NoGen :: 1
  1167.     }
  1168.     global gSetOf :: 0 { 
  1169.         prop Visible :: 0
  1170.         prop Writable :: 0
  1171.         prop NoGen :: 1
  1172.     }
  1173.     global gNumOf :: 0 { 
  1174.         prop Visible :: 0
  1175.         prop Writable :: 0
  1176.         prop NoGen :: 1
  1177.     }
  1178.     global gDirty :: 0 { 
  1179.         prop Visible :: 0
  1180.         prop Writable :: 0
  1181.         prop NoGen :: 1
  1182.     }
  1183.     global gInitFlag :: 1 { 
  1184.         prop Visible :: 0
  1185.         prop Writable :: 0
  1186.         prop NoGen :: 1
  1187.     }
  1188.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1189.         prop Visible :: 0
  1190.         prop Writable :: 0
  1191.         prop NoGen :: 1
  1192.     }
  1193.     global gNumEmbed :: 0 { 
  1194.         prop NoGen :: 1
  1195.     }
  1196.     global OBJMEMSEG :: ISRAM { 
  1197.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  1198.         prop MemberType :: MEM
  1199.         prop MemberTest :: MEM.dataMember($1)
  1200.         prop Label :: "Object Memory"
  1201.         prop JSName :: "OBJMEMSEG"
  1202.         prop Visible :: 1
  1203.         prop Writable :: 1
  1204.         prop NoGen :: 1
  1205.     }
  1206.     global USEISSUERECLAIM :: 0 { 
  1207.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  1208.         prop Label :: "Use Only Issue/Reclaim Model"
  1209.         prop JSName :: "USEISSUERECLAIM"
  1210.         prop Visible :: 1
  1211.         prop Writable :: 1
  1212.         prop NoGen :: 1
  1213.         prop Set :: (self.USEISSUERECLAIM = $1, if ($1 == 1) {scan ($i; SIO) {$i.iModelName = "Issue/Reclaim"}} , "ok")
  1214.     }
  1215.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  1216.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1217.         prop Label :: "comment"
  1218.         prop JSName :: "comment"
  1219.         prop Visible :: 1
  1220.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  1221.         prop NoGen :: 1
  1222.     }
  1223.     inst iIsUsed :: 0 { 
  1224.         prop Visible :: 0
  1225.         prop Writable :: 0
  1226.         prop NoGen :: 1
  1227.     }
  1228.     inst iId :: 0 { 
  1229.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1230.         prop Style :: 0x01
  1231.         prop Visible :: 0
  1232.         prop Writable :: 1
  1233.         prop NoGen :: 1
  1234.     }
  1235.     inst iDelUser :: "USER" { 
  1236.         prop Visible :: 0
  1237.         prop Writable :: 0
  1238.         prop NoGen :: 1
  1239.     }
  1240.     inst iDelMsg :: "ok" { 
  1241.         prop Visible :: 0
  1242.         prop Writable :: 0
  1243.         prop NoGen :: 1
  1244.     }
  1245.     inst iDevice :: SIO.devList { 
  1246.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  1247.         prop TypeTest :: $1.isDriver == 1
  1248.         prop MemberTest :: $1.driverType != "DEV_IOMTYPE"
  1249.         prop Label :: "Device"
  1250.         prop JSName :: "deviceName"
  1251.         prop Set :: (if (($1.iIsTerminal == 0) && (self.iDevCtrlParam == "")) {self.error("To select a stacking device, enter first a terminal device in Device Control String")} else {if ($1.iIsVirtual == 1) {self.error("The device you have selected is a virtual instance, you must select a non-virtual device")} else {scan ($a; DIO) {if ($a == self.iDevice) {self.iDevice.numTimeUse--} }, scan ($b; DIO) {if ($b == $1) {$1.numTimeUse++} }, self.iDevice = self.setDev($1), "ok"}})
  1252.         prop Visible :: 1
  1253.         prop Writable :: 1
  1254.     }
  1255.     inst iDevCtrlParam :: "" { 
  1256.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1257.         prop Label :: "Device Control String"
  1258.         prop JSName :: "controlParameter"
  1259.         prop Visible :: 1
  1260.         prop Writable :: 1
  1261.     }
  1262.     inst iDevId :: = self.iDevice.iDevId
  1263.     inst iFxns :: = self.iDevice.iFxns
  1264.     inst iMode :: "input" { 
  1265.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1266.         prop Enum :: "input,output"
  1267.         prop Label :: "Mode"
  1268.         prop JSName :: "mode"
  1269.         prop Visible :: 1
  1270.         prop Writable :: 1
  1271.     }
  1272.     inst iBufsize :: 0x80 { 
  1273.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1274.         prop Style :: 0x02
  1275.         prop Label :: "Buffer size"
  1276.         prop JSName :: "bufSize"
  1277.         prop Visible :: 1
  1278.         prop Writable :: 1
  1279.     }
  1280.     inst iNbufs :: 2 { 
  1281.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1282.         prop Style :: 0x01
  1283.         prop Label :: "Number of buffers"
  1284.         prop JSName :: "numBufs"
  1285.         prop Visible :: 1
  1286.         prop Writable :: 1
  1287.     }
  1288.     inst iBufSegid :: = self.OBJMEMSEG { 
  1289.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  1290.         prop MemberType :: MEM
  1291.         prop MemberTest :: MEM.dataMember($1)
  1292.         prop Label :: "Place buffers in memory segment"
  1293.         prop JSName :: "bufSegId"
  1294.         prop Visible :: 1
  1295.         prop Writable :: self.iAllocBuf == 1
  1296.     }
  1297.     inst iAlign :: 1 { 
  1298.         prop Type :: "{A11FE980-C07A-11cf-9BFE-0000C0AC14C7}"
  1299.         prop Enum :: "1,2,4,8,16,32,64,128,256,512,1024,2048,4096,8192,16384,32768"
  1300.         prop Label :: "Buffer alignment"
  1301.         prop JSName :: "bufAlign"
  1302.         prop Visible :: 1
  1303.         prop Writable :: self.iAllocBuf == 1
  1304.     }
  1305.     inst iFlush :: 0 { 
  1306.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  1307.         prop Label :: "Flush"
  1308.         prop JSName :: "flush"
  1309.         prop Visible :: 1
  1310.         prop Writable :: 1
  1311.     }
  1312.     inst iModelName :: "Standard" { 
  1313.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1314.         prop Enum :: "Standard,Issue/Reclaim"
  1315.         prop Label :: "Model"
  1316.         prop JSName :: "modelName"
  1317.         prop Visible :: 1
  1318.         prop Writable :: 1
  1319.         prop NoGen :: 1
  1320.         prop Set :: ($e = "ok", if (self.USEISSUERECLAIM == 1) {if ($1 == "Standard") {$e = self.error("SIO Issue/Reclaim model support selected")} else {self.iModel = if $1 == "Standard" {"SIO_STANDARD"} else {"SIO_ISSUERECLAIM"}, self.iModelName = $1}} else {self.iModel = if $1 == "Standard" {"SIO_STANDARD"} else {"SIO_ISSUERECLAIM"}, self.iModelName = $1}, $e)
  1321.     }
  1322.     inst iAllocBuf :: = self.iSaveAllocBuf { 
  1323.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  1324.         prop Label :: "Allocate Static Buffer(s)"
  1325.         prop JSName :: "allocStaticBuf"
  1326.         prop Visible :: 1
  1327.         prop Writable :: 1
  1328.         prop Set :: (self.iSaveAllocBuf = $1, "ok")
  1329.     }
  1330.     inst iSaveAllocBuf :: 0 { 
  1331.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  1332.         prop NoGen :: 1
  1333.     }
  1334.     inst iModel :: "SIO_STANDARD" { 
  1335.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1336.         prop Enum :: "SIO_STANDARD,SIO_ISSUERECLAIM"
  1337.         prop Visible :: 0
  1338.         prop Writable :: 0
  1339.     }
  1340.     inst iTimeout :: = if self.iModel == "SIO_ISSUERECLAIM" {self.iSaveTimeout} else {-1} { 
  1341.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1342.         prop Label :: "Timeout for I/O operation"
  1343.         prop JSName :: "timeout"
  1344.         prop Visible :: 1
  1345.         prop Writable :: self.iModel == "SIO_ISSUERECLAIM"
  1346.         prop Set :: (self.iSaveTimeout = $1, "ok")
  1347.     }
  1348.     inst iSaveTimeout :: -1 { 
  1349.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1350.         prop NoGen :: 1
  1351.     }
  1352.     inst useCallBackFxn :: 0 { 
  1353.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  1354.         prop Label :: "use callback function"
  1355.         prop JSName :: "useCallBackFxn"
  1356.         prop Visible :: 1
  1357.         prop Writable :: 1
  1358.         prop NoGen :: 0
  1359.         prop TabName :: "Callback"
  1360.     }
  1361.     inst callBackFxn :: @_FXN_F_nop { 
  1362.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1363.         prop Label :: "callback function"
  1364.         prop JSName :: "callBackFxn"
  1365.         prop Visible :: 1
  1366.         prop Writable :: self.useCallBackFxn
  1367.         prop NoGen :: 0
  1368.         prop TabName :: "Callback"
  1369.     }
  1370.     inst arg0 :: 0 { 
  1371.         prop Type :: "{E91790E0-0456-11d2-B8D0-006008BDB66F}"
  1372.         prop Label :: "argument 0"
  1373.         prop JSName :: "arg0"
  1374.         prop Visible :: 1
  1375.         prop Writable :: self.useCallBackFxn
  1376.         prop NoGen :: 0
  1377.         prop TabName :: "Callback"
  1378.     }
  1379.     inst arg1 :: 0 { 
  1380.         prop Type :: "{E91790E0-0456-11d2-B8D0-006008BDB66F}"
  1381.         prop Label :: "argument 1"
  1382.         prop JSName :: "arg1"
  1383.         prop Visible :: 1
  1384.         prop Writable :: self.useCallBackFxn
  1385.         prop NoGen :: 0
  1386.         prop TabName :: "Callback"
  1387.     }
  1388. }
  1389. type STS {
  1390.     isa ObjectMgr
  1391.     prop name :: "STS"
  1392.     prop Label :: "STS - Statistics Object Manager"
  1393.     prop IsContainedIn :: INS
  1394.     prop GlobalIcon :: 125
  1395.     prop InstanceIcon :: 126
  1396.     prop InstanceHelpTopic :: (212)
  1397.     prop GlobalHelpTopic :: (112)
  1398.     prop AllocType :: ("1, _globalAllocDesc, _memSeg, _placement")
  1399.     prop _globalAllocDesc :: ("%8t .%1L: {%12tn  %1U_A_TABBEG = .;n _%1U_A_TABBEG = .;n %2Sn %1U_A_TABEND = .;n _%1U_A_TABEND = .;n  %1U_A_TABLEN = (. - _%1U_A_TABBEG) / %3d;n _%1U_A_TABLEN = (. - _%1U_A_TABBEG) / %3d;%8tn }, name, _linkString, _objSize")
  1400.     prop localInit :: (if (PRD.CALLBACKOBJ != nil) {self.error("STS initialization failure")} , PRD.CALLBACKOBJ = STS)
  1401.     prop _placement :: (0x7fffffff / 2)
  1402.     prop _linkString :: if self.gNumOf > 0 {"*(.%1L)"} else {"/* no %1U objects */"}
  1403.     prop _memSeg :: STS.OBJMEMSEG
  1404.     prop _objSize :: if GBL.DSPTYPE == 55 {(2 * (4 * 4))} else {(4 * 4)}
  1405.     prop dataSize :: ((4 * 4) * (STS.gNumOf + STS.gNumEmbed))
  1406.     prop maxObjs :: (32767)
  1407.     prop InstancePropertyPage :: ("{B7240DEE-AA51-11cf-9BFE-0000C0AC14C7}")
  1408.     prop GlobalPropertyPage :: ("{B7240DEF-AA51-11cf-9BFE-0000C0AC14C7}")
  1409.     prop STSGetMaxFmt :: (self.format)
  1410.     prop STSGetSumFmt :: (self.format)
  1411.     prop STSGetAvgFmt :: ("%.2f")
  1412.     prop STSFilterSum :: ((self.iA * $1 + self.iB * $2) / (1.0 * self.iC))
  1413.     prop STSFilterMax :: ((self.iA * $1 + self.iB) / (1.0 * self.iC))
  1414.     prop HighTimeBased :: (if self.unittype == "High resolution time based" {1} else {0})
  1415.     prop LowTimeBased :: (if self.unittype == "Low resolution time based" {1} else {0})
  1416.     prop cGen :: 1
  1417.     prop cHeaderName :: if self.gNumOf > 0 {"sts.h"} else {""}
  1418.     prop cGenHInst :: (if (GBL.DSPTYPE == 62) {"extern far STS_Obj %0r;n"} else {"extern STS_Obj %0r;n"})
  1419.     prop modifiable :: ((if (self.iDelUser == "USER" || self.iDelUser == "HWI") {1} else {0}))
  1420.     prop call :: (scan ($a; STS) {if ($a.unittype == "High resolution time based") {$a.iA = CLK.INSTRPERCLK} })
  1421.     global gUser :: "USER" { 
  1422.         prop Visible :: 0
  1423.         prop Writable :: 0
  1424.         prop NoGen :: 1
  1425.     }
  1426.     global gSetOf :: 0 { 
  1427.         prop Visible :: 0
  1428.         prop Writable :: 0
  1429.         prop NoGen :: 1
  1430.     }
  1431.     global gNumOf :: 1 { 
  1432.         prop Visible :: 0
  1433.         prop Writable :: 0
  1434.         prop NoGen :: 1
  1435.     }
  1436.     global gDirty :: 0 { 
  1437.         prop Visible :: 0
  1438.         prop Writable :: 0
  1439.         prop NoGen :: 1
  1440.     }
  1441.     global gInitFlag :: 1 { 
  1442.         prop Visible :: 0
  1443.         prop Writable :: 0
  1444.         prop NoGen :: 1
  1445.     }
  1446.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1447.         prop Visible :: 0
  1448.         prop Writable :: 0
  1449.         prop NoGen :: 1
  1450.     }
  1451.     global OBJMEMSEG :: ISRAM { 
  1452.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  1453.         prop MemberType :: MEM
  1454.         prop MemberTest :: MEM.dataMember($1)
  1455.         prop Label :: "Object Memory"
  1456.         prop Visible :: 1
  1457.         prop Writable :: 1
  1458.         prop NoGen :: 1
  1459.     }
  1460.     global gNumEmbed :: -1 { 
  1461.         prop Visible :: 0
  1462.         prop Writable :: 0
  1463.         prop NoGen :: 1
  1464.     }
  1465.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  1466.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1467.         prop Label :: "comment"
  1468.         prop JSName :: "comment"
  1469.         prop Visible :: 1
  1470.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  1471.         prop NoGen :: 1
  1472.     }
  1473.     inst iIsUsed :: 0 { 
  1474.         prop Visible :: 0
  1475.         prop Writable :: 0
  1476.         prop NoGen :: 1
  1477.     }
  1478.     inst iId :: 0 { 
  1479.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1480.         prop Style :: 0x01
  1481.         prop Visible :: 0
  1482.         prop Writable :: 1
  1483.         prop NoGen :: 1
  1484.     }
  1485.     inst iDelUser :: "USER" { 
  1486.         prop Visible :: 0
  1487.         prop Writable :: 0
  1488.         prop NoGen :: 1
  1489.     }
  1490.     inst iDelMsg :: "ok" { 
  1491.         prop Visible :: 0
  1492.         prop Writable :: 0
  1493.         prop NoGen :: 1
  1494.     }
  1495.     inst prev :: 0 { 
  1496.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1497.         prop Visible :: 1
  1498.         prop Writable :: self.modifiable()
  1499.         prop JSName :: "previousVal"
  1500.         prop NoGen :: GBL.DSPTYPE != 40 && GBL.DSPTYPE != 62
  1501.         prop Set :: (self.prev = $1, self.prevlow = $1 & 0xffff, self.prevhigh = ($1 >> 16) & 0xffff, "ok")
  1502.     }
  1503.     inst format :: "%g" { 
  1504.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1505.         prop Visible :: 0
  1506.         prop Writable :: 1
  1507.         prop Label :: "format"
  1508.         prop NoGen :: 1
  1509.     }
  1510.     inst unittype :: "Not time based" { 
  1511.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1512.         prop Enum :: "Not time based,High resolution time based,Low resolution time based"
  1513.         prop Label :: "unit type"
  1514.         prop JSName :: "unitType"
  1515.         prop Visible :: 1
  1516.         prop Writable :: self.modifiable()
  1517.         prop NoGen :: 1
  1518.         prop Set :: (self.unittype = $1, if ($1 == "High resolution time based") {self.iA = CLK.INSTRPERCLK, self.iB = 0, self.iC = 1, self.operation = "A * x"} else {if ($1 == "Low resolution time based") {self.iA = 1, self.iB = 0, self.iC = 1, self.operation = "A * x"} else {self.iA = 1, self.iB = 0, self.iC = 1, self.operation = "Nothing"}}, "ok")
  1519.     }
  1520.     inst operation :: "Nothing" { 
  1521.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1522.         prop Enum :: "Nothing,A * x,A * x + B,(A * x + B) / C"
  1523.         prop Label :: "host operation"
  1524.         prop JSName :: "operation"
  1525.         prop Visible :: 1
  1526.         prop Writable :: ((self.unittype != "Low resolution time based") && self.modifiable())
  1527.         prop NoGen :: 1
  1528.         prop Set :: (self.operation = $1, if ($1 == "Nothing" && self.unittype != "High resolution time based") {self.iA = 1, self.iB = 0, self.iC = 1} else {if ($1 == "A * x") {self.iB = 0, self.iC = 1} else {if ($1 == "A * x + B") {self.iC = 1} }}, "ok")
  1529.     }
  1530.     inst iA :: 1 { 
  1531.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1532.         prop Visible :: 1
  1533.         prop Writable :: (self.modifiable() && !(self.unittype != "Not time based" || self.operation == "Nothing"))
  1534.         prop Label :: "A"
  1535.         prop JSName :: "numA"
  1536.         prop NoGen :: 1
  1537.     }
  1538.     inst iB :: 0 { 
  1539.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1540.         prop Visible :: 1
  1541.         prop Writable :: (self.modifiable() && !(self.unittype == "Low resolution time based" || self.operation == "Nothing" || self.operation == "A * x"))
  1542.         prop Label :: "B"
  1543.         prop JSName :: "numB"
  1544.         prop NoGen :: 1
  1545.     }
  1546.     inst iC :: 1 { 
  1547.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1548.         prop Visible :: 1
  1549.         prop Writable :: (self.modifiable() && (self.unittype == "Not time based" && self.operation == "(A * x + B) / C"))
  1550.         prop Label :: "C"
  1551.         prop JSName :: "numC"
  1552.         prop NoGen :: 1
  1553.     }
  1554.     inst prevhigh :: 0 { 
  1555.         prop Visible :: 0
  1556.         prop Writable :: 0
  1557.         prop NoGen :: GBL.DSPTYPE == 40 || GBL.DSPTYPE == 62
  1558.     }
  1559.     inst prevlow :: 0 { 
  1560.         prop Visible :: 0
  1561.         prop Writable :: 0
  1562.         prop NoGen :: 0
  1563.     }
  1564. }
  1565. type SYS {
  1566.     isa Module
  1567.     prop name :: "SYS"
  1568.     prop Label :: "SYS - System Settings"
  1569.     prop IsContainedIn :: SYSTEM
  1570.     prop GlobalIcon :: 141
  1571.     prop InstanceIcon :: 142
  1572.     prop IsConfMod :: 1
  1573.     prop GlobalHelpTopic :: (313)
  1574.     prop InstanceHelpTopic :: (413)
  1575.     prop InstancePropertyPage :: ("{473C4A62-B1A8-11d0-9885-0020AFEE33C6}")
  1576.     prop GlobalPropertyPage :: ("{473C4A63-B1A8-11d0-9885-0020AFEE33C6}")
  1577.     prop AllocType :: (if self.PUTCFXN == @_UTL_doPutc {"2, _globalAllocDesc, _memSeg, _midPlace, 
  1578.       _traceString, _traceSeg, _midPlace"} else {"1, _globalAllocDesc, _memSeg, _midPlace"})
  1579.     prop _globalAllocDesc :: ("%8t .sys:     {}")
  1580.     prop _traceString :: ("%8t .trace: fill = 0x0 {%12tn_SYS_PUTCBEG = .;n. += 0x%1x;n_SYS_PUTCEND = . - 1;%8tn }, _traceSize")
  1581.     prop _midPlace :: (0x7fffffff / 2)
  1582.     prop _memSeg :: MEM.CFGOBJSEG
  1583.     prop _traceSeg :: SYS.TRACESEG
  1584.     prop _traceSize :: SYS.TRACESIZE
  1585.     global gUser :: "USER" { 
  1586.         prop Visible :: 0
  1587.         prop Writable :: 0
  1588.         prop NoGen :: 1
  1589.     }
  1590.     global gSetOf :: 0 { 
  1591.         prop Visible :: 0
  1592.         prop Writable :: 0
  1593.         prop NoGen :: 1
  1594.     }
  1595.     global gNumOf :: 0 { 
  1596.         prop Visible :: 0
  1597.         prop Writable :: 0
  1598.         prop NoGen :: 1
  1599.     }
  1600.     global gDirty :: 0 { 
  1601.         prop Visible :: 0
  1602.         prop Writable :: 0
  1603.         prop NoGen :: 1
  1604.     }
  1605.     global gInitFlag :: 1 { 
  1606.         prop Visible :: 0
  1607.         prop Writable :: 0
  1608.         prop NoGen :: 1
  1609.     }
  1610.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1611.         prop Visible :: 0
  1612.         prop Writable :: 0
  1613.         prop NoGen :: 1
  1614.     }
  1615.     global CALLBACKOBJ :: nil { 
  1616.         prop Visible :: 0
  1617.         prop Writable :: 0
  1618.         prop NoGen :: 1
  1619.     }
  1620.     global TRACESIZE :: 512 { 
  1621.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  1622.         prop Format :: "%d"
  1623.         prop Style :: 0x01 | 0x02
  1624.         prop Label :: "Trace Buffer Size"
  1625.         prop JSName :: "TRACESIZE"
  1626.         prop Visible :: 1
  1627.         prop Writable :: 1
  1628.         prop NoGen :: 1
  1629.     }
  1630.     global TRACESEG :: ISRAM { 
  1631.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  1632.         prop MemberType :: MEM
  1633.         prop MemberTest :: MEM.dataMember($1)
  1634.         prop Label :: "Trace Buffer Memory"
  1635.         prop JSName :: "TRACESEG"
  1636.         prop Visible :: 1
  1637.         prop Writable :: 1
  1638.         prop NoGen :: 1
  1639.     }
  1640.     global ABORTFXN :: @_UTL_doAbort { 
  1641.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1642.         prop Label :: "Abort Function"
  1643.         prop JSName :: "ABORTFXN"
  1644.         prop Visible :: 1
  1645.         prop Writable :: 1
  1646.         prop NoGen :: 0
  1647.     }
  1648.     global ERRORFXN :: @_UTL_doError { 
  1649.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1650.         prop Label :: "Error Function"
  1651.         prop JSName :: "ERRORFXN"
  1652.         prop Visible :: 1
  1653.         prop Writable :: 1
  1654.         prop NoGen :: 0
  1655.     }
  1656.     global EXITFXN :: @_UTL_halt { 
  1657.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1658.         prop Label :: "Exit Function"
  1659.         prop JSName :: "EXITFXN"
  1660.         prop Visible :: 1
  1661.         prop Writable :: 1
  1662.         prop NoGen :: 0
  1663.     }
  1664.     global PUTCFXN :: @_UTL_doPutc { 
  1665.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1666.         prop Label :: "Putc Function"
  1667.         prop JSName :: "PUTCFXN"
  1668.         prop Visible :: 1
  1669.         prop Writable :: 1
  1670.         prop NoGen :: 0
  1671.     }
  1672. }
  1673. type GIO {
  1674.     isa Module
  1675.     prop Visible :: 1
  1676.     prop name :: "GIO"
  1677.     prop Label :: "GIO - General Input/Output Manager"
  1678.     prop IsConfMod :: self.USEGIO
  1679.     prop IsContainedIn :: IOF
  1680.     prop GlobalIcon :: 141
  1681.     prop InstanceIcon :: 142
  1682.     prop GlobalHelpTopic :: (320)
  1683.     prop InstanceHelpTopic :: (420)
  1684.     prop InstancePropertyPage :: ("{473C4A62-B1A8-11d0-9885-0020AFEE33C6}")
  1685.     prop GlobalPropertyPage :: ("{473C4A63-B1A8-11d0-9885-0020AFEE33C6}")
  1686.     prop DependsOn :: "DEV,UDEV"
  1687.     prop AllocType :: ("1, _globalAllocDesc, _memSeg, _midPlace")
  1688.     prop _globalAllocDesc :: ("%8t .gio:     {}")
  1689.     prop _midPlace :: (0x7fffffff / 2)
  1690.     prop _memSeg :: MEM.CFGOBJSEG
  1691.     global gUser :: "USER" { 
  1692.         prop Visible :: 0
  1693.         prop Writable :: 0
  1694.         prop NoGen :: 1
  1695.     }
  1696.     global gSetOf :: 0 { 
  1697.         prop Visible :: 0
  1698.         prop Writable :: 0
  1699.         prop NoGen :: 1
  1700.     }
  1701.     global gNumOf :: 0 { 
  1702.         prop Visible :: 0
  1703.         prop Writable :: 0
  1704.         prop NoGen :: 1
  1705.     }
  1706.     global gDirty :: 0 { 
  1707.         prop Visible :: 0
  1708.         prop Writable :: 0
  1709.         prop NoGen :: 1
  1710.     }
  1711.     global gInitFlag :: 1 { 
  1712.         prop Visible :: 0
  1713.         prop Writable :: 0
  1714.         prop NoGen :: 1
  1715.     }
  1716.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1717.         prop Visible :: 0
  1718.         prop Writable :: 0
  1719.         prop NoGen :: 1
  1720.     }
  1721.     global CALLBACKOBJ :: nil { 
  1722.         prop Visible :: 0
  1723.         prop Writable :: 0
  1724.         prop NoGen :: 1
  1725.     }
  1726.     global USEGIO :: 0 { 
  1727.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  1728.         prop Label :: "Enable General Input/Output Manager"
  1729.         prop JSName :: "ENABLEGIO"
  1730.         prop Visible :: 1
  1731.         prop Writable :: 1
  1732.         prop NoGen :: 1
  1733.     }
  1734.     global CREATEFXN :: = if self.USEGIO == 1 {@_SEM_create} else {@_FXN_F_nop} { 
  1735.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1736.         prop Label :: "Create Function"
  1737.         prop JSName :: "CREATEFXN"
  1738.         prop Visible :: 1
  1739.         prop Writable :: self.USEGIO
  1740.         prop NoGen :: 0
  1741.     }
  1742.     global DELETEFXN :: = if self.USEGIO == 1 {@_SEM_delete} else {@_FXN_F_nop} { 
  1743.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1744.         prop Label :: "Delete Function"
  1745.         prop JSName :: "DELETEFXN"
  1746.         prop Visible :: 1
  1747.         prop Writable :: self.USEGIO
  1748.         prop NoGen :: 0
  1749.     }
  1750.     global PENDFXN :: = if self.USEGIO == 1 {@_SEM_pend} else {@_FXN_F_nop} { 
  1751.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1752.         prop Label :: "Pend Function"
  1753.         prop JSName :: "PENDFXN"
  1754.         prop Visible :: 1
  1755.         prop Writable :: self.USEGIO
  1756.         prop NoGen :: 0
  1757.     }
  1758.     global POSTFXN :: = if self.USEGIO == 1 {@_SEM_post} else {@_FXN_F_nop} { 
  1759.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  1760.         prop Label :: "Post Function"
  1761.         prop JSName :: "POSTFXN"
  1762.         prop Visible :: 1
  1763.         prop Writable :: self.USEGIO
  1764.         prop NoGen :: 0
  1765.     }
  1766. }
  1767. type SIODRIVER {
  1768.     isa ModuleFolder
  1769.     prop Label :: "Device Drivers"
  1770.     prop IsContainedIn :: IOF
  1771.     prop GlobalIcon :: 127
  1772.     prop GlobalHelpTopic :: (BIOSHELP_DEV_FOLDER)
  1773.     prop GlobalPropertyPage :: ("{A2BCEC70-5365-11d4-947C-0050048381B7}")
  1774.     global gUser :: "USER" { 
  1775.         prop Visible :: 0
  1776.         prop Writable :: 0
  1777.         prop NoGen :: 1
  1778.     }
  1779.     global gSetOf :: 0 { 
  1780.         prop Visible :: 0
  1781.         prop Writable :: 0
  1782.         prop NoGen :: 1
  1783.     }
  1784.     global gNumOf :: 0 { 
  1785.         prop Visible :: 0
  1786.         prop Writable :: 0
  1787.         prop NoGen :: 1
  1788.     }
  1789.     global gDirty :: 0 { 
  1790.         prop Visible :: 0
  1791.         prop Writable :: 0
  1792.         prop NoGen :: 1
  1793.     }
  1794.     global gInitFlag :: 1 { 
  1795.         prop Visible :: 0
  1796.         prop Writable :: 0
  1797.         prop NoGen :: 1
  1798.     }
  1799.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1800.         prop Visible :: 0
  1801.         prop Writable :: 0
  1802.         prop NoGen :: 1
  1803.     }
  1804. }
  1805. type DEV {
  1806.     isa ObjectMgr
  1807.     prop name :: "DEV"
  1808.     prop Visible :: 0
  1809.     prop AllocType :: (if (self.gNumOf > 0) {"1, _bssAllocDesc, _memSeg, _placement"} , if (DGN.gNumOf || DHL.gNumOf || DPI.gNumOf || DIO.gNumOf || UDEV.gNumOf) {"1, _devtableDesc, _memSeg, _placement"} )
  1810.     prop _bssAllocDesc :: ("%8t .dev: {}")
  1811.     prop _devtableDesc :: ("%8t .devtable: {}")
  1812.     prop _memSeg :: MEM.CFGOBJSEG
  1813.     prop _placement :: (0x7fffffff / 2)
  1814.     prop DependsOn :: "HWI"
  1815.     global gUser :: "USER" { 
  1816.         prop Visible :: 0
  1817.         prop Writable :: 0
  1818.         prop NoGen :: 1
  1819.     }
  1820.     global gSetOf :: 0 { 
  1821.         prop Visible :: 0
  1822.         prop Writable :: 0
  1823.         prop NoGen :: 1
  1824.     }
  1825.     global gNumOf :: 0 { 
  1826.         prop Visible :: 0
  1827.         prop Writable :: 0
  1828.         prop NoGen :: 1
  1829.     }
  1830.     global gDirty :: 0 { 
  1831.         prop Visible :: 0
  1832.         prop Writable :: 0
  1833.         prop NoGen :: 1
  1834.     }
  1835.     global gInitFlag :: 1 { 
  1836.         prop Visible :: 0
  1837.         prop Writable :: 0
  1838.         prop NoGen :: 1
  1839.     }
  1840.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1841.         prop Visible :: 0
  1842.         prop Writable :: 0
  1843.         prop NoGen :: 1
  1844.     }
  1845.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  1846.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1847.         prop Label :: "comment"
  1848.         prop JSName :: "comment"
  1849.         prop Visible :: 1
  1850.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  1851.         prop NoGen :: 1
  1852.     }
  1853.     inst iIsUsed :: 0 { 
  1854.         prop Visible :: 0
  1855.         prop Writable :: 0
  1856.         prop NoGen :: 1
  1857.     }
  1858.     inst iId :: 0 { 
  1859.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1860.         prop Style :: 0x01
  1861.         prop Visible :: 0
  1862.         prop Writable :: 1
  1863.         prop NoGen :: 1
  1864.     }
  1865.     inst iDelUser :: "USER" { 
  1866.         prop Visible :: 0
  1867.         prop Writable :: 0
  1868.         prop NoGen :: 1
  1869.     }
  1870.     inst iDelMsg :: "ok" { 
  1871.         prop Visible :: 0
  1872.         prop Writable :: 0
  1873.         prop NoGen :: 1
  1874.     }
  1875. }
  1876. type UDEV {
  1877.     isa ObjectMgr
  1878.     prop name :: "UDEV"
  1879.     prop Label :: "User-Defined Devices"
  1880.     prop IsContainedIn :: SIODRIVER
  1881.     prop GlobalIcon :: 127
  1882.     prop InstanceIcon :: 128
  1883.     prop GlobalHelpTopic :: (315)
  1884.     prop InstanceHelpTopic :: (415)
  1885.     prop InstancePropertyPage :: ("{7AE86AA0-35C0-11d1-988B-0020AFEE33C6}")
  1886.     prop GlobalPropertyPage :: ("{7AE86AA1-35C0-11d1-988B-0020AFEE33C6}")
  1887.     prop maxObjs :: (32767)
  1888.     prop isDriver :: (1)
  1889.     prop AllocType :: (if (self.gNumOf > 0) {"1, _globalAllocDesc, _memSeg, _placement"} )
  1890.     prop _globalAllocDesc :: ("%8t .udev: {}")
  1891.     prop _placement :: (0x7fffffff / 2)
  1892.     prop _memSeg :: MEM.CFGOBJSEG
  1893.     prop _driverType :: (if self.fxnTableType == "DEV_Fxns" {"DEV_SIOTYPE"} else {"DEV_IOMTYPE"})
  1894.     global gUser :: "USER" { 
  1895.         prop Visible :: 0
  1896.         prop Writable :: 0
  1897.         prop NoGen :: 1
  1898.     }
  1899.     global gSetOf :: 0 { 
  1900.         prop Visible :: 0
  1901.         prop Writable :: 0
  1902.         prop NoGen :: 1
  1903.     }
  1904.     global gNumOf :: 0 { 
  1905.         prop Visible :: 0
  1906.         prop Writable :: 0
  1907.         prop NoGen :: 1
  1908.     }
  1909.     global gDirty :: 0 { 
  1910.         prop Visible :: 0
  1911.         prop Writable :: 0
  1912.         prop NoGen :: 1
  1913.     }
  1914.     global gInitFlag :: 1 { 
  1915.         prop Visible :: 0
  1916.         prop Writable :: 0
  1917.         prop NoGen :: 1
  1918.     }
  1919.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  1920.         prop Visible :: 0
  1921.         prop Writable :: 0
  1922.         prop NoGen :: 1
  1923.     }
  1924.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  1925.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  1926.         prop Label :: "comment"
  1927.         prop JSName :: "comment"
  1928.         prop Visible :: 1
  1929.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  1930.         prop NoGen :: 1
  1931.     }
  1932.     inst iIsUsed :: 0 { 
  1933.         prop Visible :: 0
  1934.         prop Writable :: 0
  1935.         prop NoGen :: 1
  1936.     }
  1937.     inst iId :: 0 { 
  1938.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  1939.         prop Style :: 0x01
  1940.         prop Visible :: 0
  1941.         prop Writable :: 1
  1942.         prop NoGen :: 1
  1943.     }
  1944.     inst iDelUser :: "USER" { 
  1945.         prop Visible :: 0
  1946.         prop Writable :: 0
  1947.         prop NoGen :: 1
  1948.     }
  1949.     inst iDelMsg :: "ok" { 
  1950.         prop Visible :: 0
  1951.         prop Writable :: 0
  1952.         prop NoGen :: 1
  1953.     }
  1954.     inst iInit :: 0 { 
  1955.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  1956.         prop Label :: "init function"
  1957.         prop JSName :: "initFxn"
  1958.         prop Visible :: 1
  1959.         prop Writable :: 1
  1960.         prop NoGen :: 1
  1961.         prop Set :: (self.iInit = $1, self.initFxn = self.iInit, "ok")
  1962.     }
  1963.     inst iFxns :: 0 { 
  1964.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  1965.         prop Label :: "function table ptr"
  1966.         prop JSName :: "fxnTable"
  1967.         prop Visible :: 1
  1968.         prop Writable :: 1
  1969.     }
  1970.     inst fxnTableType :: "DEV_Fxns" { 
  1971.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1972.         prop Enum :: "DEV_Fxns,IOM_Fxns"
  1973.         prop Label :: "function table type"
  1974.         prop JSName :: "fxnTableType"
  1975.         prop Visible :: 1
  1976.         prop Writable :: 1
  1977.         prop NoGen :: 1
  1978.     }
  1979.     inst driverType :: = self._driverType { 
  1980.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  1981.         prop Enum :: "DEV_SIOTYPE,DEV_IOMTYPE"
  1982.         prop Visible :: 0
  1983.     }
  1984.     inst iDevId :: 0 { 
  1985.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  1986.         prop Label :: "device id"
  1987.         prop JSName :: "deviceId"
  1988.         prop Visible :: 1
  1989.         prop Writable :: 1
  1990.         prop NoGen :: 1
  1991.         prop Set :: (self.iDevId = $1, self.deviceId = self.iDevId, "ok")
  1992.     }
  1993.     inst iParams :: 0 { 
  1994.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  1995.         prop Label :: "device params ptr"
  1996.         prop JSName :: "params"
  1997.         prop Visible :: 1
  1998.         prop Writable :: 1
  1999.     }
  2000.     inst deviceId :: 0 { 
  2001.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  2002.         prop JSName :: ""
  2003.         prop Visible :: 0
  2004.     }
  2005.     inst initFxn :: 0 { 
  2006.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  2007.         prop JSName :: ""
  2008.         prop Visible :: 0
  2009.     }
  2010.     inst iIsStacking :: 0 { 
  2011.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2012.         prop Label :: "Stacking Device"
  2013.         prop JSName :: "stackingDevice"
  2014.         prop Visible :: 0
  2015.         prop Writable :: 1
  2016.         prop NoGen :: 1
  2017.     }
  2018.     inst deviceGlobalDataPtr :: 0 { 
  2019.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  2020.         prop Label :: "device global data ptr"
  2021.         prop JSName :: "deviceGlobalDataPtr"
  2022.         prop Visible :: 1
  2023.         prop Writable :: self.fxnTableType == "IOM_Fxns"
  2024.     }
  2025.     inst iIsTerminal :: = if self.fxnTableType == "DEV_Fxns" {1} else {0} { 
  2026.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2027.         prop NoGen :: 1
  2028.     }
  2029.     inst iIsVirtual :: 0 { 
  2030.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2031.         prop NoGen :: 1
  2032.     }
  2033. }
  2034. type DGN {
  2035.     isa ObjectMgr
  2036.     prop name :: "DGN"
  2037.     prop Label :: "DGN - Software Generator Driver"
  2038.     prop IsContainedIn :: SIODRIVER
  2039.     prop GlobalIcon :: 127
  2040.     prop InstanceIcon :: 128
  2041.     prop GlobalHelpTopic :: (302)
  2042.     prop InstanceHelpTopic :: (402)
  2043.     prop InstancePropertyPage :: ("{054FE166-B014-11d0-9885-0020AFEE33C6}")
  2044.     prop GlobalPropertyPage :: ("{054FE167-B014-11d0-9885-0020AFEE33C6}")
  2045.     prop DependsOn :: "DEV"
  2046.     prop maxObjs :: (32767)
  2047.     prop isDriver :: (1)
  2048.     prop AllocType :: (if (self.gNumOf > 0) {"1, _globalAllocDesc, _memSeg, _placement"} )
  2049.     prop _globalAllocDesc :: ("%8t .dgn: {}")
  2050.     prop _placement :: (0x7fffffff / 2)
  2051.     prop _memSeg :: MEM.CFGOBJSEG
  2052.     global gUser :: "USER" { 
  2053.         prop Visible :: 0
  2054.         prop Writable :: 0
  2055.         prop NoGen :: 1
  2056.     }
  2057.     global gSetOf :: 0 { 
  2058.         prop Visible :: 0
  2059.         prop Writable :: 0
  2060.         prop NoGen :: 1
  2061.     }
  2062.     global gNumOf :: 0 { 
  2063.         prop Visible :: 0
  2064.         prop Writable :: 0
  2065.         prop NoGen :: 1
  2066.     }
  2067.     global gDirty :: 0 { 
  2068.         prop Visible :: 0
  2069.         prop Writable :: 0
  2070.         prop NoGen :: 1
  2071.     }
  2072.     global gInitFlag :: 1 { 
  2073.         prop Visible :: 0
  2074.         prop Writable :: 0
  2075.         prop NoGen :: 1
  2076.     }
  2077.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  2078.         prop Visible :: 0
  2079.         prop Writable :: 0
  2080.         prop NoGen :: 1
  2081.     }
  2082.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  2083.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  2084.         prop Label :: "comment"
  2085.         prop JSName :: "comment"
  2086.         prop Visible :: 1
  2087.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  2088.         prop NoGen :: 1
  2089.     }
  2090.     inst iIsUsed :: 0 { 
  2091.         prop Visible :: 0
  2092.         prop Writable :: 0
  2093.         prop NoGen :: 1
  2094.     }
  2095.     inst iId :: 0 { 
  2096.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2097.         prop Style :: 0x01
  2098.         prop Visible :: 0
  2099.         prop Writable :: 1
  2100.         prop NoGen :: 1
  2101.     }
  2102.     inst iDelUser :: "USER" { 
  2103.         prop Visible :: 0
  2104.         prop Writable :: 0
  2105.         prop NoGen :: 1
  2106.     }
  2107.     inst iDelMsg :: "ok" { 
  2108.         prop Visible :: 0
  2109.         prop Writable :: 0
  2110.         prop NoGen :: 1
  2111.     }
  2112.     inst iDevice :: "user" { 
  2113.         prop Type :: "{21455EA1-B96A-11cf-9BFE-0000C0AC14C7}"
  2114.         prop Enum :: if GBL.DSPARITHMETIC == "FLOAT" {"user,sine,random,constant,printFloat,printHex,printInt"} else {"user,sine,random,constant,printHex,printInt"}
  2115.         prop Label :: "Device category"
  2116.         prop JSName :: "device"
  2117.         prop Visible :: 1
  2118.         prop Writable :: 1
  2119.         prop NoGen :: 1
  2120.         prop Set :: ($a = $1, if ($a != self.iDevice) {self.iDevice = $a, self.iUserFxn = @_FXN_F_nop} , if ($a == "user") {self.iUserFxn = self.iSaveUserFxn} , if ($a == "printFloat") {self.iUserFxn = @_DGN_printFloat} , if ($a == "printHex") {self.iUserFxn = @_DGN_printHex} , if ($a == "printInt") {self.iUserFxn = @_DGN_printInt} , "ok")
  2121.     }
  2122.     inst iUseDefaults :: 0 { 
  2123.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2124.         prop Label :: "Use default parameters"
  2125.         prop Visible :: 1
  2126.         prop JSName :: "useDefaultParam"
  2127.         prop Writable :: self.iDevice == "sine" || self.iDevice == "constant" || self.iDevice == "random" || self.iDevice == "user"
  2128.     }
  2129.     inst iDevId :: = if self.iDevice == "constant" {@DGN_CONST} else {if self.iDevice == "random" {@DGN_RAND} else {if self.iDevice == "sine" {@DGN_SINE} else {@DGN_USER}}} { 
  2130.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  2131.         prop Label :: "Device ID"
  2132.         prop JSName :: "deviceId"
  2133.         prop Visible :: 1
  2134.         prop Writable :: 0
  2135.     }
  2136.     inst iIsTerminal :: 1 { 
  2137.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2138.         prop NoGen :: 1
  2139.     }
  2140.     inst iIsVirtual :: 0 { 
  2141.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2142.         prop NoGen :: 1
  2143.     }
  2144.     inst iConstant :: if GBL.DSPARITHMETIC == "FIXED" {1} else {1.0} { 
  2145.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  2146.         prop Style :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0x04}
  2147.         prop Format :: if GBL.DSPARITHMETIC == "FIXED" {"%d"} else {"%f"}
  2148.         prop Label :: "Constant value"
  2149.         prop JSName :: "constant"
  2150.         prop Visible :: 1
  2151.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "constant" || self.iDevice == "user")
  2152.     }
  2153.     inst iRandSeed :: 1 { 
  2154.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2155.         prop Label :: "Seed value"
  2156.         prop JSName :: "seedValue"
  2157.         prop Visible :: 1
  2158.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "random" || self.iDevice == "user")
  2159.     }
  2160.     inst iRandLower :: if GBL.DSPARITHMETIC == "FIXED" {-32767} else {0.0} { 
  2161.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  2162.         prop Style :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0x04}
  2163.         prop Format :: if GBL.DSPARITHMETIC == "FIXED" {"%d"} else {"%f"}
  2164.         prop Label :: "Lower limit"
  2165.         prop JSName :: "lowerLimit"
  2166.         prop Visible :: 1
  2167.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "random" || self.iDevice == "user")
  2168.     }
  2169.     inst iRandUpper :: if GBL.DSPARITHMETIC == "FIXED" {32767} else {1.0} { 
  2170.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  2171.         prop Style :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0x04}
  2172.         prop Format :: if GBL.DSPARITHMETIC == "FIXED" {"%d"} else {"%f"}
  2173.         prop Label :: "Upper limit"
  2174.         prop JSName :: "upperLimit"
  2175.         prop Visible :: 1
  2176.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "random" || self.iDevice == "user")
  2177.     }
  2178.     inst iSineGain :: if GBL.DSPARITHMETIC == "FIXED" {32767} else {1.0} { 
  2179.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  2180.         prop Style :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0x04}
  2181.         prop Format :: if GBL.DSPARITHMETIC == "FIXED" {"%d"} else {"%f"}
  2182.         prop Label :: "Gain"
  2183.         prop JSName :: "gain"
  2184.         prop Visible :: 1
  2185.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "sine" || self.iDevice == "user")
  2186.     }
  2187.     inst iSineFreq :: if GBL.DSPARITHMETIC == "FIXED" {1} else {1000.0} { 
  2188.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  2189.         prop Style :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0x04}
  2190.         prop Format :: if GBL.DSPARITHMETIC == "FIXED" {"%d"} else {"%f"}
  2191.         prop Label :: "Frequency (Hz)"
  2192.         prop JSName :: "frequency"
  2193.         prop Visible :: 1
  2194.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "sine" || self.iDevice == "user")
  2195.     }
  2196.     inst iSinePhase :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0.0} { 
  2197.         prop Type :: "{3EE4CB80-E273-11d0-BB8F-0000C008F2E9}"
  2198.         prop Style :: if GBL.DSPARITHMETIC == "FIXED" {0} else {0x04}
  2199.         prop Format :: if GBL.DSPARITHMETIC == "FIXED" {"%d"} else {"%f"}
  2200.         prop Label :: "Phase (radians)"
  2201.         prop JSName :: "phase"
  2202.         prop Visible :: 1
  2203.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "sine" || self.iDevice == "user")
  2204.     }
  2205.     inst iSineRate :: if GBL.DSPARITHMETIC == "FIXED" {256} else {44000} { 
  2206.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2207.         prop Label :: "Sample rate (samples/sec)"
  2208.         prop JSName :: "rate"
  2209.         prop Visible :: 1
  2210.         prop Writable :: self.iUseDefaults == 0 && (self.iDevice == "sine" || self.iDevice == "user")
  2211.     }
  2212.     inst iUserFxn :: if self.iDevice == "printFloat" {@_DGN_printFloat} else {if self.iDevice == "printHex" {@_DGN_printHex} else {if self.iDevice == "printInt" {@_DGN_printInt} else {@_FXN_F_nop}}} { 
  2213.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2214.         prop Label :: "User function"
  2215.         prop JSName :: "fxn"
  2216.         prop Visible :: 1
  2217.         prop Writable :: self.iDevice == "user"
  2218.         prop Set :: (self.iUserFxn = $1, self.iSaveUserFxn = self.iUserFxn, "ok")
  2219.     }
  2220.     inst iSaveUserFxn :: @_FXN_F_nop { 
  2221.         prop Visible :: 0
  2222.         prop Writable :: 0
  2223.         prop NoGen :: 1
  2224.     }
  2225.     inst iUserArg :: = 0 { 
  2226.         prop Type :: "{7C434D01-1629-11d0-9BFE-0000C0AC14C7}"
  2227.         prop Label :: "User function argument"
  2228.         prop JSName :: "arg"
  2229.         prop Visible :: 1
  2230.         prop Writable :: self.iDevice == "user"
  2231.     }
  2232.     inst iFxns :: @_DGN_FXNS { 
  2233.         prop NoGen :: 1
  2234.     }
  2235. }
  2236. type DHL {
  2237.     isa ObjectMgr
  2238.     prop name :: "DHL"
  2239.     prop Label :: "DHL - Host Link Driver"
  2240.     prop IsContainedIn :: SIODRIVER
  2241.     prop GlobalHelpTopic :: (303)
  2242.     prop InstanceHelpTopic :: (403)
  2243.     prop InstancePropertyPage :: ("{9C29DA20-90F9-11d1-988B-0020AFEE33C6}")
  2244.     prop GlobalPropertyPage :: ("{9C29DA21-90F9-11d1-988B-0020AFEE33C6}")
  2245.     prop GlobalIcon :: 127
  2246.     prop InstanceIcon :: 128
  2247.     prop DependsOn :: "DEV"
  2248.     prop Visible :: 1
  2249.     prop isDriver :: 1
  2250.     prop dataSize :: (7 + 11 * DHL.gNumOf * (GBL.DSPWORDSIZE / GBL.DSPCHARSIZE))
  2251.     prop localCanCreate :: (if (self.gChannelsAvailable > 0) {"ok"} else {self.warning("No HST channels are available for a new DHL device.")})
  2252.     prop localCreate :: (self.gChannelsAvailable--, self.seizeHSTChannel(self.iHSTChannel), "ok")
  2253.     prop seizeHSTChannel :: ($1.iDelUser = "DHL", $1.iDHLAvailable = 0, $1.notify = @_DHL_notify, $1.arg0 = $1.iId, "ok")
  2254.     prop localDelete :: (self.gChannelsAvailable++, self.releaseHSTChannel(self.iHSTChannel), "ok")
  2255.     prop releaseHSTChannel :: ($1.iDelUser = "USER", $1.iDHLAvailable = 1, $1.notify = @_FXN_F_nop, $1.arg0 = 0, "ok")
  2256.     prop AllocType :: (if (self.gNumOf > 0) {"1, _globalAllocDesc, _memSeg, _placement"} )
  2257.     prop _globalAllocDesc :: "%8t .dhl: {}"
  2258.     prop _memSeg :: self.OBJMEMSEG
  2259.     prop _placement :: (0x7fffffff / 2)
  2260.     global gUser :: "USER" { 
  2261.         prop Visible :: 0
  2262.         prop Writable :: 0
  2263.         prop NoGen :: 1
  2264.     }
  2265.     global gSetOf :: 0 { 
  2266.         prop Visible :: 0
  2267.         prop Writable :: 0
  2268.         prop NoGen :: 1
  2269.     }
  2270.     global gNumOf :: 0 { 
  2271.         prop Visible :: 0
  2272.         prop Writable :: 0
  2273.         prop NoGen :: 1
  2274.     }
  2275.     global gDirty :: 0 { 
  2276.         prop Visible :: 0
  2277.         prop Writable :: 0
  2278.         prop NoGen :: 1
  2279.     }
  2280.     global gInitFlag :: 1 { 
  2281.         prop Visible :: 0
  2282.         prop Writable :: 0
  2283.         prop NoGen :: 1
  2284.     }
  2285.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  2286.         prop Visible :: 0
  2287.         prop Writable :: 0
  2288.         prop NoGen :: 1
  2289.     }
  2290.     global gChannelsAvailable :: 0
  2291.     global OBJMEMSEG :: ISRAM { 
  2292.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  2293.         prop MemberType :: MEM
  2294.         prop MemberTest :: MEM.dataMember($1)
  2295.         prop Label :: "Object Memory"
  2296.         prop JSName :: "OBJMEMSEG"
  2297.         prop Visible :: 1
  2298.         prop Writable :: 1
  2299.         prop NoGen :: 1
  2300.     }
  2301.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  2302.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  2303.         prop Label :: "comment"
  2304.         prop JSName :: "comment"
  2305.         prop Visible :: 1
  2306.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  2307.         prop NoGen :: 1
  2308.     }
  2309.     inst iIsUsed :: 0 { 
  2310.         prop Visible :: 0
  2311.         prop Writable :: 0
  2312.         prop NoGen :: 1
  2313.     }
  2314.     inst iId :: 0 { 
  2315.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2316.         prop Style :: 0x01
  2317.         prop Visible :: 0
  2318.         prop Writable :: 1
  2319.         prop NoGen :: 1
  2320.     }
  2321.     inst iDelUser :: "USER" { 
  2322.         prop Visible :: 0
  2323.         prop Writable :: 0
  2324.         prop NoGen :: 1
  2325.     }
  2326.     inst iDelMsg :: "ok" { 
  2327.         prop Visible :: 0
  2328.         prop Writable :: 0
  2329.         prop NoGen :: 1
  2330.     }
  2331.     inst iHSTChannel :: (scan ($i; HST) {if ($i.iDHLAvailable == 1) {$a = $i} }, $a) { 
  2332.         prop Type :: "{7BA2DA00-5A53-11d0-9BFE-0000C0AC14C7}"
  2333.         prop Label :: "Underlying HST Channel"
  2334.         prop JSName :: "hstChannel"
  2335.         prop MemberType :: HST
  2336.         prop MemberTest :: (if (($1.iDHLAvailable == 1) || ($1 == self.iHSTChannel)) {1} else {0})
  2337.         prop Set :: (if ($1.iDHLAvailable != 1) {self.error("This channel is already in use.")} else {self.releaseHSTChannel(self.iHSTChannel), self.seizeHSTChannel($1), self.iHSTChannel = $1, "ok"})
  2338.         prop Visible :: 1
  2339.         prop Writable :: 1
  2340.         prop NoGen :: 0
  2341.     }
  2342.     inst iMode :: = self.iHSTChannel.mode { 
  2343.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  2344.         prop Label :: "Mode"
  2345.         prop JSName :: "mode"
  2346.         prop Visible :: 1
  2347.         prop Writable :: 0
  2348.         prop NoGen :: 0
  2349.     }
  2350.     inst iDevId :: = (self.iHSTChannel.iId) { 
  2351.         prop NoGen :: 0
  2352.     }
  2353.     inst iIsTerminal :: 1 { 
  2354.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2355.         prop NoGen :: 1
  2356.     }
  2357.     inst iIsVirtual :: 0 { 
  2358.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2359.         prop NoGen :: 1
  2360.     }
  2361.     inst iFxns :: @_DHL_FXNS { 
  2362.         prop NoGen :: 1
  2363.     }
  2364. }
  2365. type DPI {
  2366.     isa ObjectMgr
  2367.     prop name :: "DPI"
  2368.     prop Label :: "DPI - Pipe Driver"
  2369.     prop IsContainedIn :: SIODRIVER
  2370.     prop GlobalIcon :: 127
  2371.     prop InstanceIcon :: 128
  2372.     prop GlobalHelpTopic :: (304)
  2373.     prop InstanceHelpTopic :: (404)
  2374.     prop InstancePropertyPage :: ("{7FE06FA0-2DE9-11d1-988B-0020AFEE33C6}")
  2375.     prop GlobalPropertyPage :: ("{7FE06FA1-2DE9-11d1-988B-0020AFEE33C6}")
  2376.     prop DependsOn :: "DEV"
  2377.     prop maxObjs :: (32767)
  2378.     prop isDriver :: (1)
  2379.     prop localCreate :: (self.gCurDevId += 1, "ok")
  2380.     global gUser :: "USER" { 
  2381.         prop Visible :: 0
  2382.         prop Writable :: 0
  2383.         prop NoGen :: 1
  2384.     }
  2385.     global gSetOf :: 0 { 
  2386.         prop Visible :: 0
  2387.         prop Writable :: 0
  2388.         prop NoGen :: 1
  2389.     }
  2390.     global gNumOf :: 0 { 
  2391.         prop Visible :: 0
  2392.         prop Writable :: 0
  2393.         prop NoGen :: 1
  2394.     }
  2395.     global gDirty :: 0 { 
  2396.         prop Visible :: 0
  2397.         prop Writable :: 0
  2398.         prop NoGen :: 1
  2399.     }
  2400.     global gInitFlag :: 1 { 
  2401.         prop Visible :: 0
  2402.         prop Writable :: 0
  2403.         prop NoGen :: 1
  2404.     }
  2405.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  2406.         prop Visible :: 0
  2407.         prop Writable :: 0
  2408.         prop NoGen :: 1
  2409.     }
  2410.     global gCurDevId :: 0 { 
  2411.         prop Visible :: 0
  2412.         prop Writable :: 0
  2413.         prop NoGen :: 1
  2414.     }
  2415.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  2416.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  2417.         prop Label :: "comment"
  2418.         prop JSName :: "comment"
  2419.         prop Visible :: 1
  2420.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  2421.         prop NoGen :: 1
  2422.     }
  2423.     inst iIsUsed :: 0 { 
  2424.         prop Visible :: 0
  2425.         prop Writable :: 0
  2426.         prop NoGen :: 1
  2427.     }
  2428.     inst iId :: 0 { 
  2429.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2430.         prop Style :: 0x01
  2431.         prop Visible :: 0
  2432.         prop Writable :: 1
  2433.         prop NoGen :: 1
  2434.     }
  2435.     inst iDelUser :: "USER" { 
  2436.         prop Visible :: 0
  2437.         prop Writable :: 0
  2438.         prop NoGen :: 1
  2439.     }
  2440.     inst iDelMsg :: "ok" { 
  2441.         prop Visible :: 0
  2442.         prop Writable :: 0
  2443.         prop NoGen :: 1
  2444.     }
  2445.     inst iDevId :: DPI.gCurDevId { 
  2446.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2447.         prop Visible :: 0
  2448.         prop Writable :: 0
  2449.         prop Set :: (self.error("DPI.iDevId parameter no longer settable, it is now handled automatically"))
  2450.     }
  2451.     inst iIsVirtual :: 0 { 
  2452.         prop Label :: "Allow virtual instances of this device."
  2453.         prop JSName :: "allowVirtual"
  2454.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2455.         prop Visible :: 1
  2456.         prop Writable :: 1
  2457.         prop NoGen :: 0
  2458.         prop Set :: (if ($1 == 1) {$a = "ok", $b = 1, scan ($i; SIO) {if ($i.iDevice == self) {$a = self.error("This DPI instance is being used by one or more SIO instances, cannot reconfigure"), $b = 0} }, if ($b == 1) {self.iIsVirtual = 1} , $a} else {self.iIsVirtual = 0, "ok"})
  2459.     }
  2460.     inst iIsTerminal :: 1 { 
  2461.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2462.         prop NoGen :: 1
  2463.     }
  2464.     inst iFxns :: @_DPI_FXNS { 
  2465.         prop NoGen :: 1
  2466.     }
  2467. }
  2468. type HOOK {
  2469.     isa ObjectMgr
  2470.     prop name :: "HOOK"
  2471.     prop Label :: "HOOK - Module Hook Manager"
  2472.     prop IsContainedIn :: SYSTEM
  2473.     prop DependsOn :: "SWI"
  2474.     prop InstancePropertyPage :: ("{473C4A64-B1A8-11d0-9885-0020AFEE33C6}")
  2475.     prop GlobalIcon :: 181
  2476.     prop InstanceIcon :: 182
  2477.     prop GlobalHelpTopic :: (318)
  2478.     prop InstanceHelpTopic :: (418)
  2479.     prop localCreate :: (if (self.gNumOf == 0) {HOOK_KNL.iIsUsed = 1, self.mkId(0)} , "ok")
  2480.     prop localDelete :: (if (self.gNumOf == 2) {HOOK_KNL.iIsUsed = 0, self.rmId} , "ok")
  2481.     prop maxObjs :: (32767)
  2482.     prop SortByField :: "iPri"
  2483.     prop SortGroups :: 1
  2484.     global gUser :: "USER" { 
  2485.         prop Visible :: 0
  2486.         prop Writable :: 0
  2487.         prop NoGen :: 1
  2488.     }
  2489.     global gSetOf :: 0 { 
  2490.         prop Visible :: 0
  2491.         prop Writable :: 0
  2492.         prop NoGen :: 1
  2493.     }
  2494.     global gNumOf :: 0 { 
  2495.         prop Visible :: 0
  2496.         prop Writable :: 0
  2497.         prop NoGen :: 1
  2498.     }
  2499.     global gDirty :: 0 { 
  2500.         prop Visible :: 0
  2501.         prop Writable :: 0
  2502.         prop NoGen :: 1
  2503.     }
  2504.     global gInitFlag :: 1 { 
  2505.         prop Visible :: 0
  2506.         prop Writable :: 0
  2507.         prop NoGen :: 1
  2508.     }
  2509.     global gInit :: = ($a = 0, $b = 0, scan ($i; self) {if ($i.IsConfObj()) {$a += 1, if (self.isFinite) {$b |= 1 << $i.iId} } }, self.gNumOf = $a, self.gSetOf = $b, if (self.gInitFlag == 0) {self.localInit()} , self.gInitFlag = 1) { 
  2510.         prop Visible :: 0
  2511.         prop Writable :: 0
  2512.         prop NoGen :: 1
  2513.     }
  2514.     global KNLID :: = (HOOK_KNL.Order - 1) { 
  2515.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2516.     }
  2517.     inst iComment :: if self.iDelUser == "USER" {"<add comments here>"} else {self.iDelMsg} { 
  2518.         prop Type :: "{21455EA3-B96A-11cf-9BFE-0000C0AC14C7}"
  2519.         prop Label :: "comment"
  2520.         prop JSName :: "comment"
  2521.         prop Visible :: 1
  2522.         prop Writable :: if self.iDelUser == "USER" {1} else {0}
  2523.         prop NoGen :: 1
  2524.     }
  2525.     inst iIsUsed :: 0 { 
  2526.         prop Visible :: 0
  2527.         prop Writable :: 0
  2528.         prop NoGen :: 1
  2529.     }
  2530.     inst iId :: 0 { 
  2531.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2532.         prop Style :: 0x01
  2533.         prop Visible :: 0
  2534.         prop Writable :: 1
  2535.         prop NoGen :: 1
  2536.     }
  2537.     inst iDelUser :: "USER" { 
  2538.         prop Visible :: 0
  2539.         prop Writable :: 0
  2540.         prop NoGen :: 1
  2541.     }
  2542.     inst iDelMsg :: "ok" { 
  2543.         prop Visible :: 0
  2544.         prop Writable :: 0
  2545.         prop NoGen :: 1
  2546.     }
  2547.     inst initFxn :: @_FXN_F_nop { 
  2548.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2549.         prop Label :: "Initialization function"
  2550.         prop JSName :: "initFxn"
  2551.         prop Visible :: 1
  2552.         prop Writable :: 1
  2553.     }
  2554.     inst createFxn :: @_FXN_F_nop { 
  2555.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2556.         prop Label :: "Create function"
  2557.         prop JSName :: "createFxn"
  2558.         prop Visible :: 1
  2559.         prop Writable :: self.iDelUser == "USER"
  2560.     }
  2561.     inst deleteFxn :: @_FXN_F_nop { 
  2562.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2563.         prop Label :: "Delete function"
  2564.         prop JSName :: "deleteFxn"
  2565.         prop Visible :: 1
  2566.         prop Writable :: self.iDelUser == "USER"
  2567.     }
  2568.     inst exitFxn :: @_FXN_F_nop { 
  2569.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2570.         prop Label :: "Exit function"
  2571.         prop JSName :: "exitFxn"
  2572.         prop Visible :: 1
  2573.         prop Writable :: self.iDelUser == "USER"
  2574.     }
  2575.     inst callSwitchFxn :: 0 { 
  2576.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2577.         prop Label :: "Call switch function"
  2578.         prop JSName :: "callSwitchFxn"
  2579.         prop Visible :: 1
  2580.         prop Writable :: self.iDelUser == "USER"
  2581.     }
  2582.     inst switchFxn :: @_FXN_F_nop { 
  2583.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2584.         prop Label :: "Switch function"
  2585.         prop JSName :: "switchFxn"
  2586.         prop Visible :: 1
  2587.         prop Writable :: self.callSwitchFxn
  2588.     }
  2589.     inst callReadyFxn :: 0 { 
  2590.         prop Type :: "{21455EA0-B96A-11cf-9BFE-0000C0AC14C7}"
  2591.         prop Label :: "Call ready function"
  2592.         prop JSName :: "callReadyFxn"
  2593.         prop Visible :: 1
  2594.         prop Writable :: self.iDelUser == "USER"
  2595.     }
  2596.     inst readyFxn :: @_FXN_F_nop { 
  2597.         prop Type :: "{7C434D00-1629-11d0-9BFE-0000C0AC14C7}"
  2598.         prop Label :: "Ready function"
  2599.         prop JSName :: "readyFxn"
  2600.         prop Visible :: 1
  2601.         prop Writable :: self.callReadyFxn
  2602.     }
  2603.     inst Order :: 2 { 
  2604.         prop Type :: "{21455EA2-B96A-11cf-9BFE-0000C0AC14C7}"
  2605.         prop JSName :: "order"
  2606.         prop NoGen :: 1
  2607.         prop Writable :: 1
  2608.     }
  2609.     inst iPri :: 0 { 
  2610.         prop Type :: "{A11FE980-C07A-11cf-9BFE-0000C0AC14C7}"
  2611.         prop Visible :: 0
  2612.         prop NoGen :: 1
  2613.     }
  2614. }
  2615. object HOOK_KNL :: HOOK {
  2616.     param iComment :: "Used to support TSK function hooks (cannot be deleted)"
  2617.     param iIsUsed :: 0
  2618.     param iId :: 0
  2619.     param iDelUser :: "HOOK"
  2620.     param iDelMsg :: "This hook instance is used by TSK and cannot be deleted"
  2621.     param initFxn :: @_FXN_F_nop
  2622.     param createFxn :: @_FXN_F_nop
  2623.     param deleteFxn :: @_FXN_F_nop
  2624.     param exitFxn :: @_FXN_F_nop
  2625.     param callSwitchFxn :: 0
  2626.     param switchFxn :: @_FXN_F_nop
  2627.     param callReadyFxn :: 0
  2628.     param readyFxn :: @_FXN_F_nop
  2629.     param Order :: 1
  2630.     param iPri :: 0
  2631. }
  2632. type DIO {
  2633.     isa ObjectMgr
  2634.     prop Visible :: 1
  2635.     prop Label :: "DIO - Class Driver"
  2636.     prop name :: "DIO"
  2637.     prop IsContainedIn :: SIODRIVER
  2638.     prop GlobalIcon :: 127
  2639.     prop InstanceIcon :: 127
  2640.     prop GlobalHelpTopic :: (319)
  2641.     prop InstanceHelpTopic :: (419)
  2642.     prop InstancePropertyPage :: ("{f80273c0-3838-11d2-a32c-006097656921}")
  2643.     prop GlobalPropertyPage :: ("{050a0600-3839-11d2-a32c-006097656921}")
  2644.     prop maxObjs :: (32767)
  2645.     prop AllocType :: (if (self.gNumOf > 0) {"1, _globalAllocDesc, _memSeg, _placement"} )
  2646.     prop _globalAllocDesc :: ("%8t .dio: {}")
  2647.     prop _placement :: (0x7fffffff / 2)
  2648.     prop _memSeg :: self.OBJMEMSEG
  2649.     prop isDriver :: (1)
  2650.     prop mdObject :: ($h = nil, $j = nil, scan ($h; UDEV) {if ($h.driverType == "DEV_IOMTYPE") {$j = $h, break} }, $j)
  2651.     prop localCanCreate :: (if (self.mdObject == nil) {self.error("An IOM type device must be created first.")} else {"ok"})
  2652.     prop numTsk :: ($a = 0, $h = nil, scan ($h; DIO) {if ($h.useCallBackFxn == 0) {$a = $a + $h.numTimeUse} }, $a)
  2653.     prop numSwi :: ($a = 0, $h = nil, scan ($h; DIO) {if ($h.useCallBackFxn == 1) {$a = $a + $h.numTimeUse} }, $a)
  2654.     prop functionTablePtr :: (if (self.STATIC) {if (self.useCallBackFxn) {@_DIO_cbStaticFxns} else {@_DIO_tskStaticFxns}} else {if (self.useCallBackFxn) {@_DIO_cbDynamicFxns} else {@_DIO_tskDynamicFxns}})