Sorry your browser is not supported!

[
	{  
	    "command":"close",
	    "args": [0],
	    "procedure": ["close_application"]
	},
	{
		"command":"makebox",
		"args": [1,2,3],
		"procedure": ["Create_2D_Square","Create_2D_Rect","Create_3D_Box"]
	}
]

type tConsoleCommand
	Procedure as string
	Args as string[]
endtype

parsedInput as tConsoleCommand

// this parses the input string and uses the json to determine the procedure.
parseConsoleInput( consoleInputString, parsedInput )

select ( ParsedInput.Procedure )

	case "close_application"
		// end the program
	endcase

	case "Create_2D_Square"
		// create square sprite. Width and height values both from ParsedInput.Args[0]

	case "Create_2D_Rect"
		// create rectangle sprite with the width and height as ParsedInput.Args[0], ParsedInput.Args[1]
	endcase

	case "Create_3D_Box"
		// create object box with the width, height, Depth as ParsedInput.Args[0], ParsedInput.Args[1], ParsedInput.Args[2]
	endcase


endselect

[  
    {  
        "command":"console",
        "extend":{  
            "subcommands":[  
                {  
                    "command":"clear",
                    "args": [0],
                    "procedure": ["console_clear"]
                },
                {  
                    "command":"close",
                    "args": [0],
                    "procedure": ["console_close"]
                },
                {  
                    "command":"resize",
                    "args": [1,2],
                    "procedure": ["console_resize_square","console_resize_rect"]
                },
                {  
                    "command":"save",
                    "args": [1],
                    "procedure": ["console_saveoutput"]
                }
            ]
        }
    },
    {  
        "command":"player",
        "extend":{  
            "subcommands":[  
                {  
                    "command":"kill",
                    "args": [0],
                    "procedure": ["player_kill"]
                },
                {  
                    "command":"sethealth",
                    "args": [1],
                    "procedure": ["player_sethealth"]
                }
            ]
        }
    },
]

type tCommandDef
	command as string
	args as integer[]
	procedure as string[]
	extend as tExtendedCommandDef
endtype

type tExtendedCommandDef
	subcommands as tCommandDef[]
endtype

// this is the definition list that would be used when parsing the input string.
CommandDefinitions as tCommandDef[]

// this is how i initialise the data, but you can do it in manually if you wish.
CommandDefinitions.load( "myfile.json" )

[  
       {  
        "command":"console",
        "extend":{  
            "subcommands":[  
                {  
                    "command":"killRobot",
                    "args": [1],
                    "procedure": ["killRobot"]
                },
                {  
                    "command":"setHealthRobot",
                    "args": [1],
                    "procedure": ["setHealthRobot"]
                }            
		]
        }
    },
    {  
        "command":"robot1",
        "extend":{  
            "subcommands":[  

                {  
                    "command":"moveForward",
                    "args": [0],
                    "procedure": ["moveForward"]
                },
                {  
                    "command":"moveForward",
                    "args": [0],
                    "procedure": ["moveForward"]
                },
                {  
                    "command":"shoot",
                    "args": [0],
                    "procedure": ["shoot"]
                },
                {  
                    "command":"turnClockwise",
                    "args": [0],
                    "procedure": ["turnClockwise"]
                }
            ]
        }
    },
    {  
        "command":"robot2",
        "extend":{  
            "subcommands":[  

                {  
                    "command":"shoot",
                    "args": [0],
                    "procedure": ["shoot"]
                },
                {  
                    "command":"turnClockwise",
                    "args": [0],
                    "procedure": ["turnClockwise"]
                }
            ]
        }
    }
]

type tRobotModule
	ID as integer
	runFunction as integer // this determines the code that this module runs. This is set to one of the constants below, and run in the processRobotModule function.
	Input as integer[] // this is a list of input states
	Output as tModuleOutput[]
endtype

type tModuleOutput
	state as integer 			// 1 = give power; 0 = no power
	LinkedModuleID as integer 	// the ID of the next module to run
	ModuleInputIndex as integer // the index of the module input this output is linked to.
endtype


#CONSTANT MODULE_FUNCTION_OR 			0
#CONSTANT MODULE_FUNCTION_AND 			1
#CONSTANT MODULE_FUNCTION_Shoot 		2
#CONSTANT MODULE_FUNCTION_CanSeeEnemy 	3

function ProcessRobotModule( module as tRobotModule )

	select ( module.runFunction )

		case MODULE_FUNCTION_OR:

			// set the is true output
			module.Output[0].state = module.Input[0] OR module.Input[1]

			// set the is false output
			module.Output[1].state = NOT (module.Input[0] OR module.Input[1])
					
		endcase
			
		case MODULE_FUNCTION_AND:
			
			// set the is true output
			module.Output[0].state = module.Input[0] AND module.Input[1]

			// set the is false output
			module.Output[1].state = NOT (module.Input[0] AND module.Input[1])
			
		endcase
		
		case MODULE_FUNCTION_Shoot:
			
			if module.Input[0] = 1
				// do shoot gun code
			endif

			// passes the wire state to the module on this output
			module.Output[0].state = module.Input[0] 
			
		endcase
		
		case MODULE_FUNCTION_canSeeEnemy:

			// set the is true output
			module.Output[0].state = module.Input[0]

			// set the is false output
			module.Output[1].state = NOT module.Input[0]
			
		endcase
		
	endselect
	
endfunction