Exemple #1
0
void ActionsTestScene::runThisTest()
{
    s_nActionIdx = -1;
    addChild(NextAction());

    CCDirector::sharedDirector()->replaceScene(this);
}
Exemple #2
0
void ActionsDemo::nextCallback(NSObject* pSender)
{
    CCScene* s = new ActionsTestScene();
    s->addChild( NextAction() );
    CCDirector::sharedDirector()->replaceScene(s);
    s->release();
}
Exemple #3
0
NextAction PrintStmtInFn::execute(Env &env, LocalDefs &ie)
{
	Term v = expr.evaluate(env, ie);
	cout << "\n";
	v.print_indented(cout);
	cout << endl;
	//cout << v.to_string() << endl;
	return NextAction(NextAction::continue_normal_execution);
}
Exemple #4
0
NextAction StmtSeq::execute(Env &env, LocalDefs &ie)
{
	for (unsigned int i=0 ; i < stmts.size() ; i++)
	{
		NextAction res = stmts[i]->execute(env, ie);
		if (!res.is_normal())
			return res;
	}

	return NextAction(NextAction::continue_normal_execution);
}
Exemple #5
0
NextAction AssertStmt::execute(Env &env, LocalDefs &ie)
{
	Term v = expr.evaluate(env, ie);
  if (!v.is_true())
  {
    cout << "Assertion failed somewhere\n";
    Program::get_singleton().print_stack();
    halt;  
  }

	return NextAction(NextAction::continue_normal_execution);
}
Exemple #6
0
NextAction LoopStmt::execute(Env &env, LocalDefs &ie)
{
	for (bool first=true ; ; first=false)
	{
		Term ec = first && is_tail_cond ? bool_obj(true) : cond.evaluate(env, ie);
		assert(ec.is_true() || ec.is_false());

		if (ec.is_true())
		{
			NextAction res = body->execute(env, ie);
			if (res.is_return())
				return res;
		  if (res.is_break())
  			return NextAction(NextAction::continue_normal_execution);
		}
		else
		{
			return NextAction(NextAction::continue_normal_execution);
		}
	}
}
Exemple #7
0
NextAction Assignment::execute(Env &env, LocalDefs &ie)
{
	Term val = expr.evaluate(env, ie);
	if (!type.is_null() && !type->contains(val))
	{
    cout << "Error in type assignment. The value is not of the declared type.\n";
	  cout << "  Variable name: " << var_name.to_string() << "\n";	
	  cout << "  Value:\n\n";	
    val.print(cout);
	  Program::get_singleton().print_stack();
	  cout << endl;
	  halt;
	}
	env.set(var_name, val);
	return NextAction(NextAction::continue_normal_execution);
}
Exemple #8
0
NextAction IfStmt::execute(Env &env, LocalDefs &ie)
{
	Term ec = cond.evaluate(env, ie);
	
	if (!ec.is_true() && !ec.is_false())
	{
		string ecs = ec.to_string(true);
		cout << "Condition for if statement doesn't evaluate to either true or false:\n";
		cout << ecs << endl;
		halt;	
	}
	//assert(ec.is_true() || ec.is_false());

	if (ec.is_true())
		return if_true->execute(env, ie);
	else if (!if_false.is_null())
		return if_false->execute(env, ie);
	else
		return NextAction(NextAction::continue_normal_execution);
}
void CSuperMove::Update()
{
	if (!gMap)
	{
		return /*Clear()*/;
	}

	if (m_bHungUp)
	{
		if (!gHero->IsMoving())
		{
			m_bHungUp = false;
			StartMove(m_pPath, m_nErrorDistance);
		}

		return;
	}

	if (!gHero->IsTransfering() && !m_bOver && !m_bPause)
	{
		if ((*m_itCurAction)->CheckFailed())
		{
			return Clear();
		}

		if ((*m_itCurAction)->CheckDone())
		{
			if (!HasNextAction()) 
			{
				Over();
			}
			else if (nFrameCounter++ == 5)
			{
				NextAction();
				nFrameCounter = 0;
			}
		}
	}
}
Exemple #10
0
NextAction ReturnStmt::execute(Env &env, LocalDefs &ie)
{
	Term val = expr.evaluate(env, ie);
	return NextAction(val);
}
Exemple #11
0
NextAction NullStatement::execute(Env &env, LocalDefs &ie)
{
  return NextAction(NextAction::continue_normal_execution);
}
Exemple #12
0
NextAction BreakStmt::execute(Env &env, LocalDefs &ie)
{
  return NextAction(NextAction::break_inner_loop);
}
Exemple #13
0
NextAction ForStatement::execute(Env &env, LocalDefs &ie)
{
  if (src_expr.is_null())
  {
    assert(idx_var.is_null());
    assert(!start_expr.is_null());
    assert(!end_expr.is_null());

    Term start_obj = start_expr.evaluate(env, ie);
    Term end_obj = end_expr.evaluate(env, ie);
    
    if (start_obj.is_int() && end_obj.is_int()) // && start_obj.get_int() <= end_obj.get_int())
    {
      int start = start_obj.get_int();
      int end = end_obj.get_int();
      
      //assert(start <= end);
      
      for (int i=start ; i <= end ; i++)
	    {
	      env.set(var, int_obj(i));
		    NextAction res = body->execute(env, ie);
		    env.unset(var);
    		
		    if (res.is_return())
			    return res;
	      if (res.is_break())
			    return NextAction(NextAction::continue_normal_execution);
	    }
	    
      return NextAction(NextAction::continue_normal_execution);
    }

    cout << "Invalid range in for loop or sequence comprehension\n";
    cout << start_obj.to_string(true) << endl;
    cout << end_obj.to_string(true) << endl;
    Program::get_singleton().print_stack();    
    halt;
  }
  else
  {
    assert(start_expr.is_null());
    assert(end_expr.is_null());
    
    Term src = src_expr.evaluate(env, ie);
    
    int len = src.size();
    for (int i=0 ; i < len ; i++)
	  {
	    env.set(var, src.item(i));
	    if (idx_var != PlainId())
	      env.set(idx_var, int_obj(i));
  	  
		  NextAction res = body->execute(env, ie);
  		
		  env.unset(var);
	    if (idx_var != PlainId())
	      env.unset(idx_var);
  		
		  if (res.is_return())
			  return res;
	    if (res.is_break())
			  return NextAction(NextAction::continue_normal_execution);
	  }
  }
  
  return NextAction(NextAction::continue_normal_execution);
}