home *** CD-ROM | disk | FTP | other *** search
- symbols
- message startup
- message crossed
- message timer
- message pulse
-
- thing crate1
- thing crate2
- thing thephonycrate
-
- surface triggeradjoin mask=0xffff linkid=1
- template solidcrateT
- thing teledest
- sector UCsector
- thing topghost
- surface blockadjoin nolink
- surface triggeradjoinREAL mask=0xffff linkid=2
- surface IWannaBeAdored nolink
- end
-
- ## Code Section
- code
- startup:
- player=getlocalplayerthing();
- if (getdifficulty()==0) {
- teleportthing(crate2, teledest);
- }
- else if (getdifficulty()==1) {
- teleportthing(crate1, teledest);
- teleportthing(crate2, teledest);
- teleportthing(thephonycrate, teledest);
- }
- setadjoinflags(blockadjoin, 2);
- setadjoinflags(IWannaBeAdored, 2); #you can now walk thru this adjoin
- lovespreads=0;
- return;
-
- crossed:
- if (getsenderid()==1) {
- if ( (getdifficulty()==2)||(getdifficulty()==0) ) {
- if ( (getsourceref()==crate1)||(getsourceref()==crate2) ) {
- print("crossed. dammit.");
- uppercrate=getsourceref();
- settimer(1);
- }
- }
- }
- else if (getsenderid()==2) {
- if (getsourceref()==player) {
- setadjoinflags(blockadjoin, 2);
- print("here's the player");
- }
- else if (lovespreads==0) {
- clearadjoinflags(blockadjoin, 2);
- print("here's the crate");
- }
- }
- return;
-
- timer:
- print("and what goes up");
- if (getthingsector(uppercrate)==UCsector) {
- print("must come down");
- teleportthing(uppercrate, teledest);
- creatething(solidcrateT, topghost);
- setadjoinflags(blockadjoin, 2);
- clearadjoinflags(IWannaBeAdored, 2); #you can NOT walk thru this adjoin
- LoveSpreads=1;
- }
-
- return;
-
- end
-
-
-
-
-
-
-
-
-
-
-