public void ControllerMoreOrLess()
{
CoreControl.Controller controller = new CoreControl.Controller();
List <uint> empty = new List <uint>();
uint integer = (uint)CoreControl.EntityFactory.BASE_ID.INTEGER_TYPE;
//declaring moreOrLess context in global context
uint ctx = controller.Declare(ENTITY.CONTEXT, 0, "moreOrLess", VISIBILITY.PUBLIC);
//declaring global variables min, max and lastGiven in moreOrLess context
uint min = controller.Declare(ENTITY.VARIABLE, ctx, "min", VISIBILITY.PRIVATE);
controller.SetVariableType(min, integer);
controller.SetVariableValue(min, 0);
uint max = controller.Declare(ENTITY.VARIABLE, ctx, "max", VISIBILITY.PRIVATE);
controller.SetVariableType(max, integer);
controller.SetVariableValue(max, 100);
uint lastGiven = controller.Declare(ENTITY.VARIABLE, ctx, "lastGiven", VISIBILITY.PRIVATE);
controller.SetVariableType(lastGiven, integer);
controller.SetVariableValue(lastGiven, -1);
//declaring enumeration COMPARISON in moreOrLess context
uint COMPARISON = controller.Declare(ENTITY.ENUM_TYPE, ctx, "COMPARISON", VISIBILITY.PUBLIC);
controller.SetEnumerationValue(COMPARISON, "MORE", 0);
controller.SetEnumerationValue(COMPARISON, "LESS", 1);
controller.SetEnumerationValue(COMPARISON, "NONE", 2);
//declaring function play in moreOrLess context
uint play = controller.Declare(ENTITY.FUNCTION, ctx, "Play", VISIBILITY.PUBLIC);
//declaring parameter lastResult in play function
uint play_lastResult = controller.Declare(ENTITY.VARIABLE, play, "lastResult", VISIBILITY.PUBLIC);
controller.SetFunctionParameter(play, "lastResult");
controller.SetVariableType(play_lastResult, COMPARISON);
controller.SetVariableValue(play_lastResult, controller.GetEnumerationValue(COMPARISON, "NONE"));
//declaring return result in play function
uint play_result = controller.Declare(ENTITY.VARIABLE, play, "result", VISIBILITY.PUBLIC);
controller.SetFunctionReturn(play, "result");
controller.SetVariableType(play_result, integer);
uint split_COMPARISON = controller.AddInstruction(play, INSTRUCTION_ID.ENUM_SPLITTER, new List <uint> {
COMPARISON
});
uint get_last_result = controller.AddInstruction(play, INSTRUCTION_ID.GETTER, new List <uint> {
play_lastResult
});
//if (lastResult == COMPARISION::MORE)
uint lr_eq_more = controller.AddInstruction(play, INSTRUCTION_ID.EQUAL, new List <uint> {
COMPARISON, COMPARISON
});
controller.LinkInstructionData(play, split_COMPARISON, "MORE", lr_eq_more, "LeftOperand");
controller.LinkInstructionData(play, get_last_result, "reference", lr_eq_more, "RightOperand");
uint if_lr_eq_more = controller.AddInstruction(play, INSTRUCTION_ID.IF, empty);
controller.LinkInstructionData(play, lr_eq_more, "result", if_lr_eq_more, "condition");
//min = lastGiven
uint get_lastGiven = controller.AddInstruction(play, INSTRUCTION_ID.GETTER, new List <uint> {
lastGiven
});
uint set_min = controller.AddInstruction(play, INSTRUCTION_ID.SETTER, new List <uint> {
min
});
controller.LinkInstructionData(play, get_lastGiven, "reference", set_min, "value");
//if (lastResult == COMPARISON::LESS)
uint lr_eq_less = controller.AddInstruction(play, INSTRUCTION_ID.EQUAL, new List <uint> {
COMPARISON, COMPARISON
});
controller.LinkInstructionData(play, get_last_result, "reference", lr_eq_less, "LeftOperand");
controller.LinkInstructionData(play, split_COMPARISON, "LESS", lr_eq_less, "RightOperand");
uint if_lr_eq_less = controller.AddInstruction(play, INSTRUCTION_ID.IF, empty);
controller.LinkInstructionData(play, lr_eq_less, "result", if_lr_eq_less, "condition");
//max = lastGiven
uint set_max = controller.AddInstruction(play, INSTRUCTION_ID.SETTER, new List <uint> {
max
});
controller.LinkInstructionData(play, get_lastGiven, "reference", set_max, "value");
//min / 2
uint get_min = controller.AddInstruction(play, INSTRUCTION_ID.GETTER, new List <uint> {
min
});
uint min_half = controller.AddInstruction(play, INSTRUCTION_ID.DIV, new List <uint> {
integer, integer, integer
});
controller.LinkInstructionData(play, get_min, "reference", min_half, "LeftOperand");
controller.SetInstructionInputValue(play, min_half, "RightOperand", 2);
//max / 2
uint get_max = controller.AddInstruction(play, INSTRUCTION_ID.GETTER, new List <uint> {
max
});
uint max_half = controller.AddInstruction(play, INSTRUCTION_ID.DIV, new List <uint> {
integer, integer, integer
});
controller.LinkInstructionData(play, get_max, "reference", max_half, "LeftOperand");
controller.SetInstructionInputValue(play, max_half, "RightOperand", 2);
//min / 2 + max / 2
uint min_half_plus_max_half = controller.AddInstruction(play, INSTRUCTION_ID.ADD, new List <uint> {
integer, integer, integer
});
controller.LinkInstructionData(play, min_half, "result", min_half_plus_max_half, "LeftOperand");
controller.LinkInstructionData(play, max_half, "result", min_half_plus_max_half, "RightOperand");
//result = min / 2 + max / 2
uint result_calculation = controller.AddInstruction(play, INSTRUCTION_ID.SETTER, new List <uint> {
play_result
});
controller.LinkInstructionData(play, min_half_plus_max_half, "result", result_calculation, "value");
//result == lastGiven
uint get_result = controller.AddInstruction(play, INSTRUCTION_ID.GETTER, new List <uint> {
play_result
});
uint res_eq_last_given = controller.AddInstruction(play, INSTRUCTION_ID.EQUAL, new List <uint> {
integer, integer
});
controller.LinkInstructionData(play, get_lastGiven, "reference", res_eq_last_given, "LeftOperand");
controller.LinkInstructionData(play, get_result, "reference", res_eq_last_given, "RightOperand");
//if (result == lastGiven)
uint if_res_eq_last_given = controller.AddInstruction(play, INSTRUCTION_ID.IF, empty);
controller.LinkInstructionData(play, res_eq_last_given, "result", if_res_eq_last_given, "condition");
//lastResult == MORE
uint last_result_eq_more = controller.AddInstruction(play, INSTRUCTION_ID.EQUAL, new List <uint> {
COMPARISON, COMPARISON
});
controller.LinkInstructionData(play, get_last_result, "reference", last_result_eq_more, "LeftOperand");
controller.LinkInstructionData(play, split_COMPARISON, "MORE", last_result_eq_more, "RightOperand");
//if (lastResult == MORE)
uint if_last_result_eq_more = controller.AddInstruction(play, INSTRUCTION_ID.IF, empty);
controller.LinkInstructionData(play, last_result_eq_more, "result", if_last_result_eq_more, "condition");
//result + 1
uint result_pp = controller.AddInstruction(play, INSTRUCTION_ID.ADD, new List <uint> {
integer, integer, integer
});
controller.LinkInstructionData(play, get_result, "reference", result_pp, "LeftOperand");
controller.SetInstructionInputValue(play, result_pp, "RightOperand", 1);
//result = result + 1
uint set_result_pp = controller.AddInstruction(play, INSTRUCTION_ID.SETTER, new List <uint> {
play_result
});
controller.LinkInstructionData(play, result_pp, "result", set_result_pp, "value");
//result - 1
uint result_mm = controller.AddInstruction(play, INSTRUCTION_ID.SUB, new List <uint> {
integer, integer, integer
});
controller.LinkInstructionData(play, get_result, "reference", result_mm, "LeftOperand");
controller.SetInstructionInputValue(play, result_mm, "RightOperand", 1);
//result = result - 1
uint set_result_mm = controller.AddInstruction(play, INSTRUCTION_ID.SETTER, new List <uint> {
play_result
});
controller.LinkInstructionData(play, result_mm, "result", set_result_mm, "value");
//lastGiven = result
uint set_last_given = controller.AddInstruction(play, INSTRUCTION_ID.SETTER, new List <uint> {
lastGiven
});
controller.LinkInstructionData(play, get_result, "reference", set_last_given, "value");
/*
* if (lastResult == More)
* {
* min = lastGiven
* }
* else
* {
* if (lastResult == LESS)
* {
* max = lastGiven
* }
* }
*
* result = min / 2 + max / 2
*
* if (number == lastGiven)
* {
* if (lastResult == MORE)
* {
* number = number + 1;
* }
* else
* {
* number = number - 1;
* }
* }
*
* lastGiven = number
*/
controller.LinkInstructionExecution(play, if_lr_eq_more, (uint)If.ConditionIndexes.OnTrue, set_min);
controller.LinkInstructionExecution(play, if_lr_eq_more, (uint)If.ConditionIndexes.OnFalse, if_lr_eq_less);
controller.LinkInstructionExecution(play, set_min, 0, result_calculation);
controller.LinkInstructionExecution(play, if_lr_eq_less, (uint)If.ConditionIndexes.OnTrue, set_max);
controller.LinkInstructionExecution(play, if_lr_eq_less, (uint)If.ConditionIndexes.OnFalse, result_calculation);
controller.LinkInstructionExecution(play, set_max, 0, result_calculation);
controller.LinkInstructionExecution(play, result_calculation, 0, if_res_eq_last_given);
controller.LinkInstructionExecution(play, if_res_eq_last_given, (uint)If.ConditionIndexes.OnTrue, if_last_result_eq_more);
controller.LinkInstructionExecution(play, if_res_eq_last_given, (uint)If.ConditionIndexes.OnFalse, set_last_given);
controller.LinkInstructionExecution(play, if_last_result_eq_more, (uint)If.ConditionIndexes.OnTrue, set_result_pp);
controller.LinkInstructionExecution(play, if_last_result_eq_more, (uint)If.ConditionIndexes.OnFalse, set_result_mm);
controller.LinkInstructionExecution(play, set_result_pp, 0, set_last_given);
controller.LinkInstructionExecution(play, set_result_mm, 0, set_last_given);
controller.SetFunctionEntryPoint(play, if_lr_eq_more);
testMoreOrLess(controller, play, COMPARISON);
controller.SaveTo("toto.dnai");
controller.Reset();
controller.Declare(ENTITY.CONTEXT, 0, "Coucou", VISIBILITY.PUBLIC);
controller.Declare(ENTITY.CONTEXT, 0, "Coucou1", VISIBILITY.PUBLIC);
controller.Declare(ENTITY.CONTEXT, 0, "Coucou2", VISIBILITY.PUBLIC);
controller.Declare(ENTITY.CONTEXT, 0, "Coucou3", VISIBILITY.PUBLIC);
controller.LoadFrom("toto.dnai");
play = controller.FindEntity("/moreOrLess/Play");
COMPARISON = controller.FindEntity("/moreOrLess/COMPARISON");
testMoreOrLess(controller, play, COMPARISON);
}
