-
set (enabled) of (buildings) to (@dagger)
-
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 item @graphite
set UType @poly
set UNum 2
getlink from 0
jump 0 equal from null
sensor thisX @this @x
op floor thisX thisX 0
sensor thisY @this @y
op floor thisY thisY 0
op mul thisX2 thisX 1e4
op add flagBase thisX2 thisY
op rand r 999 0
op floor r r 0
op mul r r 1e8
op add flag r flagBase
set cnt -1
op add cnt cnt 1
jump 26 greaterThanEq cnt UNum
ubind UType
sensor f @unit @flag
op mod fBase f 1e8
jump 24 equal f null
jump 18 notEqual fBase flagBase
jump 33 equal f flag
ucontrol flag flag 0 0 0 0
jump 16 always 0 0
ubind UType
sensor f @unit @flag
op mod fBase f 1e8
jump 26 notEqual fBase flagBase
jump 33 equal f flag
ucontrol flag 0 0 0 0 0
jump 26 always 0 0
ubind UType
sensor f @unit @flag
jump 33 notEqual f flag
sensor hold @unit item
jump 42 notEqual hold 0
ulocate building core false 0 coreX coreY found core
ucontrol move coreX coreY 0 0 0
ucontrol itemTake core item 999 0 0
jump 33 always 0 0
sensor x from @x
sensor y from @y
ucontrol move x y 0 0 0
ucontrol itemDrop container1 999 999 0 0
jump 33 always 0 0
|
draw clear 0 0 0 0 0 0
sensor cf reactor1 @cryofluid
op mul res cf 2.66
draw color 0 255 255 255 0 0
draw rect 0 0 40 res 0 0
sensor he reactor1 @heat
op mul heat 80 he
draw color 255 00 00 255 0 0
draw rect 40 0 80 heat 0 0
drawflush display1
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:
