{10.5.0.3374} {Enterprise Dynamics startup information} if(StartingED, SoftStartED([])); {Model information} AddLayer([Main], 1, 1, 0); {Load required atoms} StoreActiveAtom; LoadAtomFromFile([Container], pDir([Atoms\BASIC MODELING\Container.atm])); LoadAtomFromFile([Product], pDir([Atoms\BASIC MODELING\Product.atm])); LoadAtomFromFile([Queue], pDir([Atoms\BASIC MODELING\Queue.atm])); LoadAtomFromFile([Server], pDir([Atoms\BASIC MODELING\Server.atm])); LoadAtomFromFile([Sink], pDir([Atoms\BASIC MODELING\Sink.atm])); LoadAtomFromFile([Source], pDir([Atoms\BASIC MODELING\Source.atm])); LoadAtomFromFile([ExcelActiveX], pDir([Atoms\DATA\ExcelActiveX.atm])); LoadAtomFromFile([HumanResource], pDir([Atoms\HUMAN RESOURCE\HumanResource.atm])); LoadAtomFromFile([HumanResourceSchedules], pDir([Atoms\HUMAN RESOURCE\HumanResourceSchedules.atm])); LoadAtomFromFile([HumanResourceTeam], pDir([Atoms\HUMAN RESOURCE\HumanResourceTeam.atm])); LoadAtomFromFile([HumanResourceTransportRouter], pDir([Atoms\HUMAN RESOURCE\HumanResourceTransportRouter.atm])); LoadAtomFromFile([Assembler], pDir([Atoms\PROCESSES\Assembler.atm])); LoadAtomFromFile([Unpack], pDir([Atoms\PROCESSES\Unpack.atm])); LoadAtomFromFile([Data Recorder], pDir([Atoms\RESULTS\Data Recorder.atm])); RestoreActiveAtom; {Preregister 4DS} Dim([refStalenreceptie], vbAtom); Dim([refMA], vbAtom); {Atom: Medische administratie} sets; AtomByName([HumanResourceTeam], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTeam'. Inheriting from BaseClass.])); CreateAtom(a, s, [Medische administratie], 1, false); Set(OnInit, [4DS[Dim([refMA], vbAtom, c)]4DS]); SetExprAtt([AssignTo], [{.AssignTo_FirstResourceFirst(c, cs)|2. A free resource (FRF) --> look for a free resource. Check the First Resource connected to the team First..}AssignTo_FirstResourceFirst(c, cs)]); SetAtt([SortBy], 1); SetAtt([LstAssignedTasks], 698114800); SetAtt([LstNotAssignedTasks], 698116912); SetAtt([AllowTaskInterruptionPriority], 0); SetAtt([TempAllowInterruption], 0); SetAtt([TempPriority], 0); SetAtt([LineUpResources], 1); SetAtt([DistanceResources], 1); SetExprAtt([TaskLocForInterruption], [{.HumanResourceTask_GetTaskLocation(cs)|1. Task location did not change --> The task location is equal to the location where the resources was called..}HumanResourceTask_GetTaskLocation(cs)]); SetAtt([MinInterruptionPriority], 0); SetAtt([UseReference], 1); SetTextAtt([ReferenceName], [refMA]); SetExprAtt([SelectTaskRule], [{.0|1. No specific rule..}0]); SetAtomSettings([], 32768, 4130); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\HumanResourceTeam.ico])); SetChannels(0, 2); SetChannelRanges(0, 0, 0, 2); SetLoadAtomID(58); SetChannelRequestCount(1, 0, true, true, 0, 0, [], []); SetChannelRequestCount(2, 0, true, true, 0, 0, [], []); SetLoc(-22, -16, 0); SetSize(8, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(2, 1); CreateTableColumn(0, 64, [`` `MA 2` `MA1` ]); CreateTableColumn(1, 64, [`Skill1` 1 1 ]); SetStatus(0); ExecLateInit; {Atom: LstAssignedTasks} sets; AtomByName([HumanResourceTaskList], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTaskList'. Inheriting from BaseClass.])); CreateAtom(a, s, [LstAssignedTasks], 1, false); SetTextAtt([Name], [LstAssignedTasks]); SetAtt([ID], 0); SetAtt([IsSorted], 0); SetAtt([Indexed], 1); SetAtomSettings([], 0, 1032); 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\Prohibited.ico])); SetLoadAtomID(107); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: LstNotAssignedTasks} sets; AtomByName([HumanResourceTaskList], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTaskList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [LstNotAssignedTasks], 1, false); SetTextAtt([Name], [LstNotAssignedTasks]); SetAtt([ID], 0); SetAtt([IsSorted], 0); SetAtt([Indexed], 1); SetAtomSettings([], 0, 1032); 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\Prohibited.ico])); SetLoadAtomID(108); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; Up; {Atom: Team stalenreceptie} sets; AtomByName([HumanResourceTeam], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTeam'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Team stalenreceptie], 1, false); Set(OnInit, [4DS[Dim([refStalenreceptie], vbAtom, c)]4DS]); SetExprAtt([AssignTo], [{.AssignTo_FirstResourceFirst(c, cs)|2. A free resource (FRF) --> look for a free resource. Check the First Resource connected to the team First..}AssignTo_FirstResourceFirst(c, cs)]); SetAtt([SortBy], 4); SetAtt([LstAssignedTasks], 97328416); SetAtt([LstNotAssignedTasks], 698115856); SetAtt([AllowTaskInterruptionPriority], 0); SetAtt([TempAllowInterruption], 0); SetAtt([TempPriority], 0); SetAtt([LineUpResources], 0); SetAtt([DistanceResources], 1); SetExprAtt([TaskLocForInterruption], [{.HumanResourceTask_GetTaskLocation(cs)|1. Task location did not change --> The task location is equal to the location where the resources was called..}HumanResourceTask_GetTaskLocation(cs)]); SetAtt([MinInterruptionPriority], 0); SetAtt([UseReference], 1); SetTextAtt([ReferenceName], [refStalenreceptie]); SetExprAtt([SelectTaskRule], [{.SelectTask_NearestInNetworkFirst(out(oc(c), c))|2. Nearest task location in network --> Accept task at nearest location in network first..}SelectTask_NearestInNetworkFirst(out(oc(c), c))]); SetAtomSettings([], 32768, 4130); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\HumanResourceTeam.ico])); SetChannels(0, 6); SetChannelRanges(0, 0, 0, 6); SetLoadAtomID(25); SetChannelRequestCount(1, 0, true, true, 0, 0, [], []); SetChannelRequestCount(2, 0, true, true, 0, 0, [], []); SetChannelRequestCount(3, 0, true, true, 0, 0, [], []); SetChannelRequestCount(4, 0, true, true, 0, 0, [], []); SetChannelRequestCount(5, 0, true, true, 0, 0, [], []); SetChannelRequestCount(6, 0, true, true, 0, 0, [], []); SetLoc(-22, -14, 0); SetSize(8, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(6, 3); CreateTableColumn(0, 64, [`` `SR4` `SR5` `SR6` `SR1` `SR2` `SR3` ]); CreateTableColumn(1, 64, [`Skill1` 0 0 1 0 0 0 ]); CreateTableColumn(2, 64, [`Skill2` 0 0 0 1 1 0 ]); CreateTableColumn(3, 64, [`Skill3` 1 1 0 1 1 1 ]); SetStatus(0); ExecLateInit; {Atom: LstAssignedTasks} sets; AtomByName([HumanResourceTaskList], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTaskList'. Inheriting from BaseClass.])); CreateAtom(a, s, [LstAssignedTasks], 1, false); SetTextAtt([Name], [LstAssignedTasks]); SetAtt([ID], 0); SetAtt([IsSorted], 0); SetAtt([Indexed], 1); SetAtomSettings([], 0, 1032); 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\Prohibited.ico])); SetLoadAtomID(109); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: LstNotAssignedTasks} sets; AtomByName([HumanResourceTaskList], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTaskList'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [LstNotAssignedTasks], 1, false); SetTextAtt([Name], [LstNotAssignedTasks]); SetAtt([ID], 0); SetAtt([IsSorted], 0); SetAtt([Indexed], 1); SetAtomSettings([], 0, 1032); 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\Prohibited.ico])); SetLoadAtomID(110); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; Up; {Atom: Data stalen sorteren} sets; AtomByName([Data Recorder], Main); if(not(AtomExists), Error([Cannot find mother atom 'Data Recorder'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Data stalen sorteren], 1, false); Set(OnInit, [DataRecorder_Init(c)]); CreateAttributes(3); SetAttributeName(r(1), [lead time], a); SetAttributeName(r(2), [prioriteit], a); SetAttributeName(r(3), [afkomst], a); SetAttribute(r(1), [lead time], vbVariant, [={.Age(i)|3. Lead time from start.}Age(i)], a, [public], [], false); SetAttribute(r(2), [prioriteit], vbVariant, [4DS[={.~1|~Label([dringend],i)~.}Label([dringend],i)]4DS], a, [public], [], false); SetAttribute(r(3), [afkomst], vbVariant, [={.~1|~icon(i)~.}icon(i)], a, [public], [], false); SetTextAtt([AliasName], [output stalenreceptie]); SetAtt([createfunctions], 0); SetAtt([AliasesCreated], 0); SetAtt([CreateAlias], 0); SetAtt([nrows], 1); SetAtt([ncols], 5); SetAtt([ExcelEnabled], 1); SetTextAtt([ExcelName], [C:\Users\r0621249\Documents\output 14.3.xlsx]); SetTextAtt([ExcelSheet], [Sheet1]); SetAtt([StartRowExcel], 2); SetAtt([CurrentRowExcel], 2); SetExprAtt([TimeInterval], [hr(1)]); SetAtt([ViewExcel], 1); SetAtt([TableEnabled], 1); SetAtt([NRVariables], 3); SetAtt([StartColumnExcel], 1); SetExprAtt([Criteria], [{.1|1. measure for all atoms.}1]); SetExprAtt([AnalyseStart], [0]); SetExprAtt([AnalyseDuration], [hr(8760)]); SetAtt([Flag], 0); SetAtt([RefWorkbook], 0); SetAtt([RefWorkbookName], 0); SetAtomSettings([], 16512, 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\DataRecorder.ico])); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 1); SetLoadAtomID(28); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(9, 6, 0); SetSize(8, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(1, 3); CreateTableColumn(0, 64, [`` 1 ]); CreateTableColumn(1, 64, [`lead time` 0 ]); CreateTableColumn(2, 64, [`prioriteit` 0 ]); CreateTableColumn(3, 64, [`afkomst` 0 ]); SetStatus(0); ExecLateInit; {Atom: innerExcelAtomA} sets; AtomByName([ExcelActiveX], Main); if(not(AtomExists), Error([Cannot find mother atom 'ExcelActiveX'. Inheriting from BaseClass.])); CreateAtom(a, s, [innerExcelAtomA], 1, false); Set(OnInit, [4DS[LateInit([ExcelActiveX_Init(c)])]4DS]); SetTextAtt([FileName], [C:\Users\r0621249\Documents\output 14.3.xlsx]); SetTextAtt([SheetName], [Sheet1]); SetAtt([Visible], 1); SetAtt([NoTables], 0); SetAtt([RefWorkbook], 0); SetTextAtt([RefWorkbookName], []); SetAtt([UseAtomName], 1); SetAtt([AliasesCreated], 0); SetAtt([CreateAlias], 0); SetTextAtt([AliasName], [untitled]); SetAtomSettings([], 16744448, 1184); 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\Excel2k7.ico])); Set(DdbRec, [>t-excel:1.]); SetLoadAtomID(29); SetSize(8, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(3, 11); CreateTableColumn(0, 64, [0 1 2 3 ]); CreateTableColumn(1, 88, [`Atom Name` ]); CreateTableColumn(2, 64, [`Sheet Name` ]); CreateTableColumn(3, 64, [`# Rows Table` ]); CreateTableColumn(4, 64, [`# Cols Table` ]); CreateTableColumn(5, 64, [`Start Row Excel` ]); CreateTableColumn(6, 64, [`Start Col Excel` ]); CreateTableColumn(7, 64, [`# Rows from/to Excel` ]); CreateTableColumn(8, 64, [`# Cols from/to Excel` ]); CreateTableColumn(9, 64, [`Time to Read/Write` ]); CreateTableColumn(10, 64, [`Read(1))/Write(2)` ]); CreateTableColumn(11, 64, [`OnReset(1)/OnTime(2)/OnUser(3)` ]); SetStatus(0); ExecLateInit; Up; {Atom: ontvangst externe stalen} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [ontvangst externe stalen], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [NegExp(mins(10.334))]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([dringend], i) := Bernoulli(50,1,2) ~.}Label([dringend], i) := Bernoulli(50,1,2) ]4DS]); SetExprAtt([ExitTrigger], [Icon(i) := 22]); SetExprAtt([FirstProduct], [10]); SetExprAtt([MaxProducts], [{.~1|2. Generate maximum ~50860~ products.}50860]); SetAtt([Icon3D], 4); SetAtomSettings([], 7168771, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\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); SetLoadAtomID(1); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-47, -1, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); ExecLateInit; {Atom: controle staal} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [controle staal], 1, false); SetExprAtt([CycleTime], [negexp(15)]); 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], 40.3966390895562); 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], 38316.8730743395); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(3); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-9, 0, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: identificeren } sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [identificeren ], 1, false); SetExprAtt([CycleTime], [negexp(15)]); 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], 2.01844261359178); 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], 38357.269713429); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(5); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-4, 0, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: stempel} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [stempel], 1, false); SetExprAtt([CycleTime], [negexp(15)]); 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], 2.7982533444527); 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], 38359.2881560426); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(7); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(1, 0, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: Sorteren van stalen} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Sorteren van stalen], 1, false); SetExprAtt([CycleTime], [negexp(15)]); SetExprAtt([SendTo], [{.~1|~if(icon(rank(1,c)) = 42, 2, 1)~.}if(icon(rank(1,c)) = 42, 2, 1)]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refStalenreceptie, i)]); 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], 3.03715342879062); 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], 38362.0864093871); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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, 2); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(8); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetChannelRequestCount(2, 0, true, false, 0, 0, [], []); SetLoc(6, 0, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: medische administratie } sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [medische administratie ], 1, false); SetExprAtt([CycleTime], [negexp(60)]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refMA, c, i, 1)]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refMA, i)]); 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], 25.4998529666469); 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], 38241.6580622509); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(11); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-13, 3, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: registratie LIS} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [registratie LIS], 1, false); SetExprAtt([CycleTime], [if(icon(i) = 42, NegExp(90), NegExp(300))]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refStalenreceptie, c, i, 1, 2, 3)]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refStalenreceptie, i)]); 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], 263.119625843475); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.if(=(sum(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),0),openallic(c),openic(indexmax(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),c))|2. Largest queue: Accept product from the atom with the largest queue (if all queues are empty then open all channels and wait).}if(=(sum(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),0),openallic(c),openic(indexmax(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),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], 33335.9454106388); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(12); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(1, 3, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: sorteren per pijler} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [sorteren per pijler], 1, false); SetExprAtt([CycleTime], [negexp(30)]); 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], 14.6362605511095); 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], 32972.4462632512); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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(4, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(13); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetChannelRequestCount(2, 0, true, true, 0, 0, [], []); SetChannelRequestCount(3, 0, true, true, 0, 0, [], []); SetChannelRequestCount(4, 0, true, true, 0, 0, [], []); SetLoc(6, 3, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {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], 0); SetAtt([ShowColor], 0); SetAtomSettings([], 12615680, 73776); Set(Icon(a), RegisterIcon(IconsDir([Png\products\product.png]), [product], 1, 1, 16777215, 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])); Set(DdbRec, [>drawxsize:1.>drawysize:1.]); SetLoadAtomID(15); SetLoc(-50, -1, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: Product14} sets; AtomByName([Product], Main); if(not(AtomExists), Error([Cannot find mother atom 'Product'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Product14], 1, false); SetAtt([Icon3D], 11); SetAtt([Hide2DIcon], 0); SetAtt([ShowColor], 0); SetAtomSettings([], 12615680, 73776); Set(Icon(a), RegisterIcon(IconsDir([Png\products\product.png]), [product], 1, 1, 16777215, 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])); Set(DdbRec, [>drawxsize:1.>drawysize:1.]); SetLoadAtomID(20); SetLoc(-50, 4, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: ontvangst stalen intern} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [ontvangst stalen intern], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([CycleTime], [NegExp(mins(23.09))]); SetExprAtt([CreationTrigger], [4DS[{.~1|~Label([dringend], i) := Bernoulli(50,1,2)~.}Label([dringend], i) := Bernoulli(50,1,2)]4DS]); SetExprAtt([ExitTrigger], [Icon(i) := 42]); SetExprAtt([FirstProduct], [10]); SetExprAtt([MaxProducts], [{.~1|2. Generate maximum ~22762~ products.}22762]); SetAtt([Icon3D], 4); SetAtomSettings([], 7168771, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\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); SetLoadAtomID(21); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-47, 4, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); ExecLateInit; {Atom: uitpakken extern} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [uitpakken extern], 1, false); SetExprAtt([CycleTime], [if(icon(i) = 42, NegExp(10), NegExp(30))]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refStalenreceptie, c, i, 1, 7, 1)]); 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], 15.4604061113034); 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], 38301.4126682281); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(22); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-14, 0, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: wacht externe} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [wacht externe], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); 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); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 13); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(30); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-37, -1, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: wacht interne} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [wacht interne], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 100); 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); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 13); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(31); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-37, 2, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: wacht na ophaling} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [wacht na ophaling], 1, false); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetAtt([Capacity], 2000); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [4DS[{.findqueuepos([~1],2)|4. Sort by Label Ascending: The atoms with the lowest value of the label named ~dringend~ are put in front.}findqueuepos([dringend],2)]4DS]); SetAtt([DrawLoc], 1); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 17); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.>t-fqp:dringend.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(43); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-19, 0, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: wachtlijn voor MA} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [wachtlijn voor MA], 1, false); SetExprAtt([SendTo], [{.dUniform(1,NrOC(c))|5. Random channel: randomly choose a channel. - When exit blocked, a new draw is done every time a possible exit opens..}dUniform(1,NrOC(c))]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [4DS[{.findqueuepos([~1],2)|4. Sort by Label Ascending: The atoms with the lowest value of the label named ~dringend~ are put in front.}findqueuepos([dringend],2)]4DS]); SetAtt([DrawLoc], 1); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 17); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.>t-fqp:dringend.]); SetChannels(1, 2); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(44); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetChannelRequestCount(2, 0, true, false, 0, 0, [], []); SetLoc(-18, 3, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: Wachtlijn LIS} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Wachtlijn LIS], 1, false); SetExprAtt([SendTo], [{.IndexMax(NrOC(c), OCReady(Count,c)*Random(100000))|4. A random open channel: choose a random channel from all the open output channels..}IndexMax(NrOC(c), OCReady(Count,c)*Random(100000))]); SetAtt([Capacity], 100); SetExprAtt([EntryTrigger], [0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([QueueDiscipline], [4DS[{.findqueuepos([~1],2)|4. Sort by Label Ascending: The atoms with the lowest value of the label named ~dringend~ are put in front.}findqueuepos([dringend],2)]4DS]); SetAtt([DrawLoc], 1); SetExprAtt([InStrategy], [{.openallic(c)|Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 13); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.>t-fqp:dringend.]); SetChannels(3, 4); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(45); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetChannelRequestCount(2, 0, true, false, 0, 0, [], []); SetChannelRequestCount(3, 0, true, false, 0, 0, [], []); SetChannelRequestCount(4, 0, true, false, 0, 0, [], []); SetLoc(-6, 3, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: Source21} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Source21], 1, false); SetExprAtt([SendTo], [{.Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))|2. An open channel (First channel first): search, starting from the first channel, and send to the first open channel found..}Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))]); SetExprAtt([CycleTime], [mins(60)]); SetExprAtt([CreationTrigger], [{.0|10. Do Nothing.}0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([FirstProduct], [10]); SetExprAtt([MaxProducts], [{.-1|1. Unlimited.}-1]); SetAtt([Icon3D], 4); SetAtomSettings([], 7168771, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\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); SetLoadAtomID(46); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-47, -3, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); ExecLateInit; {Atom: Container22} sets; AtomByName([Container], Main); if(not(AtomExists), Error([Cannot find mother atom 'Container'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Container22], 1, false); SetAtt([AutoReSize], 0); SetExprAtt([sx], [1.1]); SetExprAtt([sy], [1.1]); SetExprAtt([sz], [1]); SetAtt([ContainerType], 4); SetAtt([UseBoxVisible], 1); SetAtomSettings([], 6080220, 1170); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\Pallet.bmp]), [Pallet.bmp])); 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([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\Container.ico])); SetLoadAtomID(47); SetLoc(-50, -3, 0); SetSize(1.1, 1.1, 0.15); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: verzamelen extern} sets; AtomByName([Assembler], Main); if(not(AtomExists), Error([Cannot find mother atom 'Assembler'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [verzamelen extern], 1, false); SetExprAtt([cycletime], [NegExp(10)]); SetExprAtt([entrytrigger], [0]); SetExprAtt([exittrigger], [0]); SetExprAtt([sendto], [{.~1|~1~.}1]); SetAtt([curcolref], 1); SetExprAtt([4Dscript], [1]); SetAtt([finishquant], 101); SetAtt([showcontents], 0); SetAtt([pack], 1); SetExprAtt([In2Trigger], [0]); SetAtt([columns], 1); SetAtt([3DIcon], 2); SetAtt([CutOffMode], 2); SetExprAtt([CutOffTime], [3600]); SetAtt([CutOff], 0); SetAtomSettings([], 4194432, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\machines\mach1001.bmp]), [mach1001])); AddModel3D( RegisterModel3D(Model3DDir([assembler.wrl]), [assembler.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\Assembler.ico])); SetChannels(2, 1); SetChannelRanges(2, 255, 1, 255); SetLoadAtomID(48); SetChannelRequestCount(1, 0, true, false, 5, 0, [container/order/main product], []); SetChannelRequestCount(2, 0, false, true, 0, 0, [], []); SetLoc(-42, -1, 0); SetSize(5, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(2, 1); CreateTableColumn(0, 64, [`` `Input ch1` `Input ch2` ]); CreateTableColumn(1, 64, [`Product 1` 1 100 ]); SetStatus(1); ExecLateInit; {Atom: inpakken intern} sets; AtomByName([Assembler], Main); if(not(AtomExists), Error([Cannot find mother atom 'Assembler'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [inpakken intern], 1, false); SetExprAtt([cycletime], [NegExp(10)]); SetExprAtt([entrytrigger], [0]); SetExprAtt([exittrigger], [0]); SetExprAtt([sendto], [{.~1|~1~.}1]); SetAtt([curcolref], 1); SetExprAtt([4Dscript], [1]); SetAtt([finishquant], 101); SetAtt([showcontents], 0); SetAtt([pack], 1); SetExprAtt([In2Trigger], [0]); SetAtt([columns], 1); SetAtt([3DIcon], 2); SetAtt([CutOffMode], 2); SetExprAtt([CutOffTime], [3600]); SetAtt([CutOff], 0); SetAtomSettings([], 4194432, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\machines\mach1001.bmp]), [mach1001])); AddModel3D( RegisterModel3D(Model3DDir([assembler.wrl]), [assembler.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\Assembler.ico])); SetChannels(2, 1); SetChannelRanges(2, 255, 1, 255); SetLoadAtomID(50); SetChannelRequestCount(1, 0, true, false, 5, 0, [container/order/main product], []); SetChannelRequestCount(2, 0, false, true, 0, 0, [], []); SetLoc(-42, 4, 0); SetSize(5, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(2, 1); CreateTableColumn(0, 64, [`` `Input ch1` `Input ch2` ]); CreateTableColumn(1, 64, [`Product 1` 1 100 ]); SetStatus(1); ExecLateInit; {Atom: Queue26} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Queue26], 1, false); SetExprAtt([SendTo], [{.Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))|2. An open channel (First channel first): search, starting from the first channel, and send to the first open channel found..}Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))]); 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); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 7); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(51); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-42, -3, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: Unpack27} sets; AtomByName([Unpack], Main); if(not(AtomExists), Error([Cannot find mother atom 'Unpack'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Unpack27], 1, false); SetExprAtt([nr unpack products], [content(first(c))]); SetExprAtt([cycletime], [0]); SetAtt([curunpack], 0); SetExprAtt([entrytrigger], [0]); SetExprAtt([exittrigger], [0]); SetExprAtt([exitpackagetrigger], [0]); SetExprAtt([instrategy], [{.openallic(c)|1. Any inputchannel.}openallic(c)]); SetAtt([3DIcon], 2); SetAtt([UnpackOrder], 1); SetAtomSettings([], 4194432, 1200); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\server.bmp]), [server])); AddModel3D( RegisterModel3D(Model3DDir([disassembler.wrl]), [disassembler.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\Unpack.ico])); SetChannels(1, 2); SetChannelRanges(1, 255, 2, 2); SetLoadAtomID(52); SetChannelRequestCount(1, 0, true, false, 0, 0, [Contents], []); SetChannelRequestCount(2, 0, true, false, 0, 0, [], []); SetLoc(-23, 0, 0); SetSize(4, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(21); ExecLateInit; {Atom: Sink28} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Sink28], 1, false); SetAtt([EntryTrigger], 0); SetAtt([Icon3D], 4); SetAtomSettings([], 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); SetLoadAtomID(53); SetChannelRequestCount(1, 0, true, true, 0, 0, [], []); SetLoc(-18, -4, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: Copy of Source21} sets; AtomByName([Source], Main); if(not(AtomExists), Error([Cannot find mother atom 'Source'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of Source21], 1, false); SetExprAtt([SendTo], [{.Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))|2. An open channel (First channel first): search, starting from the first channel, and send to the first open channel found..}Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))]); SetExprAtt([CycleTime], [mins(59)]); SetExprAtt([CreationTrigger], [{.0|10. Do Nothing.}0]); SetExprAtt([ExitTrigger], [0]); SetExprAtt([FirstProduct], [10]); SetExprAtt([MaxProducts], [{.-1|1. Unlimited.}-1]); SetAtt([Icon3D], 4); SetAtomSettings([], 7168771, 176); Set(Icon(a), RegisterIcon(IconsDir([bmp\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); SetLoadAtomID(63); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-47, 2, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(2); ExecLateInit; {Atom: Copy of Container22} sets; AtomByName([Container], Main); if(not(AtomExists), Error([Cannot find mother atom 'Container'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of Container22], 1, false); SetAtt([AutoReSize], 0); SetExprAtt([sx], [1.1]); SetExprAtt([sy], [1.1]); SetExprAtt([sz], [1]); SetAtt([ContainerType], 4); SetAtt([UseBoxVisible], 1); SetAtomSettings([], 6080220, 1170); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\Pallet.bmp]), [Pallet.bmp])); 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([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\Container.ico])); SetLoadAtomID(64); SetLoc(-50, 2, 0); SetSize(1.1, 1.1, 0.15); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: Copy of Queue26} sets; AtomByName([Queue], Main); if(not(AtomExists), Error([Cannot find mother atom 'Queue'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of Queue26], 1, false); SetExprAtt([SendTo], [{.Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))|2. An open channel (First channel first): search, starting from the first channel, and send to the first open channel found..}Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))]); 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); SetAtt([ShowContents], 1); SetAtt([FittingContentCount], 0); SetAtt([NameLength3D], 15); SetAtomSettings([], 12615680, 4272); 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, [>updateversion:10.5.]); SetChannels(1, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(65); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-42, 2, 0); SetSize(5, 2, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(13); ExecLateInit; {Atom: SR4} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [SR4], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], -23); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 707477440); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetAtt([LoadQuantity], 2); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 0); SetExprAtt([CutOffTime], [0]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 113909696); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [2]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:3.65.>oldyloc:4.5.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(66); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(3.65, 4.5, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(2, 1); CreateTableColumn(0, 64, [`` 1 2 ]); CreateTableColumn(1, 64, [1 0 0 ]); SetStatus(1); ExecLateInit; {Atom: SR5} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [SR5], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], -23); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 692860368); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetAtt([LoadQuantity], 1); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 0); SetExprAtt([CutOffTime], [0]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 0); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [2]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:3.65.>oldyloc:2.5.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(67); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(3.65, 2.5, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(1, 1); CreateTableColumn(0, 64, [`` 1 ]); CreateTableColumn(1, 64, [1 0 ]); SetStatus(1); ExecLateInit; {Atom: SR6} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [SR6], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], -23); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 692852976); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetAtt([LoadQuantity], 1); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 0); SetExprAtt([CutOffTime], [0]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 0); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [1]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:-10.35.>oldyloc:1.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(68); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(-10.35, 1, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(1, 1); CreateTableColumn(0, 64, [`` 1 ]); CreateTableColumn(1, 64, [1 0 ]); SetStatus(1); ExecLateInit; {Atom: SR1} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [SR1], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], -23); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 707479552); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetAtt([LoadQuantity], 2); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 1); SetExprAtt([CutOffTime], [60]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 97325248); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [32]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:3.65.>oldyloc:8.5.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(69); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(3.65, 8.5, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(2, 1); CreateTableColumn(0, 64, [`` 1 2 ]); CreateTableColumn(1, 64, [1 0 0 ]); SetStatus(1); ExecLateInit; {Atom: SR2} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [SR2], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], -23); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 707478496); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetAtt([LoadQuantity], 8); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 1); SetExprAtt([CutOffTime], [60]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 97331584); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [32]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:3.65.>oldyloc:6.5.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(70); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(3.65, 6.5, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(8, 1); CreateTableColumn(0, 64, [`` 1 2 3 4 5 6 7 8 ]); CreateTableColumn(1, 64, [1 0 0 0 0 0 0 0 0 ]); SetStatus(1); ExecLateInit; {Atom: SR3} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [SR3], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], 0); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 670187184); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetExprAtt([LoadQuantity], [1]); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 0); SetExprAtt([CutOffTime], [0]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 0); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [1]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldyloc:2.5.>oldxloc:8.65.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(71); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(8.65, 2.5, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(0, 1); CreateTableColumn(0, 64, [`` ]); CreateTableColumn(1, 64, [1 ]); SetStatus(1); ExecLateInit; {Atom: MA 2} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [MA 2], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], 0); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 707476384); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetExprAtt([LoadQuantity], [1]); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 0); SetExprAtt([CutOffTime], [0]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 0); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [1]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:-9.35.>oldyloc:4.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(72); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(-9.35, 4, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(0, 1); CreateTableColumn(0, 64, [`` ]); CreateTableColumn(1, 64, [1 ]); SetStatus(1); ExecLateInit; {Atom: MA1} sets; AtomByName([HumanResource], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResource'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [MA1], 1, false); SetAtt([CurrentTask], 0); SetAtt([Assigned], 0); SetExprAtt([Speed], [1]); SetAtt([Acceleration], 0); SetAtt([Deceleration], 0); SetAtt([UseWalkingNetwork], 0); SetAtt([CurxDest], 0); SetAtt([CuryDest], 0); SetAtt([PrevAtom], 692838192); SetAtt([UseTravel], 0); SetAtt([OffNetwork], 0); SetAtt([OffRoad], 0); SetAtt([KeepSpeed], 1); SetAtt([DistanceTable], 0); SetAtt([NodeTable], 0); SetAtt([PointerTable], 0); SetAtt([ConnectionTable], 0); SetAtt([BetweenNodes], 0); SetAtt([DestNode], 0); SetAtt([AtDestination], 1); SetAtt([NextChannel], 0); SetAtt([Picking], 1); SetAtt([Placing], 0); SetExprAtt([xOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([xOffPlace], 0); SetExprAtt([yOffPick], [{.~1|1. Fixed --> always apply an offset of ~0~ meter..}0]); SetAtt([yOffPlace], 0); SetAtt([OcToPrev], 0); SetAtt([OcToCur], 0); SetAtt([InterruptedTask], 0); SetAtt([Available], 1); SetAtt([NrDown], 0); SetExprAtt([CallTrigger], [0]); SetExprAtt([FreeTrigger], [0]); SetExprAtt([InterruptTrigger], [0]); SetExprAtt([ResumeTrigger], [0]); SetAtt([NumberInLine], 0); SetAtt([FinishingTasksBeforeDown], 0); SetExprAtt([LoadTime], [0]); SetExprAtt([UnloadTime], [0]); SetAtt([IsLoaded], 0); SetExprAtt([LoadQuantity], [1]); SetAtt([HasLoad], 0); SetAtt([LoadRestriction], 1); SetAtt([UnloadSequence], 1); SetAtt([UnloadLabel], 0); SetAtt([LoadLabel], 0); SetExprAtt([DownTrigger], [0]); SetExprAtt([UpTrigger], [0]); SetAtt([DisplayResourceName], 1); SetAtt([DisplayTeamName], 1); SetAtt([DisplayStatus], 1); SetAtt([CutOffMode], 0); SetExprAtt([CutOffTime], [0]); SetAtt([CutOff], 0); SetAtt([LastTransportTask], 0); SetAtt([DisplayNumberOfContent], 1); SetExprAtt([MaxCapacity], [1]); SetAtt([WalkStatus], 1); SetAtt([DisplayDistanceTraveled], 0); SetAtt([DistanceTraveled], 0); SetAtomSettings([], 12615680, 68657); Set(Icon(a), RegisterIcon(IconsDir([bmp\atoms\operator.bmp]), [operator])); AddModel3D( RegisterModel3D(Model3DDir([Persons\Men\Man_subdivided.wrl]), [Man_subdivided.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\HumanResource.ico])); Set(DdbRec, [>oldxloc:-9.35.>oldyloc:4.]); SetChannels(3, 3); SetChannelRanges(3, 3, 3, 3); SetLoadAtomID(73); SetChannelRequestCount(1, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(2, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetChannelRequestCount(3, 0, true, true, 1, 1, [Do not connect.], [Do not connect.]); SetLoc(-9.35, 4, 0); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(0, 1); CreateTableColumn(0, 64, [`` ]); CreateTableColumn(1, 64, [1 ]); SetStatus(1); ExecLateInit; {Atom: HumanResourceTransportRouter40} sets; AtomByName([HumanResourceTransportRouter], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTransportRouter'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [HumanResourceTransportRouter40], 1, false); SetExprAtt([HumanResourcesTeam], [refStalenreceptie]); SetAtt([NumberOfHRs], 1); SetExprAtt([TaskPriority], [5]); SetExprAtt([SkillHR], [2]); SetExprAtt([SendTo], [{.Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))|2. An open channel (First channel first): search, starting from the first channel, and send to the first open channel found..}Min(NrOC(c), NrOC(c) + 1 - IndexMatch(NrOC(c), 1, OCReady(NrOC(c) + 1 - Count, c)))]); SetAtt([NumberOfProducts], 0); SetAtt([CallResourceOnEntry], 1); SetAtt([FreeResourceOnExit], 1); SetAtomSettings([], 9023522, 4128); 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\HumanResourceTransportRouter.ico])); SetChannels(2, 1); SetChannelRanges(1, 255, 1, 255); SetLoadAtomID(74); SetChannelRequestCount(1, 0, true, true, 0, 0, [], []); SetChannelRequestCount(2, 0, true, true, 0, 0, [], []); SetLoc(-29, 1, 0); SetSize(1, 1, 0); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(0); ExecLateInit; {Atom: shiften } sets; AtomByName([HumanResourceSchedules], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceSchedules'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [shiften ], 1, false); SetAtomSettings([], 8388608, 4130); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\HumanResourceSchedules.ico])); SetChannels(0, 8); SetChannelRanges(0, 0, 0, 8); SetLoadAtomID(79); SetChannelRequestCount(1, 0, true, true, 0, 0, [], []); SetChannelRequestCount(2, 0, true, true, 0, 0, [], []); SetChannelRequestCount(3, 0, true, true, 0, 0, [], []); SetChannelRequestCount(4, 0, true, true, 0, 0, [], []); SetChannelRequestCount(5, 0, true, true, 0, 0, [], []); SetChannelRequestCount(6, 0, true, true, 0, 0, [], []); SetChannelRequestCount(7, 0, true, true, 0, 0, [], []); SetChannelRequestCount(8, 0, true, true, 0, 0, [], []); SetLoc(-1, -17, 0); SetSize(8, 2, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(6, 8); CreateTableColumn(0, 64, [`` `voltijdse` `parttime maandag` `parttime dinsdag` `parttimewoensdag` `parttime donderdag` `parttime vrijdag` ]); CreateTableColumn(1, 64, [`SR4` 1 0 0 0 0 0 ]); CreateTableColumn(2, 64, [`SR5` 1 0 `` 0 0 0 ]); CreateTableColumn(3, 64, [`SR6` 1 `` 0 0 0 0 ]); CreateTableColumn(4, 64, [`SR1` 1 0 `` 0 0 0 ]); CreateTableColumn(5, 64, [`SR2` 1 0 0 0 0 0 ]); CreateTableColumn(6, 64, [`SR3` 1 `` 0 0 0 0 ]); CreateTableColumn(7, 64, [`MA 2` 1 0 `` 0 0 0 ]); CreateTableColumn(8, 64, [`MA1` 1 `` `` 0 0 0 ]); SetStatus(0); ExecLateInit; {Atom: voltijdse} sets; AtomByName([HumanResourceTimeSchedule], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTimeSchedule'. Inheriting from BaseClass.])); CreateAtom(a, s, [voltijdse], 1, false); SetAtt([AddCycle], 0); SetAtt([CurRecord], 1); SetAtt([MaxRec], 0); SetAtt([Available], 1); SetAtt([TaskInterruption], 2); SetExprAtt([RepeatStrategy], [{.-1|2. Continues repeat.}-1]); SetAtomSettings([], 32768, 8); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Prohibited.ico])); Set(DdbRec, [>t-available:1.]); SetLoadAtomID(80); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(36, 2); CreateTableColumn(0, 64, [`` 1 2 3 5 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 35 36 ]); CreateTableColumn(1, 64, [`Time` `hr(0)` `hr(9)` `hr(12)` `hr(13)` `hr(17)` `hr(24)` `hr(33)` `hr(36)` `hr(37)` `hr(41)` `hr(48)` `hr(57)` `hr(60)` `hr(61)` `hr(65)` `hr(72)` `hr(81)` `hr(84)` `hr(85)` `hr(89)` `hr(96)` `hr(105)` `hr(108)` `hr(109)` `hr(113)` `hr(120)` `hr(129)` `hr(132)` `hr(133)` `hr(137)` `hr(144)` `hr(153)` `hr(156)` `hr(157)` `hr(161)` ]); CreateTableColumn(2, 64, [`Availability (Down = 1)` 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 ]); SetStatus(11); ExecLateInit; {Atom: parttime maandag} sets; AtomByName([HumanResourceTimeSchedule], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTimeSchedule'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [parttime maandag], 1, false); SetAtt([AddCycle], 0); SetAtt([CurRecord], 1); SetAtt([MaxRec], 0); SetAtt([Available], 1); SetAtt([TaskInterruption], 2); SetExprAtt([RepeatStrategy], [{.-1|2. Continues repeat.}-1]); SetAtomSettings([], 32768, 8); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Prohibited.ico])); Set(DdbRec, [>t-available:1.]); SetLoadAtomID(81); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(36, 2); CreateTableColumn(0, 64, [`` 1 2 3 5 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 35 36 ]); CreateTableColumn(1, 64, [`Time` `hr(0)` `hr(9)` `hr(12)` `hr(13)` `hr(17)` `hr(24)` `hr(33)` `hr(36)` `hr(37)` `hr(41)` `hr(48)` `hr(57)` `hr(60)` `hr(61)` `hr(65)` `hr(72)` `hr(81)` `hr(84)` `hr(85)` `hr(89)` `hr(96)` `hr(105)` `hr(108)` `hr(109)` `hr(113)` `hr(120)` `hr(129)` `hr(132)` `hr(133)` `hr(137)` `hr(144)` `hr(153)` `hr(156)` `hr(157)` `hr(161)` ]); CreateTableColumn(2, 64, [`Availability (Down = 1)` 1 1 1 1 1 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 ]); SetStatus(11); ExecLateInit; {Atom: parttime dinsdag} sets; AtomByName([HumanResourceTimeSchedule], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTimeSchedule'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [parttime dinsdag], 1, false); SetAtt([AddCycle], 0); SetAtt([CurRecord], 1); SetAtt([MaxRec], 0); SetAtt([Available], 1); SetAtt([TaskInterruption], 2); SetExprAtt([RepeatStrategy], [{.-1|2. Continues repeat.}-1]); SetAtomSettings([], 32768, 8); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Prohibited.ico])); Set(DdbRec, [>t-available:1.]); SetLoadAtomID(82); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(36, 2); CreateTableColumn(0, 64, [`` 1 2 3 5 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 35 36 ]); CreateTableColumn(1, 64, [`Time` `hr(0)` `hr(9)` `hr(12)` `hr(13)` `hr(17)` `hr(24)` `hr(33)` `hr(36)` `hr(37)` `hr(41)` `hr(48)` `hr(57)` `hr(60)` `hr(61)` `hr(65)` `hr(72)` `hr(81)` `hr(84)` `hr(85)` `hr(89)` `hr(96)` `hr(105)` `hr(108)` `hr(109)` `hr(113)` `hr(120)` `hr(129)` `hr(132)` `hr(133)` `hr(137)` `hr(144)` `hr(153)` `hr(156)` `hr(157)` `hr(161)` ]); CreateTableColumn(2, 64, [`Availability (Down = 1)` 1 0 1 0 1 1 1 1 1 1 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 ]); SetStatus(11); ExecLateInit; {Atom: parttimewoensdag} sets; AtomByName([HumanResourceTimeSchedule], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTimeSchedule'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [parttimewoensdag], 1, false); SetAtt([AddCycle], 0); SetAtt([CurRecord], 1); SetAtt([MaxRec], 0); SetAtt([Available], 1); SetAtt([TaskInterruption], 1); SetExprAtt([RepeatStrategy], [{.-1|2. Continues repeat.}-1]); SetAtomSettings([], 32768, 8); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Prohibited.ico])); Set(DdbRec, [>t-available:1.]); SetLoadAtomID(83); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(36, 2); CreateTableColumn(0, 64, [`` 1 2 3 5 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 35 36 ]); CreateTableColumn(1, 64, [`Time` `hr(0)` `hr(9)` `hr(12)` `hr(13)` `hr(17)` `hr(24)` `hr(33)` `hr(36)` `hr(37)` `hr(41)` `hr(48)` `hr(57)` `hr(60)` `hr(61)` `hr(65)` `hr(72)` `hr(81)` `hr(84)` `hr(85)` `hr(89)` `hr(96)` `hr(105)` `hr(108)` `hr(109)` `hr(113)` `hr(120)` `hr(129)` `hr(132)` `hr(133)` `hr(137)` `hr(144)` `hr(153)` `hr(156)` `hr(157)` `hr(161)` ]); CreateTableColumn(2, 64, [`Availability (Down = 1)` 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 ]); SetStatus(11); ExecLateInit; {Atom: parttime donderdag} sets; AtomByName([HumanResourceTimeSchedule], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTimeSchedule'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [parttime donderdag], 1, false); SetAtt([AddCycle], 0); SetAtt([CurRecord], 1); SetAtt([MaxRec], 0); SetAtt([Available], 1); SetAtt([TaskInterruption], 1); SetExprAtt([RepeatStrategy], [{.-1|2. Continues repeat.}-1]); SetAtomSettings([], 32768, 8); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Prohibited.ico])); Set(DdbRec, [>t-available:1.]); SetLoadAtomID(84); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(36, 2); CreateTableColumn(0, 64, [`` 1 2 3 5 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 35 36 ]); CreateTableColumn(1, 64, [`Time` `hr(0)` `hr(9)` `hr(12)` `hr(13)` `hr(17)` `hr(24)` `hr(33)` `hr(36)` `hr(37)` `hr(41)` `hr(48)` `hr(57)` `hr(60)` `hr(61)` `hr(65)` `hr(72)` `hr(81)` `hr(84)` `hr(85)` `hr(89)` `hr(96)` `hr(105)` `hr(108)` `hr(109)` `hr(113)` `hr(120)` `hr(129)` `hr(132)` `hr(133)` `hr(137)` `hr(144)` `hr(153)` `hr(156)` `hr(157)` `hr(161)` ]); CreateTableColumn(2, 64, [`Availability (Down = 1)` 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 ]); SetStatus(11); ExecLateInit; {Atom: parttime vrijdag} sets; AtomByName([HumanResourceTimeSchedule], Main); if(not(AtomExists), Error([Cannot find mother atom 'HumanResourceTimeSchedule'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [parttime vrijdag], 1, false); SetAtt([AddCycle], 0); SetAtt([CurRecord], 1); SetAtt([MaxRec], 0); SetAtt([Available], 1); SetAtt([TaskInterruption], 1); SetExprAtt([RepeatStrategy], [{.-1|2. Continues repeat.}-1]); SetAtomSettings([], 32768, 8); Set(Icon(a), RegisterIcon(pDir([Media\Images\atoms\graph.bmp]), [graph])); SetMaterial( RegisterMaterial([Default], 8421504, 8421504, 3289650, 0, 0.100000001490116, 0, false, false, 1, 0), 1, a); Set(Version(a), 0); SetTreeIcon(pDir([Media\Icons\Prohibited.ico])); Set(DdbRec, [>t-available:1.]); SetLoadAtomID(85); SetSize(1, 1, 1); LockPosition(false); LockSize(false); DisableIconRotation(false); SetTable(36, 2); CreateTableColumn(0, 64, [`` 1 2 3 5 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 35 36 ]); CreateTableColumn(1, 64, [`Time` `hr(0)` `hr(9)` `hr(12)` `hr(13)` `hr(17)` `hr(24)` `hr(33)` `hr(36)` `hr(37)` `hr(41)` `hr(48)` `hr(57)` `hr(60)` `hr(61)` `hr(65)` `hr(72)` `hr(81)` `hr(84)` `hr(85)` `hr(89)` `hr(96)` `hr(105)` `hr(108)` `hr(109)` `hr(113)` `hr(120)` `hr(129)` `hr(132)` `hr(133)` `hr(137)` `hr(144)` `hr(153)` `hr(156)` `hr(157)` `hr(161)` ]); CreateTableColumn(2, 64, [`Availability (Down = 1)` 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 0 1 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ]); SetStatus(11); ExecLateInit; Up; {Atom: Copy of medische administratie } sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of medische administratie ], 1, false); SetExprAtt([CycleTime], [negexp(60)]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refMA, c, i, 1)]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refMA, i)]); 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], 56.4082844874502); 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], 38141.669178009); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(86); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(-13, 5, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: Copy of registratie LIS} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of registratie LIS], 1, false); SetExprAtt([CycleTime], [if(icon(i) = 42, NegExp(90), NegExp(300))]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refStalenreceptie, c, i, 1, 2, 3)]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refStalenreceptie, i)]); 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], 19.8028908507779); 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], 33011.3794612885); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(87); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(1, 5, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: Copy of registratie LIS (1)} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of registratie LIS (1)], 1, false); SetExprAtt([CycleTime], [if(icon(i) = 42, NegExp(90), NegExp(300))]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refStalenreceptie, c, i, 1, 2, 3)]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refStalenreceptie, i)]); 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], 114.22192152132); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.if(=(sum(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),0),openallic(c),openic(indexmax(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),c))|2. Largest queue: Accept product from the atom with the largest queue (if all queues are empty then open all channels and wait).}if(=(sum(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),0),openallic(c),openic(indexmax(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),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], 33515.0044364929); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(88); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(1, 7, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: Copy of registratie LIS (2)} sets; AtomByName([Server], Main); if(not(AtomExists), Error([Cannot find mother atom 'Server'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Copy of registratie LIS (2)], 1, false); SetExprAtt([CycleTime], [if(icon(i) = 42, NegExp(90), NegExp(300))]); SetExprAtt([SendTo], [{.~1|~1~.}1]); SetExprAtt([BatchQty], [1]); SetAtt([BatchRule], 1); SetAtt([CurIn], 1); SetAtt([CurOut], 1); SetExprAtt([SetUpTime], [{.~1|~0~.}0]); SetExprAtt([EntryTrigger], [HumanResourceTeam_CallResources( refStalenreceptie, c, i, 1, 2, 3)]); SetExprAtt([ExitTrigger], [HumanResourceTeam_FreeResources( refStalenreceptie, i)]); 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], 520.93445250022); SetAtt([EndBusy], 0); SetAtt([NextDown], 1E40); SetAtt([CurRepairTime], 0); SetExprAtt([InStrategy], [{.if(=(sum(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),0),openallic(c),openic(indexmax(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),c))|2. Largest queue: Accept product from the atom with the largest queue (if all queues are empty then open all channels and wait).}if(=(sum(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),0),openallic(c),openic(indexmax(nric(c),if(atomexists(in(count,c)),*(ocopen(icocno(count,c),in(count,c)),content(in(count,c))),0)),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], 32857.0550366898); SetExprAtt([EndOfSetupTrigger], [0]); SetExprAtt([BreakdownTrigger], [0]); SetExprAtt([RepairTrigger], [0]); SetAtt([3DMoveProduct], 1); SetAtomSettings([], 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); SetLoadAtomID(89); SetChannelRequestCount(1, 0, true, false, 0, 0, [], []); SetLoc(1, 9, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; {Atom: Sink49} sets; AtomByName([Sink], Main); if(not(AtomExists), Error([Cannot find mother atom 'Sink'. Inheriting from BaseClass.])); CreateAtom(a, Up(s), [Sink49], 1, false); SetAtt([EntryTrigger], 0); SetAtt([Icon3D], 4); SetAtomSettings([], 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); SetLoadAtomID(90); SetChannelRequestCount(1, 0, true, true, 0, 0, [], []); SetLoc(14, 3, 0); SetSize(5, 2, 2); LockPosition(false); LockSize(false); DisableIconRotation(false); SetStatus(1); ExecLateInit; Up; ConnectLoadAtoms(1, 58, 1, 72, 0); ConnectLoadAtoms(2, 58, 1, 73, 0); ConnectLoadAtoms(1, 25, 1, 66, 0); ConnectLoadAtoms(2, 25, 1, 67, 0); ConnectLoadAtoms(3, 25, 1, 68, 0); ConnectLoadAtoms(4, 25, 1, 69, 0); ConnectLoadAtoms(5, 25, 1, 70, 0); ConnectLoadAtoms(6, 25, 1, 71, 0); ConnectLoadAtoms(1, 28, 1, 90, 0); ConnectLoadAtoms(1, 1, 2, 48, 0); ConnectLoadAtoms(0, 15, 1, 1, 0); ConnectLoadAtoms(1, 3, 1, 5, 0); ConnectLoadAtoms(1, 22, 1, 3, 0); ConnectLoadAtoms(1, 5, 1, 7, 0); ConnectLoadAtoms(1, 7, 1, 8, 0); ConnectLoadAtoms(1, 8, 1, 44, 0); ConnectLoadAtoms(2, 8, 1, 45, 0); ConnectLoadAtoms(1, 11, 2, 45, 0); ConnectLoadAtoms(1, 44, 1, 11, 0); ConnectLoadAtoms(1, 12, 1, 13, 0); ConnectLoadAtoms(1, 45, 1, 12, 0); ConnectLoadAtoms(1, 13, 1, 28, 0); ConnectLoadAtoms(1, 87, 2, 13, 0); ConnectLoadAtoms(1, 88, 3, 13, 0); ConnectLoadAtoms(1, 89, 4, 13, 0); ConnectLoadAtoms(1, 21, 2, 50, 0); ConnectLoadAtoms(0, 20, 1, 21, 0); ConnectLoadAtoms(1, 43, 1, 22, 0); ConnectLoadAtoms(1, 30, 1, 74, 0); ConnectLoadAtoms(1, 48, 1, 30, 0); ConnectLoadAtoms(1, 31, 2, 74, 0); ConnectLoadAtoms(1, 50, 1, 31, 0); ConnectLoadAtoms(1, 52, 1, 43, 0); ConnectLoadAtoms(2, 44, 1, 86, 0); ConnectLoadAtoms(2, 45, 1, 87, 0); ConnectLoadAtoms(3, 45, 1, 88, 0); ConnectLoadAtoms(1, 86, 3, 45, 0); ConnectLoadAtoms(4, 45, 1, 89, 0); ConnectLoadAtoms(1, 46, 1, 51, 0); ConnectLoadAtoms(0, 47, 1, 46, 0); ConnectLoadAtoms(1, 51, 1, 48, 0); ConnectLoadAtoms(1, 65, 1, 50, 0); ConnectLoadAtoms(1, 74, 1, 52, 0); ConnectLoadAtoms(2, 52, 1, 53, 0); ConnectLoadAtoms(1, 63, 1, 65, 0); ConnectLoadAtoms(0, 64, 1, 63, 0); ConnectLoadAtoms(0, 87, 2, 66, 0); ConnectLoadAtoms(0, 12, 2, 67, 0); ConnectLoadAtoms(0, 22, 2, 68, 0); ConnectLoadAtoms(0, 89, 2, 69, 0); ConnectLoadAtoms(0, 88, 2, 70, 0); ConnectLoadAtoms(0, 87, 2, 71, 0); ConnectLoadAtoms(0, 11, 2, 72, 0); ConnectLoadAtoms(0, 11, 2, 73, 0); ConnectLoadAtoms(1, 79, 0, 66, 0); ConnectLoadAtoms(2, 79, 0, 67, 0); ConnectLoadAtoms(3, 79, 0, 68, 0); ConnectLoadAtoms(4, 79, 0, 69, 0); ConnectLoadAtoms(5, 79, 0, 70, 0); ConnectLoadAtoms(6, 79, 0, 71, 0); ConnectLoadAtoms(7, 79, 0, 72, 0); ConnectLoadAtoms(8, 79, 0, 73, 0); LoadEvent(0, 28, 1, 0, 0, 0); LoadEvent(10, 1, 1, 0, 0, 0); LoadEvent(10, 21, 1, 0, 0, 0); LoadEvent(10, 46, 1, 0, 0, 0); LoadEvent(10, 63, 1, 0, 0, 0); LoadEvent(0, 80, 1, 0, 0, 0); LoadEvent(0, 81, 1, 0, 0, 0); LoadEvent(0, 82, 1, 0, 0, 0); LoadEvent(0, 83, 1, 0, 0, 0); LoadEvent(0, 84, 1, 0, 0, 0); LoadEvent(0, 85, 1, 0, 0, 0); {Experiment settings} ActivateExperimentAtom; SetAtt(17, 1); {Saved Model3D settings.} ExecOnCreationOnLoad;