[Tinyos-contrib-commits] CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents/DirectoryService GetAgentLoc_100.ma, NONE, 1.1 RandomWalkQuery.ma, NONE, 1.1

[Chien-Liang Fok]

Update of /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/DirectoryService
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32352/DirectoryService

Added Files:
	GetAgentLoc_100.ma RandomWalkQuery.ma 
Log Message:


--- NEW FILE: GetAgentLoc_100.ma ---
		pushcl 100
BEGIN		copy
		pushc 0
		cneq
		rjumpc CONT
		halt			// halt after executing getAgentLocation 100 times
CONT		dec
		aid
		getAgentLocation
		rjumpc SUCCESS
		pushc 25
		putled 			// toggle red LED if fail
		pushc BEGIN
		jumps
SUCCESS		pop
		pushc 26
		putled  		// toggle green LED if success
		pushc BEGIN
		jumps

--- NEW FILE: RandomWalkQuery.ma ---
BEGIN		pushc 25
		putled		// toggle green LED
		pushc 1
		sleep		// sleep for 1/8 second
		pushc 25
		putled		// toggle green LED
		pushc 0
		getAgentLocation
		rjumpc FOUND
		rjump CONTINUE
FOUND		pop		// pop the location off the stack
CONTINUE	randnbr		// get a random neighbor
		rjumpc MIGRATE
		rjump BEGIN
MIGRATE		wmove
		pushc BEGIN
		jumps