integration/luprex/lua/login.lua

makeclass('login')

function login.interface(actor, place)
    gui.menu_item("cb_becomeplayer", "Become a Player")
    gui.menu_item("cb_p123", "Print 1, 2, 3")
    gui.menu_item("cb_p123_nopredict", "Print 1, 2, 3 nopredict")
    gui.menu_item("cb_uglytimedaemon","Start the Time Daemon")
    gui.menu_item("cb_seedprng","Seed the PRNG")
    end

function login.cb_seedprng(actor,place,dialog)
  local result=http.get{method='GET',host='www.random.org',path='/cgi-bin/randbyte',params={nbytes='32',format='f'},verifycertificate=false}
  pprint(result)
  end  -- "GET /cgi-bin/randbyte?nbytes=16384&format=f HTTP/1.0\nHost: www.random.org\n\n"


function login.cb_becomeplayer(actor, place, dialog)
    actor.kind='P'
    actor.Count={} setmetatable(actor.Count,NilIsZero)
    actor.food={} setmetatable(actor.food,NilIsZero)
    actor.spectra={} setmetatable(actor.spectra,NilIsZero)
    actor.stack={}
    actor.team='red'
    tangible.setclass(actor, player)
    tangible.animate(actor,{action="warp",plane="main",x=0,y=0,z=0})
    end


function bechar()
    local a = tangible.actor()
    tangible.animate(a, nil, {bp="TangibleCharacter", xyz={0,0,90}})
    end

makeclass("engio")
function engio.myfunction(actor, place, a, b, c)
    print("Myfunction actor=", actor," place=", place)
    pprint("A:", a)
    pprint("B:", b)
    pprint("C:", c)
    end

function engio.move(actor, place, action, xyz)
    -- todo: sanity check the action and xyz.
    dprint("engio.move ", action, " ", xyz)
    tangible.animate(actor, nil, {action=action, xyz=xyz})
    end