[Tinyos-contrib-commits]
CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents
3Blink.ma, 1.1, 1.2 3BlinkContinuous.ma, 1.1,
1.2 BlinkRedLEDContinuous.ma, 1.1, 1.2 Bounce0to1.ma, 1.2,
1.3 Bounce0to1Continuous.ma, 1.2, 1.3 Bounce1to2.ma, 1.1,
1.2 Bounce1to2Continuous.ma, 1.1, 1.2 CloneToAllNeighbors.ma,
1.1, 1.2 CntToLedsHP.ma, 1.1, 1.2 CntToLedsTS.ma, 1.1,
1.2 CntToLedsTS_named_tuple.ma, 1.1, 1.2 MigrateBSToMoteFat.ma,
1.1, 1.2 MigrateBSToMoteThin.ma, 1.1, 1.2 MigrateToUart.ma,
1.1, 1.2 MigrateToUartA.ma, 1.1, 1.2 README, 1.2,
1.3 RandomWalk.ma, 1.1, 1.2 Relay.ma, 1.1, 1.2 Sleep1Minute.ma,
1.1, 1.2 Traverse column B2T.ma, 1.1,
1.2 Traverse column T2B.ma, 1.1, 1.2 Traverse row R2L.ma, 1.1, 1.2
Chien-Liang Fok
chien-liang at users.sourceforge.net
Thu May 18 14:13:32 PDT 2006
- Previous message: [Tinyos-contrib-commits]
CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents/Fragments
3BLINK.fg, 1.1, 1.2 BLINKGREEN.fg, 1.1, 1.2 BLINKGREENC.fg,
1.1, 1.2 BLINKRED.fg, 1.1, 1.2 BLINKYELLOW.fg, 1.1,
1.2 BLIPALL.fg, 1.1, 1.2 BLIPGREEN.fg, 1.2, 1.3 BLIPRED.fg,
1.1, 1.2 COUNTUP.fg, 1.2, 1.3 GetNbrSnapshot.fg, 1.1,
1.2 RANDWEAKCLONE.fg, 1.1, 1.2
- Next message: [Tinyos-contrib-commits]
CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents/Tutorials/Lesson4
README, 1.1, 1.2 sleep_out_value.ma, 1.1, 1.2 sleep_rxn.ma,
1.1, 1.2 wait_example.ma, 1.1, 1.2 wait_out_string.ma, 1.1,
1.2 wait_out_value.ma, 1.1, 1.2 wait_rout_string.ma, 1.1,
1.2 wait_rout_value.ma, 1.1, 1.2
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Update of /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents
In directory sc8-pr-cvs10.sourceforge.net:/tmp/cvs-serv19324/contrib/wustl/apps/AgillaAgents
Modified Files:
3Blink.ma 3BlinkContinuous.ma BlinkRedLEDContinuous.ma
Bounce0to1.ma Bounce0to1Continuous.ma Bounce1to2.ma
Bounce1to2Continuous.ma CloneToAllNeighbors.ma CntToLedsHP.ma
CntToLedsTS.ma CntToLedsTS_named_tuple.ma
MigrateBSToMoteFat.ma MigrateBSToMoteThin.ma MigrateToUart.ma
MigrateToUartA.ma README RandomWalk.ma Relay.ma
Sleep1Minute.ma Traverse column B2T.ma Traverse column T2B.ma
Traverse row R2L.ma
Log Message:
Index: 3Blink.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/3Blink.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 3Blink.ma 13 Oct 2005 17:12:18 -0000 1.1
--- 3Blink.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,17 ****
! BEGIN pushc RETURN
! pushc THREEBLINK
! jumps
! RETURN halt
! THREEBLINK pushc 0
! TBLOOP copy
! pushc 6
! cneq
! rjumpc TBCONT
! pop
! jumps
! TBCONT pushc 31
! putled // toggle all three LEDs
! pushc 1
! sleep
! inc
! rjump TBLOOP
--- 1,19 ----
! #define SLEEP_PERIOD 1
!
! BEGIN pushc RETURN
! pushc THREEBLINK
! jumps
! RETURN halt
! THREEBLINK pushc 0
! TBLOOP copy
! pushc 6
! cneq
! rjumpc TBCONT
! pop
! jumps
! TBCONT pushc 31
! putled // toggle all three LEDs
! pushc SLEEP_PERIOD
! sleep
! inc
! rjump TBLOOP
Index: 3BlinkContinuous.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/3BlinkContinuous.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 3BlinkContinuous.ma 13 Oct 2005 17:12:18 -0000 1.1
--- 3BlinkContinuous.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,20 ****
! BEGIN pushc RETURN
! pushc THREEBLINK
! jumps
! RETURN pushc 5
! sleep
! pushc BEGIN
! jumps
! THREEBLINK pushc 0
! TBLOOP copy
! pushc 6
! cneq
! rjumpc TBCONT
! pop
! jumps
! TBCONT pushc 31
! putled // toggle all three LEDs
! pushc 1
! sleep
! inc
! rjump TBLOOP
--- 1,20 ----
! BEGIN pushc RETURN
! pushc THREEBLINK
! jumps
! RETURN pushc 5
! sleep
! pushc BEGIN
! jumps
! THREEBLINK pushc 0
! TBLOOP copy
! pushc 6
! cneq
! rjumpc TBCONT
! pop
! jumps
! TBCONT pushc 31
! putled // toggle all three LEDs
! pushc 1
! sleep
! inc
! rjump TBLOOP
Index: BlinkRedLEDContinuous.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/BlinkRedLEDContinuous.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** BlinkRedLEDContinuous.ma 13 Oct 2005 17:12:18 -0000 1.1
--- BlinkRedLEDContinuous.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,5 ****
! BEGIN pushc 25 // toggle red
! putled
! pushc 1
! sleep
! rjump BEGIN
--- 1,5 ----
! BEGIN pushc 25 // toggle red
! putled
! pushc 1
! sleep
! rjump BEGIN
Index: Bounce0to1.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Bounce0to1.ma,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Bounce0to1.ma 16 Mar 2006 20:08:48 -0000 1.2
--- Bounce0to1.ma 18 May 2006 21:13:28 -0000 1.3
***************
*** 1,16 ****
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 2
! sleep // sleep for 1/4 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 0
! cneq
! rjumpc DONE
! GOTO1 pushc 1
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! DONE halt
!
--- 1,16 ----
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 2
! sleep // sleep for 1/4 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 0
! cneq
! rjumpc DONE
! GOTO1 pushc 1
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! DONE halt
!
Index: Bounce0to1Continuous.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Bounce0to1Continuous.ma,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Bounce0to1Continuous.ma 16 Mar 2006 20:08:48 -0000 1.2
--- Bounce0to1Continuous.ma 18 May 2006 21:13:28 -0000 1.3
***************
*** 1,21 ****
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 2
! sleep // sleep for 1/4 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 0
! ceq
! rjumpc GOTO1
! GOTO0 pushc 0
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
! GOTO1 pushc 1
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
!
--- 1,21 ----
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 2
! sleep // sleep for 1/4 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 0
! ceq
! rjumpc GOTO1
! GOTO0 pushc 0
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
! GOTO1 pushc 1
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
!
Index: Bounce1to2.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Bounce1to2.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Bounce1to2.ma 16 Mar 2006 20:08:48 -0000 1.1
--- Bounce1to2.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,16 ****
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 8
! sleep // sleep for 1 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 1
! cneq
! rjumpc DONE
! GOTO1 pushc 2
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! DONE halt
!
--- 1,16 ----
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 8
! sleep // sleep for 1 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 1
! cneq
! rjumpc DONE
! GOTO1 pushc 2
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! DONE halt
!
Index: Bounce1to2Continuous.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Bounce1to2Continuous.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Bounce1to2Continuous.ma 16 Mar 2006 20:08:48 -0000 1.1
--- Bounce1to2Continuous.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,21 ****
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 8
! sleep // sleep for 1 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 1
! ceq
! rjumpc GOTO2
! GOTO1 pushc 1
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
! GOTO2 pushc 2
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
!
--- 1,21 ----
! BEGIN pushc 25
! putled // toggle the red LED
! pushc 8
! sleep // sleep for 1 second
! pushc 25
! putled // toggle the red LED
! addr
! pushc 1
! ceq
! rjumpc GOTO2
! GOTO1 pushc 1
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
! GOTO2 pushc 2
! wmove
! pushc 28
! putled // toggle yellow LED when migration fails
! halt
!
Index: CloneToAllNeighbors.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/CloneToAllNeighbors.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** CloneToAllNeighbors.ma 13 Oct 2005 17:12:18 -0000 1.1
--- CloneToAllNeighbors.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,27 ****
! BEGIN numnbrs
! LOOP copy
! pushc 0
! ceq // zero neighbors?
! rjumpc BLINKGREEN
! dec
! copy
! getnbr
! sclone // strong clone to neighbor
! cpush // get condition code
! pushc 2
! ceq // check if condition code = 2
! rjumpc LOOP // parent jumps to LOOP
!
! // This fragment continuously blinks
! // the green LED. It never returns.
! //
! // An example of how to use this code is as follows:
! //
! // BEGIN pushc BLINKGREEN
! // jumps
!
! BLINKGREEN pushc 26
! putled
! pushc 8
! sleep
rjump BLINKGREEN
\ No newline at end of file
--- 1,27 ----
! BEGIN numnbrs
! LOOP copy
! pushc 0
! ceq // zero neighbors?
! rjumpc BLINKGREEN
! dec
! copy
! getnbr
! sclone // strong clone to neighbor
! cpush // get condition code
! pushc 2
! ceq // check if condition code = 2
! rjumpc LOOP // parent jumps to LOOP
!
! // This fragment continuously blinks
! // the green LED. It never returns.
! //
! // An example of how to use this code is as follows:
! //
! // BEGIN pushc BLINKGREEN
! // jumps
!
! BLINKGREEN pushc 26
! putled
! pushc 8
! sleep
rjump BLINKGREEN
\ No newline at end of file
Index: CntToLedsHP.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/CntToLedsHP.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** CntToLedsHP.ma 17 Oct 2005 05:05:19 -0000 1.1
--- CntToLedsHP.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,13 ****
! BEGIN getvar 0
! rjumpc SKIP
! pushc 0
! SKIP pushc 1
! add
! copy
! setvar 0
! pushc 7
! land
! putled
! pushc 1
! sleep
! rjump BEGIN
--- 1,13 ----
! BEGIN getvar 0
! rjumpc SKIP
! pushc 0
! SKIP pushc 1
! add
! copy
! setvar 0
! pushc 7
! land
! putled
! pushc 1
! sleep
! rjump BEGIN
Index: CntToLedsTS.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/CntToLedsTS.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** CntToLedsTS.ma 17 Oct 2005 05:05:19 -0000 1.1
--- CntToLedsTS.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,19 ****
! BEGIN pusht value
! pushc 1
! inp
! rjumpc SKIP // if a tuple was found, jump to SKIP
! pushc 0
! pushc 0
! SKIP pop // pop the number of fields
! pushc 1
! add
! copy
! pushc 1
! out // OUT the count tuple
! pushc 7
! land
! putled // update the LED
! pushc 1
! sleep
! pushc BEGIN
! jumps
--- 1,19 ----
! BEGIN pusht value
! pushc 1
! inp
! rjumpc SKIP // if a tuple was found, jump to SKIP
! pushc 0
! pushc 0
! SKIP pop // pop the number of fields
! pushc 1
! add
! copy
! pushc 1
! out // OUT the count tuple
! pushc 7
! land
! putled // update the LED
! pushc 1
! sleep
! pushc BEGIN
! jumps
Index: CntToLedsTS_named_tuple.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/CntToLedsTS_named_tuple.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** CntToLedsTS_named_tuple.ma 17 Oct 2005 05:05:19 -0000 1.1
--- CntToLedsTS_named_tuple.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,23 ****
! BEGIN pusht value
! pusht string
! pushc 2
! inp
! rjumpc SKIP // if a tuple was found, jump to SKIP
! pushc 0
! pushc 0
! pushc 0
! SKIP pop // pop the number of fields
! pop // pop off the name
! pushc 1
! add
! copy
! pushn abc
! pushc 2
! out // OUT the count tuple
! pushc 7
! land
! putled // update the LED
! pushc 1
! sleep
! pushc BEGIN
! jumps
--- 1,23 ----
! BEGIN pusht value
! pusht string
! pushc 2
! inp
! rjumpc SKIP // if a tuple was found, jump to SKIP
! pushc 0
! pushc 0
! pushc 0
! SKIP pop // pop the number of fields
! pop // pop off the name
! pushc 1
! add
! copy
! pushn abc
! pushc 2
! out // OUT the count tuple
! pushc 7
! land
! putled // update the LED
! pushc 1
! sleep
! pushc BEGIN
! jumps
Index: MigrateBSToMoteFat.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/MigrateBSToMoteFat.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** MigrateBSToMoteFat.ma 11 Nov 2005 06:14:47 -0000 1.1
--- MigrateBSToMoteFat.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,18 ****
! BEGIN pushc RETURN
! getvar 0 // heap 0 must contain # of times to blink LED
! pushcl BLINKGREENC
! jumps
! RETURN halt
!
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
jumps
\ No newline at end of file
--- 1,18 ----
! BEGIN pushc RETURN
! getvar 0 // heap 0 must contain # of times to blink LED
! pushcl BLINKGREENC
! jumps
! RETURN halt
!
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
jumps
\ No newline at end of file
Index: MigrateBSToMoteThin.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/MigrateBSToMoteThin.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** MigrateBSToMoteThin.ma 11 Nov 2005 06:14:47 -0000 1.1
--- MigrateBSToMoteThin.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,18 ****
! BEGIN pushc RETURN
! getvar 0 // heap 0 must contain # of times to blink LED
! pushcl BLINKGREENC
! jumps
! RETURN halt
!
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
jumps
\ No newline at end of file
--- 1,18 ----
! BEGIN pushc RETURN
! getvar 0 // heap 0 must contain # of times to blink LED
! pushcl BLINKGREENC
! jumps
! RETURN halt
!
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
jumps
\ No newline at end of file
Index: MigrateToUart.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/MigrateToUart.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** MigrateToUart.ma 10 Nov 2005 04:32:07 -0000 1.1
--- MigrateToUart.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,25 ****
! BEGIN pushc RETURN
! pushc 6
! rjump BLINKGREENC
! RETURN pushloc uart_x uart_y
!
! wmove
! halt
!
! // Blinks the green LED a certain number of times, as specified by the
! // value on top of the stack.
! //
! // Opstack Parameters: [val=#blinks][return address]
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
! jumps
\ No newline at end of file
--- 1,25 ----
! BEGIN pushc RETURN
! pushc 6
! rjump BLINKGREENC
! RETURN pushloc uart_x uart_y
!
! wmove
! halt
!
! // Blinks the green LED a certain number of times, as specified by the
! // value on top of the stack.
! //
! // Opstack Parameters: [val=#blinks][return address]
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
! jumps
\ No newline at end of file
Index: MigrateToUartA.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/MigrateToUartA.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** MigrateToUartA.ma 10 Nov 2005 04:32:07 -0000 1.1
--- MigrateToUartA.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,25 ****
! BEGIN pushc RETURN
! pushc 6
! rjump BLINKGREENC
! RETURN pushcl uart
!
! wmove
! halt
!
! // Blinks the green LED a certain number of times, as specified by the
! // value on top of the stack.
! //
! // Opstack Parameters: [val=#blinks][return address]
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
! jumps
\ No newline at end of file
--- 1,25 ----
! BEGIN pushc RETURN
! pushc 6
! rjump BLINKGREENC
! RETURN pushcl uart
!
! wmove
! halt
!
! // Blinks the green LED a certain number of times, as specified by the
! // value on top of the stack.
! //
! // Opstack Parameters: [val=#blinks][return address]
! BLINKGREENC pushc 26
! putled // blink green
! pushc 1
! sleep
! dec
! copy
! pushc 0
! ceq
! rjumpc BLINKGREENCD
! rjump BLINKGREENC
! BLINKGREENCD pop
! jumps
\ No newline at end of file
Index: README
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/README,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** README 11 Nov 2005 02:14:57 -0000 1.2
--- README 18 May 2006 21:13:28 -0000 1.3
***************
*** 1,42 ****
! This file contains descriptions of the agents in the local directory.
!
! 3Blink:
! Blinks all three LEDs three times, and then halts
!
! 3BlinkContinuous:
! Blinks all three LEDs three times, pauses, and repeats indefinitely.
!
! BlinkRedLEDContinuous:
! Repeatedly blinks the red LED. Runs indefinitely.
!
! Bounce0to1:
! Blinks the red LED once. Then, if the agent is on mote 0, it
! migrates to performs a weak move to node 1. Upon arriving at node 1,
! it again blinks the red LED, then halts.
!
! Bounce0to1Continuous:
! Same as Bounce0to1 except it performs a weak move to mote 0 when it
! is at mote 1, resulting in it bouncing between motes 0 and 1
! indefinitely.
!
! CntToLedsHP:
! Count up using the heap to store the counter, displays the last
! three bits of the counter on the LEDs.
!
! CntToLedsTS.ma
! Same as CntToLedsHP except it stores the current value in a tuple
! in the local tuple space.
!
! MigrateToUart:
! Blinks the green LED 5 times, them migrates to location
! (uart_x, uart_y). Inject it anywhere into the network
! and it should arrive back at the base station.
!
! MigrateToUartA:
! Same as MigrateToUart except it does migrate to TinyOS
! address uart.
!
! MigraetToUartStrong:
! Same as MigrateToUartA except it migrates a really fat agent containing
! multiple code, stack, heap, and reaction messages.
\ No newline at end of file
--- 1,42 ----
! This file contains descriptions of the agents in the local directory.
!
! 3Blink:
! Blinks all three LEDs three times, and then halts
!
! 3BlinkContinuous:
! Blinks all three LEDs three times, pauses, and repeats indefinitely.
!
! BlinkRedLEDContinuous:
! Repeatedly blinks the red LED. Runs indefinitely.
!
! Bounce0to1:
! Blinks the red LED once. Then, if the agent is on mote 0, it
! migrates to performs a weak move to node 1. Upon arriving at node 1,
! it again blinks the red LED, then halts.
!
! Bounce0to1Continuous:
! Same as Bounce0to1 except it performs a weak move to mote 0 when it
! is at mote 1, resulting in it bouncing between motes 0 and 1
! indefinitely.
!
! CntToLedsHP:
! Count up using the heap to store the counter, displays the last
! three bits of the counter on the LEDs.
!
! CntToLedsTS.ma
! Same as CntToLedsHP except it stores the current value in a tuple
! in the local tuple space.
!
! MigrateToUart:
! Blinks the green LED 5 times, them migrates to location
! (uart_x, uart_y). Inject it anywhere into the network
! and it should arrive back at the base station.
!
! MigrateToUartA:
! Same as MigrateToUart except it does migrate to TinyOS
! address uart.
!
! MigraetToUartStrong:
! Same as MigrateToUartA except it migrates a really fat agent containing
! multiple code, stack, heap, and reaction messages.
\ No newline at end of file
Index: RandomWalk.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/RandomWalk.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** RandomWalk.ma 5 Apr 2006 17:20:28 -0000 1.1
--- RandomWalk.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,12 ****
! BEGIN pushc 26
! putled // toggle green LED
! pushc 1
! sleep // sleep for 1/8 second
! pushc 26
! putled // toggle green LED
! randnbr // get a random neighbor
! rjumpc MIGRATE
! rjump BEGIN
! MIGRATE wmove
! pushc BEGIN
jumps
\ No newline at end of file
--- 1,12 ----
! BEGIN pushc 26
! putled // toggle green LED
! pushc 1
! sleep // sleep for 1/8 second
! pushc 26
! putled // toggle green LED
! randnbr // get a random neighbor
! rjumpc MIGRATE
! rjump BEGIN
! MIGRATE wmove
! pushc BEGIN
jumps
\ No newline at end of file
Index: Relay.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Relay.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Relay.ma 5 Jan 2006 00:47:07 -0000 1.1
--- Relay.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,18 ****
! // This agent reacts to tuples and forwards them to the gateway.
! // If this is the gateway, it forwards the tuple to the base station.
!
! pusht VALUE
! pushc 1
! pushc REACT
! regrxn // register reaction sensitive to <type:value>
! wait
! REACT inp // begin reaction
! rjumpc CONT
! endrxn // the inp failed, abort
! CONT isgw
! rjumpc TOBS // if this is a gateway, send it to the base station
! getgw // otherwise get the address of the neighbor closest to the gateway
! rjumpc ROUT
! TOBS pushcl uart
! ROUT rout
endrxn
\ No newline at end of file
--- 1,18 ----
! // This agent reacts to tuples and forwards them to the gateway.
! // If this is the gateway, it forwards the tuple to the base station.
!
! pusht VALUE
! pushc 1
! pushc REACT
! regrxn // register reaction sensitive to <type:value>
! wait
! REACT inp // begin reaction
! rjumpc CONT
! endrxn // the inp failed, abort
! CONT isgw
! rjumpc TOBS // if this is a gateway, send it to the base station
! getgw // otherwise get the address of the neighbor closest to the gateway
! rjumpc ROUT
! TOBS pushcl uart
! ROUT rout
endrxn
\ No newline at end of file
Index: Sleep1Minute.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Sleep1Minute.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Sleep1Minute.ma 12 Feb 2006 08:34:42 -0000 1.1
--- Sleep1Minute.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,7 ****
! pushc 1
! putled
! pushcl 480
! sleep
! pushc 2
! putled
halt
\ No newline at end of file
--- 1,7 ----
! pushc 1
! putled
! pushcl 480
! sleep
! pushc 2
! putled
halt
\ No newline at end of file
Index: Traverse column B2T.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Traverse column B2T.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Traverse column B2T.ma 5 Apr 2006 17:20:28 -0000 1.1
--- Traverse column B2T.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,17 ****
! // Inject this agent onto any agent on the bottom border, watch
! // it migrate across the column. It turns on the red LED upon
! // arrival
!
! BEGIN pushc 1
! putled // turn on red LED
! pushc 2
! setvar 11 // consider only Y coordinate
! loc
! inc
! copy
! cisnbr
! rjumpc MOVE
! halt
! MOVE wmove
! halt
\ No newline at end of file
--- 1,17 ----
! // Inject this agent onto any agent on the bottom border, watch
! // it migrate across the column. It turns on the red LED upon
! // arrival
!
! BEGIN pushc 1
! putled // turn on red LED
! pushc 2
! setvar 11 // consider only Y coordinate
! loc
! inc
! copy
! cisnbr
! rjumpc MOVE
! halt
! MOVE wmove
! halt
\ No newline at end of file
Index: Traverse column T2B.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Traverse column T2B.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Traverse column T2B.ma 5 Apr 2006 17:20:28 -0000 1.1
--- Traverse column T2B.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,17 ****
! // Inject this agent onto any agent on the top border, watch
! // it migrate across the column. It turns on the red LED upon
! // arrival
!
! BEGIN pushc 1
! putled // turn on red LED
! pushc 2
! setvar 11 // heap[11] = 2, consider only Y coordinate
! loc
! dec
! copy
! cisnbr
! rjumpc MOVE
! halt
! MOVE wmove
! halt
\ No newline at end of file
--- 1,17 ----
! // Inject this agent onto any agent on the top border, watch
! // it migrate across the column. It turns on the red LED upon
! // arrival
!
! BEGIN pushc 1
! putled // turn on red LED
! pushc 2
! setvar 11 // heap[11] = 2, consider only Y coordinate
! loc
! dec
! copy
! cisnbr
! rjumpc MOVE
! halt
! MOVE wmove
! halt
\ No newline at end of file
Index: Traverse row R2L.ma
===================================================================
RCS file: /cvsroot/tinyos/tinyos-1.x/contrib/wustl/apps/AgillaAgents/Traverse row R2L.ma,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Traverse row R2L.ma 5 Apr 2006 17:20:28 -0000 1.1
--- Traverse row R2L.ma 18 May 2006 21:13:28 -0000 1.2
***************
*** 1,17 ****
! // Inject this agent onto any agent on the right border, watch
! // it migrate across the row. It turns on the red LED upon
! // arrival
!
! BEGIN pushc 1
! putled // turn on red LED
! pushc 1
! setvar 11 // heap[11] = 1, consider only X coordinate
! loc
! dec
! copy
! cisnbr
! rjumpc MOVE
! halt
! MOVE wmove
! halt
\ No newline at end of file
--- 1,17 ----
! // Inject this agent onto any agent on the right border, watch
! // it migrate across the row. It turns on the red LED upon
! // arrival
!
! BEGIN pushc 1
! putled // turn on red LED
! pushc 1
! setvar 11 // heap[11] = 1, consider only X coordinate
! loc
! dec
! copy
! cisnbr
! rjumpc MOVE
! halt
! MOVE wmove
! halt
\ No newline at end of file
- Previous message: [Tinyos-contrib-commits]
CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents/Fragments
3BLINK.fg, 1.1, 1.2 BLINKGREEN.fg, 1.1, 1.2 BLINKGREENC.fg,
1.1, 1.2 BLINKRED.fg, 1.1, 1.2 BLINKYELLOW.fg, 1.1,
1.2 BLIPALL.fg, 1.1, 1.2 BLIPGREEN.fg, 1.2, 1.3 BLIPRED.fg,
1.1, 1.2 COUNTUP.fg, 1.2, 1.3 GetNbrSnapshot.fg, 1.1,
1.2 RANDWEAKCLONE.fg, 1.1, 1.2
- Next message: [Tinyos-contrib-commits]
CVS: tinyos-1.x/contrib/wustl/apps/AgillaAgents/Tutorials/Lesson4
README, 1.1, 1.2 sleep_out_value.ma, 1.1, 1.2 sleep_rxn.ma,
1.1, 1.2 wait_example.ma, 1.1, 1.2 wait_out_string.ma, 1.1,
1.2 wait_out_value.ma, 1.1, 1.2 wait_rout_string.ma, 1.1,
1.2 wait_rout_value.ma, 1.1, 1.2
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
More information about the Tinyos-contrib-commits
mailing list