home *** CD-ROM | disk | FTP | other *** search
- symbols
- message startup
- message entered
-
- sector sector1 linkid=1
- sector sector2 linkid=2
- sector sector3 linkid=3
-
- end
-
- # ========================================================================================
-
- code
- startup:
- ca1=0;
- ca2=0;
- ca3=0;
- return;
-
- entered:
- if ( (getsenderid()==1)&&(ca1==0) ) {
- ca1=1;
- dwsetreftopic("counter.tpc");
- }
- if ( (getsenderid()==2)&&(ca2==0) ) {
- ca2=1;
- dwsetreftopic("Gear.tpc");
- }
- if ( (getsenderid()==3)&&(ca3==0) ) {
- ca3=1;
- dwsetreftopic("Wheel.tpc");
- }
- return;
-
-
-
- end
-
-