Function nhl_timer_has_at

src/nhlua.c:1527–1553

/* local has_melttimer = nh.has_timer_at(x,y, "melt-ice"); */
/* local has_melttimer = nh.has_timer_at({x=4,y=7}, "melt-ice"); */
staticfn int
nhl_timer_has_at(lua_State *L)
{
    boolean ret = FALSE;
    short timertype = nhl_get_timertype(L, -1);
    lua_Integer lx, ly;
    coordxy x, y;
    long when;

    lua_pop(L, 1); /* remove timertype */
    if (!nhl_get_xy_params(L, &lx, &ly)) {
        nhl_error(L, "nhl_timer_has_at: Wrong args");
        /*NOTREACHED*/
        return 0;
    }

    x = (coordxy) lx;
    y = (coordxy) ly;
    cvt_to_abscoord(&x, &y);

    if (isok(x, y)) {
        when = spot_time_expires(x, y, timertype);
        ret = (when > 0L);
    }
    lua_pushboolean(L, ret);
    return 1;
}

/* when does location at x,y timer trigger? */
/* local melttime = nh.peek_timer_at(x,y, "melt-ice"); */