mycoins/game_pc.lua

365 lines
12 KiB
Lua

math.randomseed(os.time())
game_boot = 45 -- seconds it takes to boot the computer
game_miner = math.random(350,425) -- seconds it takes to mine one bitcent default 400
game_upgrade_step = 30 -- seconds to subtract from game_miner per upgrade
local function computer_owner(meta, player)
if player:get_player_name() ~= meta:get_string("owner") then
return false
end
return true
end
local function upgrade_timer(pos)
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
local expansion1 = inv:get_stack("exp1", 1)
local expansion2 = inv:get_stack("exp2", 1)
local expansion3 = inv:get_stack("exp3", 1)
local upgraded_miner = game_miner
if expansion1:get_name()== "mycoins:game_computer_video" then
upgraded_miner = upgraded_miner - game_upgrade_step
else
if expansion1:get_name()== "" then
upgraded_miner = upgraded_miner
else
upgraded_miner = upgraded_miner + 99999
end
end
if expansion2:get_name()=="mycoins:game_computer_video" then
upgraded_miner = upgraded_miner - game_upgrade_step
else
if expansion2:get_name()== "" then
upgraded_miner = upgraded_miner
else
upgraded_miner = upgraded_miner + 99999
end
end
if expansion3:get_name()== "mycoins:game_computer_video" then
upgraded_miner = upgraded_miner - game_upgrade_step
else
if expansion3:get_name()== "" then
upgraded_miner = upgraded_miner
else
upgraded_miner = upgraded_miner + 99999
end
end
return upgraded_miner
end
function default.game_boot_formspec(pos)
local formspec = "invsize[10,10]"..
"image[1,0.5;1.2,1.2;tux.png]"..
"label[2,0.8;Initializing basic system settings ... OK]" ..
"label[2,1.1;Mounting local filesystems ... OK]" ..
"label[2,1.4;Enabling swap space ... OK]" ..
"label[2,1.7;Setting up console ... OK]" ..
"label[2,2;Operaing System Loaded ... OK]" ..
"label[2,2.3;Starting cgminer 3.7.2 ]" ..
"list[current_name;main;1,3;1,1;]"..
"list[current_player;main;3,9.5;4,1;]"
return formspec
end
function default.game_off_formspec(pos)
local formspec = "invsize[10,10]"..
"background[1,2.5;8,7;mycoins_game_computer_motherboard.png]"..
"label[2,2;Powered Off...]"..
"list[current_name;main;1,3;1,1;]"..
"list[current_name;exp1;2,5.94;1,1;]"..
"list[current_name;exp2;3,7.11;1,1;]"..
"list[current_name;exp3;2,8.29;1,1;]"..
"list[current_player;main;3,9.5;4,1;]"
return formspec
end
function default.game_active_formspec(pos)
local formspec = "invsize[10,10]"..
"background[1,2.5;8,7;mycoins_game_computer_motherboard.png]"..
"label[2,0.0;cgminer version 3.7.2 - Started]" ..
"label[2,0.2;----------------------------------------------------------------------------------]" ..
"label[2,0.4;5s:468.9K avg:468.8Kh/s : A:2304 R:0 HW:0 WU:394.4/m]" ..
"label[2,0.7;ST: 2 SS: 0 NB: 1909 LW: 34901 GF: 14 RF: 7]" ..
"label[2,1;Connected to stratum.max.bitcoin.com diff 1.02k with stratum.]" ..
"label[2,1.3;Block: 31dca6d... Diff:104 Started: 09:24:05 Best share: 618K.]" ..
"label[2,1.5;----------------------------------------------------------------------------------]" ..
"list[current_name;main;1,3;1,1;]"..
"list[current_name;exp1;2,5.94;1,1;]"..
"list[current_name;exp2;3,7.11;1,1;]"..
"list[current_name;exp3;2,8.29;1,1;]"..
"list[current_player;main;3,9.5;4,1;]"
return formspec
end
function default.game_wifi_formspec(pos)
local formspec = "invsize[10,10]"..
"label[2,2;No Internet Connection.]" ..
"label[2,2.5;Contact Your Network Administrator For More Information.]" ..
"list[current_name;main;1,3;1,1;]"..
"list[current_player;main;3,9.5;4,1;]"
return formspec
end
function default.game_off(pos)
local timer = minetest.get_node_timer(pos)
local meta = minetest.get_meta(pos)
local node = minetest.get_node(pos)
local inv = meta:get_inventory()
minetest.swap_node(pos, {name = 'mycoins:game_computer', param2 = node.param2})
meta:set_string("formspec", default.game_off_formspec(pos))
meta:set_string("infotext", "Game Computer (owner "..
meta:get_string("owner")..")")
inv:set_size("main", 1*1)
timer:stop()
end
function default.game_wifi(pos)
local timer = minetest.get_node_timer(pos)
local meta = minetest.get_meta(pos)
local node = minetest.get_node(pos)
local inv = meta:get_inventory()
minetest.swap_node(pos, {name = 'mycoins:game_computer', param2 = node.param2})
meta:set_string("formspec", default.game_wifi_formspec(pos))
meta:set_string("infotext", "Game Computer (owner "..
meta:get_string("owner")..")")
inv:set_size("main", 1*1)
timer:stop()
end
function default.game_boot(pos)
local timer = minetest.get_node_timer(pos)
local meta = minetest.get_meta(pos)
local node = minetest.get_node(pos)
local inv = meta:get_inventory()
meta:set_string("formspec", default.game_boot_formspec(pos))
meta:set_string("infotext", "Game Computer (owner "..
meta:get_string("owner")..")")
inv:set_size("main", 1*1)
timer:start(game_boot)
end
-- Game Computer
minetest.register_node("mycoins:game_computer",{
drawtype = "nodebox",
description = "Game Computer",
tiles = {"mycoins_game_computer_tp.png","mycoins_game_computer_bt.png","mycoins_game_computer_rt.png","mycoins_game_computer_lt.png","mycoins_game_computer_bk.png","mycoins_game_computer_ft_off.png"},
paramtype = "light",
paramtype2 = "facedir",
drop = "mycoins:game_computer",
groups = {cracky=2, oddly_breakable_by_hand=2},
node_box = {
type = "fixed",
fixed = {
{-0.500000,-0.500000,0.03125,0.500000,0.500000,0.40625},
{-0.40625,-0.40625,0.40625,0.40625,0.40625,0.50000},
{-0.500000,-0.500000,-0.500000,0.500000,-0.375,-0.03125},
},
},
sounds = default.node_sound_wood_defaults(),
after_place_node = function(pos, placer)
local meta = minetest.get_meta(pos)
local timer = minetest.get_node_timer(pos)
meta:set_string("owner", placer:get_player_name() or "")
default.game_off(pos)
end,
on_construct = function(pos)
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
meta:set_string("formspec", default.game_boot_formspec(pos))
meta:set_string("infotext", "Game Computer (owner "..
meta:get_string("owner")..")")
inv:set_size("main", 1*1)
inv:set_size("exp1", 1*1)
inv:set_size("exp2", 1*1)
inv:set_size("exp3", 1*1)
end,
on_timer = function(pos)
local isp = minetest.find_node_near(pos, 3, {"mycoins:isp_on"})
if isp == nil then
local wifi = minetest.find_node_near(pos, 30, {"mycoins:router_on"})
if wifi == nil then
default.game_wifi(pos)
else
local meta = minetest.get_meta(pos)
if ( minetest.get_player_by_name(meta:get_string("owner")) == nil ) then
default.game_off(pos)
else
local timer = minetest.get_node_timer(pos)
local meta = minetest.get_meta(pos)
local node = minetest.get_node(pos)
local inv = meta:get_inventory()
minetest.swap_node(pos, {name = 'mycoins:game_computer_active', param2 = node.param2})
meta:set_string("formspec", default.game_active_formspec(pos))
meta:set_string("infotext", "Game Computer (owner "..
meta:get_string("owner")..")")
inv:set_size("main", 1*1)
if ( upgrade_timer(pos) < game_miner ) then
timer:start(upgrade_timer(pos))
else
default.game_off(pos)
end
end
end
else
local meta = minetest.get_meta(pos)
if ( minetest.get_player_by_name(meta:get_string("owner")) == nil ) then
default.game_off(pos)
else
local timer = minetest.get_node_timer(pos)
local meta = minetest.get_meta(pos)
local node = minetest.get_node(pos)
local inv = meta:get_inventory()
minetest.swap_node(pos, {name = 'mycoins:game_computer_active', param2 = node.param2})
meta:set_string("formspec", default.game_active_formspec(pos))
meta:set_string("infotext", "Game Computer (owner "..
meta:get_string("owner")..")")
inv:set_size("main", 1*1)
if ( upgrade_timer(pos) < game_miner ) then
timer:start(upgrade_timer(pos))
else
default.game_off(pos)
end
end
end
end,
on_punch = function(pos)
local isp = minetest.find_node_near(pos, 3, {"mycoins:isp_on"})
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
if upgrade_timer(pos) < game_miner then
if isp == nil then
local wifi = minetest.find_node_near(pos, 30, {"mycoins:router_on"})
if wifi == nil then
default.game_wifi(pos)
else
if ( upgrade_timer(pos) < game_miner ) then
default.game_boot(pos)
else
default.game_off(pos)
end
end
else
default.game_boot(pos)
end
else
default.game_off(pos)
end
end,
allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
local meta = minetest.get_meta(pos)
if not computer_owner(meta, player) then
return 0
end
return count
end,
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
local meta = minetest.env:get_meta(pos)
if not computer_owner(meta, player) then
return 0
end
return stack:get_count()
end,
allow_metadata_inventory_take = function(pos, listname, index, stack, player)
local meta = minetest.get_meta(pos)
if not computer_owner(meta, player) then
return 0
end
return stack:get_count()
end,
can_dig = function(pos,player)
local meta = minetest.get_meta(pos);
local inv = meta:get_inventory()
return inv:is_empty("main") and inv:is_empty("exp1") and inv:is_empty("exp2") and inv:is_empty("exp3") and computer_owner(meta, player)
end,
})
minetest.register_node("mycoins:game_computer_active",{
drawtype = "nodebox",
description = "Game Computer",
tiles = {"mycoins_game_computer_tp.png","mycoins_game_computer_bt.png","mycoins_game_computer_rt.png","mycoins_game_computer_lt.png","mycoins_game_computer_bk.png","mycoins_game_computer_ft.png"},
paramtype = "light",
paramtype2 = "facedir",
light_source = 8,
drop = "mycoins:game_computer",
groups = {cracky=2, not_in_creative_inventory=1, oddly_breakable_by_hand=2},
node_box = {
type = "fixed",
fixed = {
{-0.500000,-0.500000,0.03125,0.500000,0.500000,0.40625},
{-0.40625,-0.40625,0.40625,0.40625,0.40625,0.50000},
{-0.500000,-0.500000,-0.500000,0.500000,-0.375,-0.03125},
},
},
sounds = default.node_sound_wood_defaults(),
on_timer = function(pos)
local timer = minetest.get_node_timer(pos)
local meta = minetest.get_meta(pos)
local node = minetest.get_node(pos)
local inv = meta:get_inventory()
local isp = minetest.find_node_near(pos, 3, {"mycoins:isp_on"})
if isp == nil then
local wifi = minetest.find_node_near(pos, 30, {"mycoins:router_on"})
if wifi == nil then
default.game_off(pos)
else
local meta = minetest.get_meta(pos)
if ( minetest.get_player_by_name(meta:get_string("owner")) == nil ) then
default.game_off(pos)
else
if ( upgrade_timer(pos) < game_miner ) then
timer:start(upgrade_timer(pos))
minetest.get_meta(pos):get_inventory():add_item("main", "mycoins:bitcent")
else
default.game_off(pos)
end
end
end
else
local meta = minetest.get_meta(pos)
if ( minetest.get_player_by_name(meta:get_string("owner")) == nil ) then
default.game_off(pos)
else
if ( upgrade_timer(pos) < game_miner ) then
minetest.get_meta(pos):get_inventory():add_item("main", "mycoins:bitcent")
timer:start(upgrade_timer(pos))
else
default.game_off(pos)
end
end
end
end,
on_punch = function(pos)
default.game_off(pos)
end,
allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
local meta = minetest.get_meta(pos)
if not computer_owner(meta, player) then
return 0
end
return count
end,
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
local meta = minetest.env:get_meta(pos)
if not computer_owner(meta, player) then
return 0
end
return stack:get_count()
end,
allow_metadata_inventory_take = function(pos, listname, index, stack, player)
local meta = minetest.get_meta(pos)
if not computer_owner(meta, player) then
return 0
end
return stack:get_count()
end,
can_dig = function(pos,player)
local meta = minetest.get_meta(pos);
local inv = meta:get_inventory()
return inv:is_empty("main") and inv:is_empty("exp1") and inv:is_empty("exp2") and inv:is_empty("exp3") and computer_owner(meta, player)
end,
})