{10.2.1.2978} {Enterprise Dynamics startup information} if(StartingED, SoftStartED([])); {Model information} AddLayer([Main], 1, 1, 0); {Load required atoms} int011; int035([Availability Control], pDir([Atoms\AVAILABILITY\Availability Control.atm])); int035([Switch Availability], pDir([Atoms\AVAILABILITY\Switch Availability.atm])); int035([Product], pDir([Atoms\BASIC MODELING\Product.atm])); int035([Queue], pDir([Atoms\BASIC MODELING\Queue.atm])); int035([Server], pDir([Atoms\BASIC MODELING\Server.atm])); int035([Sink], pDir([Atoms\BASIC MODELING\Sink.atm])); int035([Source], pDir([Atoms\BASIC MODELING\Source.atm])); int035([Table], pDir([Atoms\DATA\Table.atm])); int035([StatusIndicator], pDir([Atoms\RESULTS\STATUS\StatusIndicator.atm])); int035([Ground Storage], pDir([Atoms\STORAGE\Ground Storage.atm])); int035([ArrivalList], pDir([Atoms\TIME\ArrivalList.atm])); int035([ShowDateTime], pDir([Atoms\TIME\ShowDateTime.atm])); int035([Textbox], pDir([Atoms\VISUALIZATION\Textbox.atm])); int012; {Preregister 4DS} PreregisterFunction([ExcelActiveX90_table1], 2, 2); PreregisterFunction([SetExcelActiveX90_table1], 3, 3); Dim([refExcelActiveX90_table1], vbAtom); {Atom: ExcelActiveX90_table1} sets; AtomByName([Table], Main); if(not(AtomExists), Error([Cannot find mother atom 'Table'. Inheriting from BaseClass.])); CreateAtom(a, s, [ExcelActiveX90_table1], 1, false); Set(OnInit, [4DS[Dim([refExcelActiveX90_table1], vbAtom, c)]4DS]); SetTextAtt([AliasName], [ExcelActiveX90_table1]); SetAtt([createfunctions], 0); SetAtt([AliasesCreated], 1); SetAtt([CreateAlias], 1); SetAtt([nrows], 5); SetAtt([ncols], 5); SetAtt([UseAtomName], 1); SetAtt([ClearOnReset], 0); int023([], 32896, 32); DefineFunction([ExcelActiveX90_table1], [Basic], 2, 2, [cell(p(1),p(2), refExcelActiveX90_table1)], [Returns the value of cell(e1, e2)], [No example], [public], [Table.atm], a, 0, vbVariant, []); DefineFunction([SetExcelActiveX90_table1], [Basic], 3, 3, [setcell(p(1),p(2),p(3), refExcelActiveX90_table1)], [Sets cell(e1, e2) to value e3], [No example], [public], [Table.atm], a, 0, vbVariant, []); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Table.ico])); Set(DdbRec, [>t-table:1.]); int001(705720); SetLoc(-48, -32, 0); SetSize(5, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(21, 6); int015(0, 64, [`` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 ]); int015(1, 64, [1 `Folienummer` 750082503 850078503 640063034 750067038 840073001 840073066 850098068 750082503 850078503 640063034 750067038 840073001 840073066 850098068 640063034 750067038 840073001 840073066 850098068 ]); int015(2, 64, [2 `Aantal rollen` 13 15 11 10 9 8 7 13 15 11 10 9 8 7 9 24 13 15 14 ]); int015(3, 64, [3 `Machine` 1 2 3 4 1 3 4 3 2 1 4 3 2 4 1 2 3 4 1 ]); int015(4, 64, [4 `Vak` 6 3 5 7 9 4 8 10 11 1 2 6 5 3 7 9 4 8 10 ]); int015(5, 64, [5 `Kilo` 13000 15000 11000 10000 9000 8000 7000 13000 15000 11000 10000 9000 8000 7000 9000 24000 13000 15000 14000 ]); int015(6, 64, [6 `Omsteltijd` 3600 4805 4335 4705 3676 3588 3514 3486 4805 4335 4705 3676 3588 3514 3208 4705 3676 3588 3514 ]); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705213); SetLoc(-55, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705266); SetLoc(-55, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 30-8} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 30-8], 1, false); CreateAttributes(8); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttributeName(18, [Table_ArrivalTime_Row_4], a); SetAttributeName(19, [Table_Quantity_Row_4], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [16], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [16], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [29], a, [public], [], false); SetAttribute(r(7), [Table_ArrivalTime_Row_4], vbVariant, [0.1 ], a, [public], [], false); SetAttribute(r(8), [Table_Quantity_Row_4], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 16); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 4); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(288527); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-53, -110, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(4, 5); int015(0, 80, [`` 1 2 3 4 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 `0.1 ` ]); int015(2, 99, [`Atom name` `850/7,8 zwart` `750/6,7 TC/ZW` `750/6,7 TC/ZW` `850/8,4 Recoverblauw` ]); int015(3, 80, [`Quantity` 16 16 29 24 ]); int015(4, 80, [`Channel` 1 1 1 1 ]); int015(5, 133, [`Machine` `=4 ` `=2` `=2` `=4` ]); SetStatus(2); int018; {Atom: Source35} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Source35], 1, false); SetExprAtt([SendTo], [4DS[{.~1|~case( label([Thermoformmachine],first(c)), [KL2SH-0], [KL2SH-1], [KMD75-1], [KMD75-2], [KMD78-3], [KMD78-4], [KMD78-5], [KMD78-6], 9, 10, 11, 12 )~.}case( label([Thermoformmachine],first(c)), [KL2SH-0], [KL2SH-1], [KMD75-1], [KMD75-2], [KMD78-3], [KMD78-4], [KMD78-5], [KMD78-6], 9, 10, 11, 12 )]4DS]); SetExprAtt([CycleTime], [10]); SetExprAtt([CreationTrigger], [{.0|10. Do Nothing.}0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([FirstProduct], [10]); SetExprAtt([MaxProducts], [{.-1|1. Unlimited.}-1]); SetAtt([Icon3D], 4); int023([], 7168771, 240); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705156); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-52, -105, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705218); SetLoc(-49, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705267); SetLoc(-49, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 24-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 24-9], 1, false); CreateAttributes(6); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [15], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [18], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 15); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 3); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705219); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-47, -108, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(3, 5); int015(0, 80, [`` 1 2 3 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 ]); int015(2, 127, [`Atom name` `850/8,4 recover blauw` `750/8,2 zwart` `850/8,0 tc/zwart` ]); int015(3, 80, [`Quantity` 15 18 24 ]); int015(4, 80, [`Channel` 1 1 1 ]); int015(5, 133, [`Machine` `=4 ` `=3` `=2` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705220); SetLoc(-53, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705268); SetLoc(-53, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 6-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 6-9], 1, false); CreateAttributes(8); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttributeName(18, [Table_ArrivalTime_Row_4], a); SetAttributeName(19, [Table_Quantity_Row_4], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [19], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [16], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [24], a, [public], [], false); SetAttribute(r(7), [Table_ArrivalTime_Row_4], vbVariant, [0.1 ], a, [public], [], false); SetAttribute(r(8), [Table_Quantity_Row_4], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 19); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 4); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705221); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-51, -110, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(4, 5); int015(0, 80, [`` 1 2 3 4 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 `0.1 ` ]); int015(2, 99, [`Atom name` `850/8,4 recoverblauw` `850/7,4 zwart` `750/6,7 zwart` `850/7,4 zwart` ]); int015(3, 80, [`Quantity` 19 16 24 24 ]); int015(4, 80, [`Channel` 1 1 1 1 ]); int015(5, 133, [`Machine` `=4 ` `=4` `=2` `=4` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705222); SetLoc(-51, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705269); SetLoc(-51, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 9-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 9-9], 1, false); CreateAttributes(10); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttributeName(18, [Table_ArrivalTime_Row_4], a); SetAttributeName(19, [Table_Quantity_Row_4], a); SetAttributeName(20, [Table_ArrivalTime_Row_5], a); SetAttributeName(21, [Table_Quantity_Row_5], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [24], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [11], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [16], a, [public], [], false); SetAttribute(r(7), [Table_ArrivalTime_Row_4], vbVariant, [0.1 ], a, [public], [], false); SetAttribute(r(8), [Table_Quantity_Row_4], vbVariant, [16], a, [public], [], false); SetAttribute(r(9), [Table_ArrivalTime_Row_5], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(10), [Table_Quantity_Row_5], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 24); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 5); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705223); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-49, -110, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(5, 5); int015(0, 80, [`` 1 2 3 4 5 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 `0.1 ` 0.1 ]); int015(2, 99, [`Atom name` `750/6,7 zwart` `850/7,4 zwart` `850/7,4 tc/zwart` `850/7,4 tc/zwart` `750/6,7 zwart` ]); int015(3, 80, [`Quantity` 24 11 16 16 24 ]); int015(4, 80, [`Channel` 1 1 1 1 1 ]); int015(5, 133, [`Machine` `=2` `=4` `=2` `=4` `=2` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705224); SetLoc(-49, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705270); SetLoc(-49, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 11-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 11-9], 1, false); CreateAttributes(6); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [24], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [15], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [16], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 24); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 3); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705225); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-47, -110, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(3, 5); int015(0, 80, [`` 1 2 3 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 ]); int015(2, 99, [`Atom name` `750/6,7 zwart` `850/7,4 zwart` `750/6,7 zwart` ]); int015(3, 80, [`Quantity` 24 15 16 ]); int015(4, 80, [`Channel` 1 1 1 ]); int015(5, 133, [`Machine` `=2` `=4` `=2` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705226); SetLoc(-47, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705271); SetLoc(-47, -109, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 13-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 13-9], 1, false); CreateAttributes(6); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [11.5], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [20], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 12); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 3); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705227); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-45, -110, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(3, 5); int015(0, 80, [`` 1 2 3 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 ]); int015(2, 99, [`Atom name` `850/7,8 wit/zw` `850/7,8 zwart` `750/8.2 zwart` ]); int015(3, 80, [`Quantity` 11.5 20 24 ]); int015(4, 80, [`Channel` 1 1 1 ]); int015(5, 133, [`Machine` `=4` `=4` `=3` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705228); SetLoc(-55, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705272); SetLoc(-55, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 16-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 16-9], 1, false); CreateAttributes(6); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [24], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [16], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 24); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 3); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705229); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-53, -108, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(3, 5); int015(0, 80, [`` 1 2 3 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 ]); int015(2, 99, [`Atom name` `750/8.2 zwart` `850/7,8 zwart` `750/6,7 zwart` ]); int015(3, 80, [`Quantity` 24 16 24 ]); int015(4, 80, [`Channel` 1 1 1 ]); int015(5, 133, [`Machine` `=3` `=4` `=2` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705230); SetLoc(-53, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705273); SetLoc(-53, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 17-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 17-9], 1, false); CreateAttributes(6); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [15], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [16], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [24], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 15); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 3); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705231); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-51, -108, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(3, 5); int015(0, 80, [`` 1 2 3 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 ]); int015(2, 129, [`Atom name` `750/6,7 zwart` `850/8,2 zwart` `850/8,4 recover blauw` ]); int015(3, 80, [`Quantity` 15 16 24 ]); int015(4, 80, [`Channel` 1 1 1 ]); int015(5, 133, [`Machine` `=2` `=3` `=4` ]); SetStatus(2); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705232); SetLoc(-51, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705274); SetLoc(-51, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning 23-9} sets; AtomByName([ArrivalList], Main); if(not(AtomExists), Error([Cannot find mother atom 'ArrivalList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning 23-9], 1, false); CreateAttributes(8); SetAttributeName(12, [Table_ArrivalTime_Row_1], a); SetAttributeName(13, [Table_Quantity_Row_1], a); SetAttributeName(14, [Table_ArrivalTime_Row_2], a); SetAttributeName(15, [Table_Quantity_Row_2], a); SetAttributeName(16, [Table_ArrivalTime_Row_3], a); SetAttributeName(17, [Table_Quantity_Row_3], a); SetAttributeName(18, [Table_ArrivalTime_Row_4], a); SetAttributeName(19, [Table_Quantity_Row_4], a); SetAttribute(r(1), [Table_ArrivalTime_Row_1], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(2), [Table_Quantity_Row_1], vbVariant, [64], a, [public], [], false); SetAttribute(r(3), [Table_ArrivalTime_Row_2], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(4), [Table_Quantity_Row_2], vbVariant, [16], a, [public], [], false); SetAttribute(r(5), [Table_ArrivalTime_Row_3], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(6), [Table_Quantity_Row_3], vbVariant, [20], a, [public], [], false); SetAttribute(r(7), [Table_ArrivalTime_Row_4], vbVariant, [0.1], a, [public], [], false); SetAttribute(r(8), [Table_Quantity_Row_4], vbVariant, [12], a, [public], [], false); SetAtt([counter], 0); SetExprAtt([fillexpr], [negexp(10)]); SetAtt([runcounter], 1); SetExprAtt([repeatfactor], [{.0|1. No repeat.}0]); SetAtt([basetime], 0); SetAtt([curqty], 64); SetExprAtt([exittrigger], [0]); SetAtt([nrlabels], 1); SetAtt([nrarrivals], 4); SetAtt([UseLabels], 0); SetAtt([DefineArrivals], 0); int023([], 7168771, 1256); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ArrivalList.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705233); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-49, -108, 0); SetSize(2, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(4, 5); int015(0, 80, [`` 1 2 3 4 ]); int015(1, 80, [`Arrival Time` 0.1 0.1 0.1 0.1 ]); int015(2, 129, [`Atom name` `850/8,4 recover blauw` `730/6,0 zwart` `850/8,0 tc/zw` `750/8,2 zwart` ]); int015(3, 80, [`Quantity` 64 16 20 12 ]); int015(4, 80, [`Channel` 1 1 1 1 ]); int015(5, 133, [`Machine` `=4` `=2` `=4` `=3` ]); SetStatus(2); int018; {Atom: Textbox70} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Textbox70], 1, false); SetTextAtt([text], [Rest (niet verwijderen)]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 1); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705276); SetLoc(-55, -112, 1); SetSize(2.8, 1.4, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Planning} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Planning], 1, false); SetTextAtt([text], [Planning]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705277); SetLoc(-48, -20, 1); SetSize(9, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Ground Storage66} sets; AtomByName([Ground Storage], Main); if(not(AtomExists), Error([Cannot find mother atom 'Ground Storage'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Ground Storage66], 1, false); SetAtt([rows], 24); SetAtt([columns], 11); SetAtt([currow], 1); SetAtt([curcol], 1); SetExprAtt([entrytrigger], [0]); SetExprAtt([exittrigger], [0]); SetExprAtt([putinrow], [1]); SetExprAtt([putincol], [4DS[case( label([Vak],last(c)), 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11 ) ]4DS]); SetExprAtt([instrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetExprAtt([queuediscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetExprAtt([sendto], [{.~1|~1~.}1]); SetExprAtt([prodtosend], [0 ]); SetAtt([temp], 0); SetAtt([showcontents], 0); SetAtt([SizeToRowsCols], 1); SetAtt([2DView], 1); SetAtt([Detection], 0); int023([], 0, 9392); Set(Icon(a), RegisterIcon(IconsDir([bmp\buffers\warehouse.bmp]), [warehouse])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); AddTexture( RegisterTexture(IconsDir([Bmp\Buffers\warehouse.bmp]), [warehouse.bmp], 128, 64, 255, 255, 0, 0, 0, 0), a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\GroundStorage.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 255); int001(705279); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-9, -3, 0); SetSize(11, 24, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(24, 11); int015(0, 64, [`` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 ]); int015(1, 64, [1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(2, 64, [2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(3, 64, [3 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(4, 64, [4 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(5, 64, [5 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(6, 64, [6 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(7, 64, [7 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(8, 64, [8 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(9, 64, [9 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(10, 64, [10 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(11, 64, [11 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); SetStatus(15); int018; {Atom: product 1} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 1], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(2,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(2,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(2,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(2,2) ~.}ExcelActiveX90_table1(2,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705282); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, -18, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Kopie van Excel planning} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Kopie van Excel planning], 1, false); SetTextAtt([text], [Kopie van Excel planning]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 1); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705287); SetLoc(-48, -34, 1); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: product 2} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 2], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 200); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(3,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(3,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>t-fqp:folienummer.>vak:3.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705288); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -15, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 1} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 1], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(2,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(2,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 4.76); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 1); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>vak:2.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705292); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -18, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 3} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 3], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(4,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(4,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705293); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -12, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Text in atoom voorbeeld} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Text in atoom voorbeeld], 1, false); SetExprAtt([SendTo], [4DS[{.~1|~Do( var([atmProduction], vbAtom, in(1, c)), var([atmSource], vbAtom, in(2, c)), Label([CurrentProduct], atmSource) := 0, Repeat( nRows(atmProduction), Cell(count, 3, atmProduction) := 0 ) )~.}Do( var([atmProduction], vbAtom, in(1, c)), var([atmSource], vbAtom, in(2, c)), {Set back last label} Label([CurrentProduct], atmSource) := 0, Repeat( nRows(atmProduction), {Set the last production time back to 0 on Reset} Cell(count, 3, atmProduction) := 0 ) )]4DS]); SetAtt([Capacity], 10); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 1); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705325); SetLoc(-52, -102, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Orders} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Orders], 1, false); SetTextAtt([text], [Orders]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705328); SetLoc(-35, -20, 1); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Extrusie 1} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Extrusie 1], 1, false); SetExprAtt([CycleTime], [2800 ]); SetExprAtt([SendTo], [4DS[{.~1|~case( label([Machine],first(c)), if(content(out(1,c)),5,1), if(content(out(2,c)),5,2), if(content(out(3,c)),5,3), if(content(out(4,c)),5,4) )~.}case( label([Machine],first(c)), if(content(out(1,c)),5,1), if(content(out(2,c)),5,2), if(content(out(3,c)),5,3), if(content(out(4,c)),5,4) )]4DS]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [4DS[{.~1|~if (label([Vorigfolienummer],c) = label([Folienummer], first(c)), 0, excelactiveX90_table1(2,6) ) ~.}if (label([Vorigfolienummer],c) = label([Folienummer], first(c)), 0, excelactiveX90_table1(2,6) ) ]4DS]); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [4DS[Label([Vorigfolienummer],c) := Label([Folienummer], i)]4DS]); SetExprAtt([mttf], [0]); SetExprAtt([mttr], [0]); SetAtt([TotalBusy], 0); SetExprAtt([Utilization], [4DS[If( Time > 0, Concat( [Util: ], String ( *( 100, /( statustime(c,2), Time)), 0, 1), [ %]), [Util: 0 %] )]4DS]); SetAtt([CurCycle], 2800); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.openallic(c)|1. Any inputchannel - First channel first.}openallic(c)]); SetAtt([3DIcon], 7); SetAtt([BusyFlag], 0); SetExprAtt([mcbf], [0]); SetAtt([nextmcbf], 0); SetExprAtt([mttr2], [0]); SetAtt([curmttr2], 0); SetAtt([LastStatus1], 0); SetAtt([LastStatus2], 0); SetAtt([CyclesCounter], 0); SetAtt([LastDown], 0); SetAtt([SecondColor], 4259584); SetExprAtt([mtbf], [mttf]); SetAtt([BeginBusy], 8400); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); int023([], 32768, 263344); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\server.bmp]), [server])); AddModel3D( RegisterModel3D(Model3DDir([Server.wrl]), [Server.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([server2.wrl]), [server2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server_Resized.wrl]), [Server_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server2_Resized.wrl]), [Server2_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Server.ico])); Set(DdbRec, [>vorigfolienummer:750082503.]); SetChannels(11, 5); SetChannelRanges(1, 255, 1, 255); int001(705334); int013(1, 0, true, false, 0, 0, [], []); int013(2, 0, true, false, 0, 0, [], []); int013(3, 0, true, false, 0, 0, [], []); int013(4, 0, true, false, 0, 0, [], []); int013(5, 0, true, false, 0, 0, [], []); int013(6, 0, true, true, 0, 0, [], []); int013(7, 0, true, true, 0, 0, [], []); int013(8, 0, true, true, 0, 0, [], []); int013(9, 0, true, true, 0, 0, [], []); int013(10, 0, true, true, 0, 0, [], []); int013(11, 0, true, true, 0, 0, [], []); SetLoc(-22, -18, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(24, 11); int015(0, 0, [`` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 ]); int015(1, 0, [1 ]); int015(2, 0, [2 ]); int015(3, 0, [3 ]); int015(4, 0, [4 ]); int015(5, 0, [5 ]); int015(6, 0, [6 ]); int015(7, 0, [7 ]); int015(8, 0, [8 ]); int015(9, 0, [9 ]); int015(10, 0, [10 ]); int015(11, 0, [11 ]); SetStatus(1); int018; {Atom: Extruderen} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Extruderen], 1, false); SetTextAtt([text], [Extruderen]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705365); SetLoc(-22, -20, 1); SetSize(7, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: product 2} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 2], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(3,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(3,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(2,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(3,2) ~.}ExcelActiveX90_table1(3,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705397); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, -15, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 3} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 3], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(4,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(4,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(4,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(4,2) ~.}ExcelActiveX90_table1(4,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705398); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, -12, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: product 4} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 4], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(5,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(5,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(5,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(5,2) ~.}ExcelActiveX90_table1(5,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705399); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, -9, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: product 5} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 5], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(6,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(6,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(6,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(6,2) ~.}ExcelActiveX90_table1(6,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705400); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, -6, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 6} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 6], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(7,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(7,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(7,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(7,2) ~.}ExcelActiveX90_table1(7,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705401); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, -3, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: product 7} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 7], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(8,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(8,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(8,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(8,2) ~.}ExcelActiveX90_table1(8,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705402); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 0, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: product 8} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 8], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(9,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(9,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(9,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(9,2) ~.}ExcelActiveX90_table1(9,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705403); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 3, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 9} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 9], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(10,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(10,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(9,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(10,2) ~.}ExcelActiveX90_table1(10,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705404); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 6, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 10} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 10], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(11,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(11,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(11,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(11,2) ~.}ExcelActiveX90_table1(11,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705405); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 9, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 11} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 11], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(12,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(12,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(12,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(12,2) ~.}ExcelActiveX90_table1(12,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705406); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 12, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 12} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 12], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(13,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(13,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(13,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(13,2) ~.}ExcelActiveX90_table1(13,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705407); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 15, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 13} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 13], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(14,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(14,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(14,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(14,2) ~.}ExcelActiveX90_table1(14,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705408); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 18, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 14} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 14], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(15,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(15,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(15,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(15,2) ~.}ExcelActiveX90_table1(15,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705409); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 21, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 15} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 15], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(16,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(16,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(16,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(16,2) ~.}ExcelActiveX90_table1(16,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705410); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-48, 24, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 16} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 16], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(17,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(17,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(17,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(17,2) ~.}ExcelActiveX90_table1(17,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705411); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -110, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 17} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 17], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(18,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(18,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(18,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(18,2) ~.}ExcelActiveX90_table1(18,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705412); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -107, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 18} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 18], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(19,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(19,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(19,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(19,2) ~.}ExcelActiveX90_table1(19,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705413); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -104, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Buffer Tv2} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Buffer Tv2], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 2); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 10); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(2, 1); SetChannelRanges(1, 255, 1, 255); int001(705564); int013(1, 0, true, false, 0, 0, [], []); int013(2, 0, true, true, 0, 0, [], []); SetLoc(-9, -15, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Buffer Tv1} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Buffer Tv1], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 2); SetExprAtt([EntryTrigger], [4DS[Label([Vak], i) := 2]4DS]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 10); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(2, 1); SetChannelRanges(1, 255, 1, 255); int001(705565); int013(1, 0, true, false, 0, 0, [], []); int013(2, 0, true, true, 0, 0, [], []); SetLoc(-9, -18, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Buffer Tv3} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Buffer Tv3], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 2); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 10); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(2, 1); SetChannelRanges(1, 255, 1, 255); int001(705566); int013(1, 0, true, false, 0, 0, [], []); int013(2, 0, true, true, 0, 0, [], []); SetLoc(-9, -12, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Buffer Tv4} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Buffer Tv4], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 2); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 10); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(2, 1); SetChannelRanges(1, 255, 1, 255); int001(705567); int013(1, 0, true, false, 0, 0, [], []); int013(2, 0, true, true, 0, 0, [], []); SetLoc(-9, -9, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 4} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 4], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(5,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(5,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705569); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -9, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circleorange.png]), [circleorange])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705584); SetLoc(-53, -15, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705585); SetLoc(-53, -12, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circleblue.png]), [circleblue])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705586); SetLoc(-53, -9, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circlepurple.png]), [circlepurple])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705587); SetLoc(-53, -6, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 1); SetAtt([Hide2DIcon], 1); int023([], 8421631, 73874); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circle.png]), [circle], 1, 1, 32768, 255, 255, false, 0)); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705588); SetLoc(-53, 9, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 16); SetAtt([Hide2DIcon], 1); int023([], 4227327, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circlegray.png]), [circlegray])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705589); SetLoc(-53, -3, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circlefuchsia.png]), [circlefuchsia])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705590); SetLoc(-53, 3, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\products\circlered.png]), [circlered])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705591); SetLoc(-53, 6, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circlebrown.png]), [circlebrown])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705592); SetLoc(-53, 0, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705594); SetLoc(-38, -110, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 8453888, 73874); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705595); SetLoc(-53, 15, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705596); SetLoc(-38, -107, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 16777088, 73874); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705597); SetLoc(-53, 18, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705598); SetLoc(-38, -104, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 16744448, 73874); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705599); SetLoc(-53, 21, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705600); SetLoc(-38, -101, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Opslag} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Opslag], 1, false); SetTextAtt([text], [Opslag]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705601); SetLoc(-9, -20, 1); SetSize(9, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Datum en tijd} sets; AtomByName([ShowDateTime], Main); if(not(AtomExists), Error([Cannot find mother atom 'ShowDateTime'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Datum en tijd], 1, false); SetAtt([timebase], 3780172800); int023([], 4230289, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\ShowDateTime.ico])); int001(705602); SetLoc(-9, -6, 0); SetSize(11, 2, 0.1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705603); SetLoc(-57, -105, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 8421631, 73745); Set(Icon(a), RegisterIcon(IconsDir([Png\Products\circlegreen.png]), [circlegreen])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705604); SetLoc(-52.9, -18, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 8454143, 73874); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705605); SetLoc(-53, 12, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: StatusIndicator340} sets; AtomByName([StatusIndicator], Main); if(not(AtomExists), Error([Cannot find mother atom 'StatusIndicator'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [StatusIndicator340], 1, false); SetAtt([NumberOfSegments], 34); SetTextAtt([Title], [Status Indicator]); SetAtt([RefreshRate], 60); SetAtt([StatusSelected], 0); SetAtt([StatusesInitialized], 1); SetAtt([TextColor], 0); SetAtt([BorderColor], 0); SetAtt([TextSizeTitle], 0.8); SetAtt([TextSizeLegend], 3.2); SetAtt([TitleVisible], 1); SetAtt([SelectedStatusColor], 33023); SetAtt([SelectedStatusBorderColor], 255); SetAtt([SelectedStatusMaximumLength], 0); SetAtt([NumberOfSegmentsDrawn], 0); SetAtt([AutomaticScaling], 1); int023([], 0, 48); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\StatusIndicator.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705666); int013(1, 0, true, true, 0, 0, [], []); SetLoc(-22, -15, 0); SetSize(34.1333333333333, 8, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(34, 3); int015(0, 64, [`` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 ]); int015(1, 64, [`SegmentScore` 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(2, 64, [`SegmentColor` 1442047 16711928 16711687 16771328 65280 3801343 16711891 16719104 15793920 65316 6226175 16711855 16728576 13434624 65353 8585471 16711818 16737792 11075328 65389 11010303 16711782 16747008 8650496 65426 13369599 16711746 16756480 6291200 65462 15728895 16711709 16765696 11010303 ]); int015(3, 64, [`SegmentName` `Idle` `Busy` `Down` `Waiting` `Blocked` `TravelFull` `TravelEmpty` `Lift Up` `Lift Down` `Not Down` `Available` `Not Available` `Empty` `Full` `Not Empty` `Load` `Unload` `Open` `Closed` `Waiting for Contents` `Waiting for Package` `Collecting` `Contents Blocked` `Distributing` `Busy and Blocked` `Conveying` `Setup` `Waiting for Job` `On the Job` `Waiting for Operator` `Assigned` `Take-Down` `Travel to Job` `Travel to Parking` ]); SetStatus(0); int018; {Atom: Tv1} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Tv1], 1, false); SetExprAtt([CycleTime], [7000]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([mttf], [0]); SetExprAtt([mttr], [0]); SetAtt([TotalBusy], 0); SetExprAtt([Utilization], [4DS[If( Time > 0, Concat( [Util: ], String ( *( 100, /( statustime(c,2), Time)), 0, 1), [ %]), [Util: 0 %] )]4DS]); SetAtt([CurCycle], 7000); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.openic(~1,c)|6. Channel ~1~.}openic(1,c)]); SetAtt([3DIcon], 7); SetAtt([BusyFlag], 0); SetExprAtt([mcbf], [0]); SetAtt([nextmcbf], 0); SetExprAtt([mttr2], [0]); SetAtt([curmttr2], 0); SetAtt([LastStatus1], 0); SetAtt([LastStatus2], 0); SetAtt([CyclesCounter], 0); SetAtt([LastDown], 0); SetAtt([SecondColor], 677797); SetExprAtt([mtbf], [mttf]); SetAtt([BeginBusy], 16200); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); int023([], 292315, 263344); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\server.bmp]), [server])); AddModel3D( RegisterModel3D(Model3DDir([Server.wrl]), [Server.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([server2.wrl]), [server2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server_Resized.wrl]), [Server_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server2_Resized.wrl]), [Server2_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Server.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705667); int013(1, 0, true, false, 0, 0, [], []); SetLoc(4, -18, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); int018; {Atom: Tv2} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Tv2], 1, false); SetExprAtt([CycleTime], [5000]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([mttf], [0]); SetExprAtt([mttr], [0]); SetAtt([TotalBusy], 0); SetExprAtt([Utilization], [4DS[If( Time > 0, Concat( [Util: ], String ( *( 100, /( statustime(c,2), Time)), 0, 1), [ %]), [Util: 0 %] )]4DS]); SetAtt([CurCycle], 5000); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.openallic(c)|1. Any inputchannel - First channel first.}openallic(c)]); SetAtt([3DIcon], 7); SetAtt([BusyFlag], 0); SetExprAtt([mcbf], [0]); SetAtt([nextmcbf], 0); SetExprAtt([mttr2], [0]); SetAtt([curmttr2], 0); SetAtt([LastStatus1], 0); SetAtt([LastStatus2], 0); SetAtt([CyclesCounter], 0); SetAtt([LastDown], 0); SetAtt([SecondColor], 677797); SetExprAtt([mtbf], [mttf]); SetAtt([BeginBusy], 10600); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); int023([], 292315, 263344); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\server.bmp]), [server])); AddModel3D( RegisterModel3D(Model3DDir([Server.wrl]), [Server.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([server2.wrl]), [server2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server_Resized.wrl]), [Server_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server2_Resized.wrl]), [Server2_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Server.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705668); int013(1, 0, true, false, 0, 0, [], []); SetLoc(4, -15, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); int018; {Atom: Tv3} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Tv3], 1, false); SetExprAtt([CycleTime], [4000]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([mttf], [0]); SetExprAtt([mttr], [0]); SetAtt([TotalBusy], 0); SetExprAtt([Utilization], [4DS[If( Time > 0, Concat( [Util: ], String ( *( 100, /( statustime(c,2), Time)), 0, 1), [ %]), [Util: 0 %] )]4DS]); SetAtt([CurCycle], 4000); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.openallic(c)|1. Any inputchannel - First channel first.}openallic(c)]); SetAtt([3DIcon], 7); SetAtt([BusyFlag], 0); SetExprAtt([mcbf], [0]); SetAtt([nextmcbf], 0); SetExprAtt([mttr2], [0]); SetAtt([curmttr2], 0); SetAtt([LastStatus1], 0); SetAtt([LastStatus2], 0); SetAtt([CyclesCounter], 0); SetAtt([LastDown], 0); SetAtt([SecondColor], 677797); SetExprAtt([mtbf], [mttf]); SetAtt([BeginBusy], 272000); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); int023([], 292315, 263344); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\server.bmp]), [server])); AddModel3D( RegisterModel3D(Model3DDir([Server.wrl]), [Server.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([server2.wrl]), [server2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server_Resized.wrl]), [Server_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server2_Resized.wrl]), [Server2_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Server.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705669); int013(1, 0, true, false, 0, 0, [], []); SetLoc(4, -12, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); int018; {Atom: Tv4} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Tv4], 1, false); SetExprAtt([CycleTime], [4000]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([mttf], [0]); SetExprAtt([mttr], [0]); SetAtt([TotalBusy], 0); SetExprAtt([Utilization], [4DS[If( Time > 0, Concat( [Util: ], String ( *( 100, /( statustime(c,2), Time)), 0, 1), [ %]), [Util: 0 %] )]4DS]); SetAtt([CurCycle], 4000); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.openallic(c)|1. Any inputchannel - First channel first.}openallic(c)]); SetAtt([3DIcon], 7); SetAtt([BusyFlag], 0); SetExprAtt([mcbf], [0]); SetAtt([nextmcbf], 0); SetExprAtt([mttr2], [0]); SetAtt([curmttr2], 0); SetAtt([LastStatus1], 0); SetAtt([LastStatus2], 0); SetAtt([CyclesCounter], 0); SetAtt([LastDown], 0); SetAtt([SecondColor], 677797); SetExprAtt([mtbf], [mttf]); SetAtt([BeginBusy], 232800); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); int023([], 292315, 263344); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\server.bmp]), [server])); AddModel3D( RegisterModel3D(Model3DDir([Server.wrl]), [Server.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([server2.wrl]), [server2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server_Resized.wrl]), [Server_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([Server2_Resized.wrl]), [Server2_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Server.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705670); int013(1, 0, true, false, 0, 0, [], []); SetLoc(4, -9, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); int018; {Atom: product 6} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 6], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 200); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(7,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(7,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>t-fqp:folienummer.>vak:3.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705672); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -3, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 5} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 5], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(6,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(6,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 4.76); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 1); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>vak:2.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705673); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -6, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 7} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 7], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(8,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(8,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705674); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 0, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 8} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 8], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(9,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(9,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705675); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 3, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 10} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 10], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 200); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(11,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(11,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>t-fqp:folienummer.>vak:3.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705676); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 9, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 9} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 9], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(10,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(10,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 4.76); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 1); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>vak:2.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705677); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 6, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 11} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 11], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(12,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(12,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705678); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 12, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 12} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 12], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(13,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(13,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705679); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 15, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 14} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 14], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 200); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(15,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(15,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>t-fqp:folienummer.>vak:3.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705680); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 21, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 13} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 13], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(14,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(14,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 4.76); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 1); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>vak:2.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705681); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 18, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 15} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 15], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(16,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(16,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705682); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, 24, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 16} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 16], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(17,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(17,4) ]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705683); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-29, -110, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 18} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 18], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 200); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(19,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(19,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>t-fqp:folienummer.>vak:3.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705684); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-29, -104, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 17} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 17], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(18,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(18,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 4.76); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 1); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>vak:2.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705685); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-29, -107, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 19} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 19], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(20,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(20,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(20,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(20,2) ~.}ExcelActiveX90_table1(20,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705686); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -101, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: Product 20} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 20], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [0]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([Folienummer], i) := ExcelActiveX90_table1(21,1) ~.}Label([Folienummer], i) := ExcelActiveX90_table1(21,1) ]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Aantal], i) := ExcelActiveX90_table1(21,2) ]4DS]); SetExprAtt([FirstProduct], [0]); SetExprAtt([MaxProducts], [{.~1|~ExcelActiveX90_table1(21,2) ~.}ExcelActiveX90_table1(21,2) ]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\source.bmp]), [source])); AddModel3D( RegisterModel3D(Model3DDir([source.wrl]), [source.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([source_Resized.wrl]), [Source_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Source.ico])); SetChannels(1, 1); SetChannelRanges(1, 1, 1, 255); int001(705687); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-35, -98, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); int018; {Atom: } sets; BaseClass; CreateAtom(a, s, [], 1, false); int023([], 0, 3210); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); Set(DdbRec, [>folienummer:750082503.]); int001(705688); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; Up; {Atom: Product 19} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 19], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(20,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(20,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 4.22000000000001); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 1); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>vak:2.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705689); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-29, -101, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product 20} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 20], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 200); SetExprAtt([EntryTrigger], [4DS[Label([Machine], i) := ExcelActiveX90_table1(21,3)]4DS]); SetExprAtt([ExitTrigger], [4DS[Label([Vak], i) := ExcelActiveX90_table1(21,4)]4DS]); SetExprAtt([QueueDiscipline], [{.content(c)|1. Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], -0.5); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); Set(DdbRec, [>t-fqp:folienummer.>vak:3.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); int001(705690); int013(1, 0, true, false, 0, 0, [], []); SetLoc(-29, -98, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615935, 73874); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705691); SetLoc(-53, 24, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 1); int023([], 12615680, 73745); Set(Icon(a), RegisterIcon(IconsDir([png\Products\product.png]), [product])); AddModel3D( RegisterModel3D(Model3DDir([box-closed.wrl]), [box-closed.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([box-opened.wrl]), [box-opened.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-wood.wrl]), [pallet-wood.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([pallet-plastic.wrl]), [pallet-plastic.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([oildrum.wrl]), [oildrum.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([crate.wrl]), [crate.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Product.ico])); int001(705692); SetLoc(-38, -98, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Copy of Opslag} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of Opslag], 1, false); SetTextAtt([text], [Thermovorm]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705694); SetLoc(4, -20, 1); SetSize(9, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Opslag gereed product} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Opslag gereed product], 1, false); SetExprAtt([SendTo], [4DS[{.~1|~case(Label([Folienummer], first(c)), ExcelActiveX90_table1(2,1) , ExcelActiveX90_table1(3,1) , ExcelActiveX90_table1(4,1) , ExcelActiveX90_table1(5,1) , ExcelActiveX90_table1(6,1) , ExcelActiveX90_table1(7,1) , ExcelActiveX90_table1(8,1) , ExcelActiveX90_table1(9,1) , ExcelActiveX90_table1(10,1) , ExcelActiveX90_table1(11,1) , ExcelActiveX90_table1(12,1) , ExcelActiveX90_table1(13,1) , ExcelActiveX90_table1(14,1) , ExcelActiveX90_table1(15,1) , ExcelActiveX90_table1(16,1) , ExcelActiveX90_table1(17,1) , ExcelActiveX90_table1(18,1) , ExcelActiveX90_table1(19,1) , ExcelActiveX90_table1(20,1) , ExcelActiveX90_table1(21,1) )~.}case(Label([Folienummer], first(c)), ExcelActiveX90_table1(2,1) , ExcelActiveX90_table1(3,1) , ExcelActiveX90_table1(4,1) , ExcelActiveX90_table1(5,1) , ExcelActiveX90_table1(6,1) , ExcelActiveX90_table1(7,1) , ExcelActiveX90_table1(8,1) , ExcelActiveX90_table1(9,1) , ExcelActiveX90_table1(10,1) , ExcelActiveX90_table1(11,1) , ExcelActiveX90_table1(12,1) , ExcelActiveX90_table1(13,1) , ExcelActiveX90_table1(14,1) , ExcelActiveX90_table1(15,1) , ExcelActiveX90_table1(16,1) , ExcelActiveX90_table1(17,1) , ExcelActiveX90_table1(18,1) , ExcelActiveX90_table1(19,1) , ExcelActiveX90_table1(20,1) , ExcelActiveX90_table1(21,1) )]4DS]); SetAtt([Capacity], 1); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [{.content(c)|Fifo (First In First Out).}content(c)]); SetAtt([DrawLoc], 10); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); int023([], 12615680, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\queue.bmp]), [queue])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Queue.ico])); SetChannels(4, 1); SetChannelRanges(1, 255, 1, 255); int001(705695); int013(1, 0, true, false, 0, 0, [], []); int013(2, 0, true, true, 0, 0, [], []); int013(3, 0, true, true, 0, 0, [], []); int013(4, 0, true, true, 0, 0, [], []); SetLoc(17, -18, 0); SetSize(11, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); int018; {Atom: product 1} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 1], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705696); SetLoc(30, -18, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); int018; {Atom: Product 2} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 2], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705697); SetLoc(30, -15, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 3} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 3], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705698); SetLoc(30, -12, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: product 4} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [product 4], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705699); SetLoc(30, -9, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 5} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 5], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705700); SetLoc(30, -6, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 6} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 6], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705701); SetLoc(30, -3, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 7} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 7], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705702); SetLoc(30, 0, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 8} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 8], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705703); SetLoc(30, 3, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 9} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 9], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705704); SetLoc(30, 6, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 10} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 10], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705705); SetLoc(30, 9, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 11} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 11], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705706); SetLoc(30, 12, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 12} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 12], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705707); SetLoc(30, 15, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 13} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 13], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705708); SetLoc(30, 18, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 14} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 14], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705709); SetLoc(30, 21, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 15} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 15], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705710); SetLoc(30, 24, 0); SetSize(11, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 16} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 16], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705711); int013(1, 0, true, true, 0, 0, [], []); SetLoc(-23, -110, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 17} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 17], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705712); int013(1, 0, true, true, 0, 0, [], []); SetLoc(-23, -107, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 18} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 18], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705713); int013(1, 0, true, true, 0, 0, [], []); SetLoc(-23, -104, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 19} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 19], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705714); int013(1, 0, true, true, 0, 0, [], []); SetLoc(-23, -101, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Product 20} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product 20], 1, false); SetExprAtt([EntryTrigger], [0]); SetAtt([Icon3D], 4); int023([], 7168771, 176); Set(Icon(a), RegisterIcon(pDir([Media\Images\Atoms\sink.bmp]), [sink])); AddModel3D( RegisterModel3D(Model3DDir([sink.wrl]), [sink.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([sink_Resized.wrl]), [sink_Resized.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Sink.ico])); SetChannels(1, 0); SetChannelRanges(1, 255, 0, 0); int001(705715); SetLoc(-23, -98, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Copy of Opslag (1)} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of Opslag (1)], 1, false); SetTextAtt([text], [Opslag]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705716); SetLoc(17, -20, 1); SetSize(9, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Copy of Opslag (2)} sets; AtomByName([Textbox], Main); if(not(AtomExists), Error([Cannot find mother atom 'Textbox'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of Opslag (2)], 1, false); SetTextAtt([text], [Aantal verwerkte rollen]); SetAtt([textcolor], 1); SetAtt([backgroundcolor], 16777215); SetAtt([fontsize], 0.8); SetExprAtt([font], [4DS[[Arial]]4DS]); SetAtt([fontscale], 5); SetAtt([italic], 0); SetAtt([pitch], 0); SetAtt([xpitch], -45); SetAtt([zpitch], 0); SetAtt([3DEnabled], 0); SetAtt([3dFontSize], 1.5); SetAtt([2DEnabled], 1); int023([], 15, 32); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Textbox.ico])); SetChannels(1, 0); SetChannelRanges(1, 1, 0, 0); int001(705717); SetLoc(30, -20, 1); SetSize(9, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); int018; {Atom: Switch Availability135} sets; AtomByName([Switch Availability], Main); if(not(AtomExists), Error([Cannot find mother atom 'Switch Availability'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Switch Availability135], 1, false); SetAtt([OnOff], 0); SetAtt([3DIcon], 3); int023([], 255, 1200); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); AddModel3D( RegisterModel3D(Model3DDir([controller.wrl]), [controller.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([controller1.wrl]), [controller1.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([controller2.wrl]), [controller2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\SwitchAvailability.ico])); Set(DdbRec, [>t-atomoutconnect:t028.>t-available:1.]); SetChannels(0, 1); SetChannelRanges(0, 0, 1, 255); int001(705718); int013(1, 0, true, true, 0, 0, [], []); SetLoc(-44, -100, 0); SetSize(5, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(12); int018; {Atom: Availability Control136} sets; AtomByName([Availability Control], Main); if(not(AtomExists), Error([Cannot find mother atom 'Availability Control'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Availability Control136], 1, false); SetAtt([Available], 1); SetAtt([cntlinput], 1); SetAtt([cntloutput], 1); SetAtt([cntlevents], 1); SetAtt([cntlspeedcontainer], 1); SetAtt([cntlspeedcontents], 0); SetAtt([cntlrotationcont], 1); SetAtt([NrDown], 0); SetAtt([TriggerOnDown], 0); SetAtt([TriggerOnUp], 0); SetAtt([3DIcon], 4); int023([], 32768, 1200); Set(Icon(a), RegisterIcon(pDir([media\images\default.jpg]), [default])); AddModel3D( RegisterModel3D(Model3DDir([controller.wrl]), [controller.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([controller1.wrl]), [controller1.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); AddModel3D( RegisterModel3D(Model3DDir([controller2.wrl]), [controller2.wrl], 0, 0, 0, 1, 1, -1, -90, 0, 0), a); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\AvailabilityControl.ico])); Set(DdbRec, [>t-atomtype:t028.]); SetChannels(1, 13); SetChannelRanges(1, 255, 1, 255); int001(705719); int013(1, 0, true, true, 0, 0, [], []); int013(2, 0, true, true, 0, 0, [], []); int013(3, 0, true, true, 0, 0, [], []); int013(4, 0, true, true, 0, 0, [], []); int013(5, 0, true, true, 0, 0, [], []); int013(6, 0, true, true, 0, 0, [], []); int013(7, 0, true, true, 0, 0, [], []); int013(8, 0, true, true, 0, 0, [], []); int013(9, 0, true, true, 0, 0, [], []); int013(10, 0, true, true, 0, 0, [], []); int013(11, 0, true, true, 0, 0, [], []); int013(12, 0, true, true, 0, 0, [], []); int013(13, 0, true, true, 0, 0, [], []); SetLoc(-44, -104, 0); SetSize(5, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(13, 8); int015(0, 64, [`` 1 2 3 4 5 6 7 8 9 10 11 12 13 ]); int015(1, 64, [`Oldstatus` 2 2 2 2 2 2 2 2 2 2 2 2 2 ]); int015(2, 64, [`Downtime` 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(3, 64, [`Down` 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(4, 64, [`xs` 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(5, 64, [`ys` 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(6, 64, [`zs` 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(7, 64, [`rot` 0 0 0 0 0 0 0 0 0 0 0 0 0 ]); int015(8, 64, [`color` 7168771 7168771 7168771 7168771 7168771 7168771 7168771 7168771 7168771 7168771 7168771 7168771 7168771 ]); SetStatus(11); int018; Up; int014(0, 705266, 1, 288527, 0); int014(0, 705603, 1, 705156, 0); int014(0, 705267, 1, 705219, 0); int014(0, 705268, 1, 705221, 0); int014(0, 705269, 1, 705223, 0); int014(0, 705270, 1, 705225, 0); int014(0, 705271, 1, 705227, 0); int014(0, 705272, 1, 705229, 0); int014(0, 705273, 1, 705231, 0); int014(0, 705274, 1, 705233, 0); int014(5, 705334, 1, 705279, 0); int014(1, 705282, 1, 705292, 0); int014(0, 705604, 1, 705282, 0); int014(1, 705288, 2, 705334, 0); int014(1, 705397, 1, 705288, 0); int014(1, 705292, 1, 705334, 0); int014(1, 705293, 3, 705334, 0); int014(1, 705398, 1, 705293, 0); int014(1, 705334, 1, 705565, 0); int014(2, 705334, 1, 705564, 0); int014(3, 705334, 1, 705566, 0); int014(4, 705334, 1, 705567, 0); int014(1, 705569, 4, 705334, 0); int014(1, 705673, 5, 705334, 0); int014(1, 705672, 6, 705334, 0); int014(1, 705674, 7, 705334, 0); int014(1, 705675, 8, 705334, 0); int014(1, 705677, 9, 705334, 0); int014(1, 705676, 10, 705334, 0); int014(1, 705678, 11, 705334, 0); int014(0, 705584, 1, 705397, 0); int014(0, 705585, 1, 705398, 0); int014(1, 705399, 1, 705569, 0); int014(0, 705586, 1, 705399, 0); int014(1, 705400, 1, 705673, 0); int014(0, 705587, 1, 705400, 0); int014(1, 705401, 1, 705672, 0); int014(0, 705589, 1, 705401, 0); int014(1, 705402, 1, 705674, 0); int014(0, 705592, 1, 705402, 0); int014(1, 705403, 1, 705675, 0); int014(0, 705590, 1, 705403, 0); int014(1, 705404, 1, 705677, 0); int014(0, 705591, 1, 705404, 0); int014(1, 705405, 1, 705676, 0); int014(0, 705588, 1, 705405, 0); int014(1, 705406, 1, 705678, 0); int014(0, 705605, 1, 705406, 0); int014(1, 705407, 1, 705679, 0); int014(0, 705595, 1, 705407, 0); int014(1, 705408, 1, 705681, 0); int014(0, 705597, 1, 705408, 0); int014(1, 705409, 1, 705680, 0); int014(0, 705599, 1, 705409, 0); int014(1, 705410, 1, 705682, 0); int014(0, 705691, 1, 705410, 0); int014(1, 705411, 1, 705683, 0); int014(0, 705594, 1, 705411, 0); int014(1, 705412, 1, 705685, 0); int014(0, 705596, 1, 705412, 0); int014(1, 705413, 1, 705684, 0); int014(0, 705598, 1, 705413, 0); int014(0, 705334, 1, 705666, 0); int014(1, 705667, 1, 705695, 0); int014(1, 705668, 2, 705695, 0); int014(1, 705669, 3, 705695, 0); int014(1, 705670, 4, 705695, 0); int014(1, 705683, 1, 705711, 0); int014(1, 705684, 1, 705713, 0); int014(1, 705685, 1, 705712, 0); int014(1, 705686, 1, 705689, 0); int014(0, 705600, 1, 705686, 0); int014(1, 705687, 1, 705690, 0); int014(0, 705692, 1, 705687, 0); int014(1, 705689, 1, 705714, 0); int014(1, 705718, 1, 705719, 0); int014(1, 705719, 0, 705411, 0); int014(2, 705719, 0, 705412, 0); int014(3, 705719, 0, 705413, 0); int014(4, 705719, 0, 705686, 0); int014(5, 705719, 0, 705687, 0); int014(6, 705719, 0, 288527, 0); int014(7, 705719, 0, 705221, 0); int014(8, 705719, 0, 705223, 0); int014(9, 705719, 0, 705225, 0); int014(10, 705719, 0, 705227, 0); int014(11, 705719, 0, 705233, 0); int014(12, 705719, 0, 705219, 0); int014(13, 705719, 0, 705156, 0); int006(0.1, 288527, 1, 0, 0, 0); int006(10, 705156, 1, 0, 0, 0); int006(0.1, 705219, 1, 0, 0, 0); int006(0.1, 705221, 1, 0, 0, 0); int006(0.1, 705223, 1, 0, 0, 0); int006(0.1, 705225, 1, 0, 0, 0); int006(0.1, 705227, 1, 0, 0, 0); int006(0.1, 705229, 1, 0, 0, 0); int006(0.1, 705231, 1, 0, 0, 0); int006(0.1, 705233, 1, 0, 0, 0); int006(0, 705282, 1, 0, 0, 0); int006(0, 705397, 1, 0, 0, 0); int006(0, 705398, 1, 0, 0, 0); int006(0, 705399, 1, 0, 0, 0); int006(0, 705400, 1, 0, 0, 0); int006(0, 705401, 1, 0, 0, 0); int006(0, 705402, 1, 0, 0, 0); int006(0, 705403, 1, 0, 0, 0); int006(0, 705404, 1, 0, 0, 0); int006(0, 705405, 1, 0, 0, 0); int006(0, 705406, 1, 0, 0, 0); int006(0, 705407, 1, 0, 0, 0); int006(0, 705408, 1, 0, 0, 0); int006(0, 705409, 1, 0, 0, 0); int006(0, 705410, 1, 0, 0, 0); int006(0, 705411, 1, 0, 0, 0); int006(0, 705412, 1, 0, 0, 0); int006(0, 705413, 1, 0, 0, 0); int006(0, 705666, 3001, 0, 0, 0); int006(1, 705666, 3002, 0, 0, 0); int006(0, 705686, 1, 0, 0, 0); int006(0, 705718, 0, 0, 0, 0); {Experiment settings} int032(1, 12, 6); int033(1, 1, 1, [RESULTS]); int033(1, 1, 2, [5]); int033(1, 1, 3, [11]); int033(1, 1, 4, [6]); int033(1, 1, 5, [0]); int033(1, 1, 6, [0]); int033(1, 2, 1, [Capper01]); int033(1, 2, 2, [1]); int033(1, 2, 3, [Bezettingsgraden]); int033(1, 2, 4, [4DS[[STATUS]]4DS]); int033(1, 2, 5, [0]); int033(1, 2, 6, [0]); int033(1, 3, 1, [Eindvoorraad WVP1]); int033(1, 3, 2, [1]); int033(1, 3, 3, [gemiddeld]); int033(1, 3, 4, [AvgContent(cs)]); int033(1, 3, 5, [voorraadhoogte]); int033(1, 3, 6, [MaximumContent(cs)]); int033(1, 4, 1, [Eindvoorraad WVP2]); int033(1, 4, 2, [1]); int033(1, 4, 3, [gemiddeld]); int033(1, 4, 4, [AvgContent(cs)]); int033(1, 4, 5, [voorraadhoogte]); int033(1, 4, 6, [MaximumContent(cs)]); int033(1, 5, 1, [Eindvoorraad WVP3]); int033(1, 5, 2, [1]); int033(1, 5, 3, [gemiddeld]); int033(1, 5, 4, [AvgContent(cs)]); int033(1, 5, 5, [voorraadhoogte]); int033(1, 5, 6, [MaximumContent(cs)]); int033(1, 6, 1, [Etiketteermachine]); int033(1, 6, 2, [1]); int033(1, 6, 3, [Bezettingsgraden]); int033(1, 6, 4, [4DS[[STATUS]]4DS]); int033(1, 6, 5, [0]); int033(1, 6, 6, [0]); int033(1, 7, 1, [Etiketteermachine]); int033(1, 7, 2, [1]); int033(1, 7, 3, [Aantalflesjes per dag]); int033(1, 7, 4, [Output(cs)/16]); int033(1, 7, 5, [0]); int033(1, 7, 6, [0]); int033(1, 8, 1, [Printer]); int033(1, 8, 2, [1]); int033(1, 8, 3, [Bezettingsgraden]); int033(1, 8, 4, [4DS[[STATUS]]4DS]); int033(1, 8, 5, [0]); int033(1, 8, 6, [0]); int033(1, 9, 1, [Rinser 2 (spoelmachine)]); int033(1, 9, 2, [1]); int033(1, 9, 3, [Bezettingsgraden]); int033(1, 9, 4, [4DS[[STATUS]]4DS]); int033(1, 9, 5, [0]); int033(1, 9, 6, [0]); int033(1, 10, 1, [Toevoegmachine]); int033(1, 10, 2, [1]); int033(1, 10, 3, [Bezettingsgraden]); int033(1, 10, 4, [4DS[[STATUS]]4DS]); int033(1, 10, 5, [0]); int033(1, 10, 6, [0]); int033(1, 11, 1, [Verpakkingsmachine]); int033(1, 11, 2, [1]); int033(1, 11, 3, [Bezettingsgraden]); int033(1, 11, 4, [4DS[[STATUS]]4DS]); int033(1, 11, 5, [0]); int033(1, 11, 6, [0]); int033(1, 12, 1, [Vulmachine (vuller complex)]); int033(1, 12, 2, [1]); int033(1, 12, 3, [Bezettingsgraden]); int033(1, 12, 4, [4DS[[STATUS]]4DS]); int033(1, 12, 5, [0]); int033(1, 12, 6, [0]); int034; SetAtt(1, 5); SetExprAtt(2, [hr(128)]); SetExprAtt(3, [28800]); SetAtt(4, 5); SetAtt(5, 1); SetExprAtt(7, [0]); SetExprAtt(8, [0]); SetExprAtt(9, [0]); SetExprAtt(10, [0]); SetAtt(13, 6); SetTextAtt(14, [\\avans.nl\data\al_usr_4\home\safmjans\Profile\Desktop\Enterprise dynamics opdrachten\ED oude modellen\]); SetAtt(17, 1); {Saved Model3D settings.} int007;