[Tinyos-contrib-commits] CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents/DirectoryService/GetClosestAgent Querier 10s.ma, NONE, 1.1 Intruder.ma, 1.1, 1.2 Querier 1s.ma, 1.3, 1.4

[Chien-Liang Fok]

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

Modified Files:
	Intruder.ma Querier 1s.ma 
Added Files:
	Querier 10s.ma 
Log Message:


--- NEW FILE: Querier 10s.ma ---
		pushcl 100
BEGIN		pushc 25
		putled		// toggle green LED
		pushcl 80
		sleep		// sleep for 10 seconds
		pushc 25
		putled		// toggle green LED
		pushc 0
		getClosestAgent
		rjumpc SUCCESS
		rjump CONTINUE
SUCCESS		pop
		pop
CONTINUE	dec
		copy
		pushc 0
		cneq
		pushc BEGIN
		jumpc 
		halt

Index: Intruder.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/DirectoryService/GetClosestAgent/Intruder.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Intruder.ma	7 Apr 2006 01:12:30 -0000	1.1
--- Intruder.ma	11 Apr 2006 15:23:52 -0000	1.2
***************
*** 1,11 ****
! BEGIN		pushc 26
! 		putled		// toggle green LED
! 		pushc 8
! 		sleep		// sleep for 1 second
! 		pushc 26
! 		putled		// toggle green LED
! 		randnbr		// get a random neighbor
! 		rjumpc MIGRATE
! 		rjump BEGIN
! MIGRATE		wmove
! 		halt
\ No newline at end of file
--- 1,11 ----
! BEGIN		pushc 26
! 		putled		// toggle green LED
! 		pushc 40
! 		sleep		// sleep for 5 seconds
! 		pushc 26
! 		putled		// toggle green LED
! 		randnbr		// get a random neighbor
! 		rjumpc MIGRATE
! 		rjump BEGIN
! MIGRATE		wmove
! 		halt

Index: Querier 1s.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/DirectoryService/GetClosestAgent/Querier 1s.ma,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Querier 1s.ma	8 Apr 2006 15:27:37 -0000	1.3
--- Querier 1s.ma	11 Apr 2006 15:23:52 -0000	1.4
***************
*** 1,10 ****
! BEGIN		pushc 25
! 		putled		// toggle green LED
! 		pushc 8
! 		sleep		// sleep for 1 second
! 		pushc 25
! 		putled		// toggle green LED
! 		pushc 0
! 		getClosestAgent
! 		clear
! CONTINUE	rjump BEGIN
--- 1,20 ----
! 		pushcl 100
! BEGIN		pushc 25
! 		putled		// toggle green LED
! 		pushcl 80
! 		sleep		// sleep for 10 seconds
! 		pushc 25
! 		putled		// toggle green LED
! 		pushc 0
! 		getClosestAgent
! 		rjumpc SUCCESS
! 		rjump CONTINUE
! SUCCESS		pop
! 		pop
! CONTINUE	dec
! 		copy
! 		pushc 0
! 		cneq
! 		pushc BEGIN
! 		jumpc 
! 		halt