set seisan @dagger
 sensor flg switch1 @enabled
 jump 11 equal flg 1

 printflush message1
 set i 1
 getlink Link i
 control enabled Link 0 0 0 0
 op add i i 1
 jump 6 lessThanEq i 8
 end

 printflush message1
 set y 1
 getlink Link y
 control enabled Link @dagger 0 0 0
 op add y y 1
 jump 14 lessThanEq y 8
 end
 set flag 0000
 set UType @flare
 set Item @graphite
 jump 8 notEqual @unit null
 ubind UType
 sensor f @unit @flag
 jump 8 equal f flag
 jump 4 notEqual f 0
 ucontrol flag flag dy 0 0 0
 sensor hold @unit @totalItems
 sensor capa @unit @itemCapacity
 jump 17 equal hold 0
 sensor dx container1 @x
 sensor dy container1 @y
 ucontrol move dx dy 0 0 0
 ucontrol itemDrop container1 999 capa 0 0
 end
 ulocate building core false @copper cx cy c core
 ucontrol move cx cy 0 0 0
 ucontrol itemTake core Item capa 0 0
 end
 set seisan @dagger
 sensor flg switch1 @enabled
 jump 11 equal flg 1

 printflush message1
 control enabled factory1 0 0 0 0
 control enabled factory2 0 0 0 0
 control enabled factory3 0 0 0 0
 control enabled factory4 0 0 0 0
 end

 printflush message1
 control enabled factory1 seisan 0 0 0
 control enabled factory2 seisan 0 0 0
 control enabled factory3 seisan 0 0 0
 control enabled factory4 seisan 0 0 0
 end
 set value 1000
 sensor silicon foundation1 @silicon
 jump 6 lessThan silicon value
 sensor graphite foundation1 @graphite
 jump 6 lessThan graphite value
 end
 control enabled switch1 0 0 0 0
#include(): No such page: