Example #1
0
protected func ControlUp(object pClonk) {
	var pStation = FindObject2(Find_AtPoint(), Find_ID(TRNS));
	if(pStation) {
		pStation -> ControlUp(pClonk, false, this);
		return 1;
	}
}
Example #2
0
global func SetArrow(iX,iY) 
{
  if(FindObject2(Find_ID(_AR1),Find_AtPoint(iX, iY - 16))) return 0;
  RemoveObject(FindObject(_AR1));
  CreateObject(_AR1,iX,iY,-1);
  arrow_target = 0;
}
Example #3
0
func Exit(...)
{
	// dropping at plane? then put into plane
	if (Contained() && Contained()->GetAlive())
	{
		var plane = FindObject(Find_ID(Airplane), Find_AtPoint());
		if (plane)
		{
			ScheduleCall(nil, Global.GameCall, 1,1, "OnPlaneLoaded", plane, this);
		}
	}
	return inherited(...);
}
Example #4
0
func ControlUseStart(object clonk, int ix, int iy)
{
    // Auto-use on spin wheel
    var wheel = FindObject(Find_AtRect(-5,-5,10,10), Find_ID(SpinWheel));
    if (!wheel) wheel = FindObject(Find_AtPoint(ix,iy), Find_ID(SpinWheel));
    if (!wheel)
    {
        if (clonk->GetMenu()) clonk->CloseMenu();
        else Dialogue->MessageBox("$KeyNoLock$", clonk, clonk, nil, true);
    }
    else
        wheel->CheckLock(clonk); // using on wheel
    return true;
}
Example #5
0
func TravelEffect(int time)
{
	if(!shooter)
		return RemoveObject();
	var obj = FindObject(Find_ID(SawBlade), Find_AtPoint());
	if(obj)
	{
		obj->HitByHook(this);
		DestroyEffect();
		Destroy();
		return;
	}
	
	ClearParticles();
	CreateParticle("Hook", GetXDir()/15, GetYDir()/15, 0, 0, 0, hookprt, 1);
	DrawParticleLine("Shockwave2", GetXDir()/15, GetYDir()/15, shooter->GetX() - GetX() + shooter->GetXDir()/10, shooter->GetY() - GetY() + shooter->GetYDir()/10, 5, 0, 0, 1, trailparticles);
}