itsmarty Novice
Joined: 29 Jan 2002 Posts: 37 Location: USA
|
Posted: Sat Nov 30, 2002 4:31 pm
Simutronics Dragonrealms - Compass |
This compass indicates directions via buttons that change color when an obvious exit/path exists.
See http://mywebpages.comcast.net/itsmarty/ for an example of this and other buttons.
Martin
#CLASS {Compass}
#TRIGGER "compass" {^Obvious {exits|paths}~: (*)} {
compassdirections = %1
compassdirections = %dups( %replace( @compassdirections, " ", ""))
compassdirections = %dups( %replace( @compassdirections, ".", ""))
compassdirections = %dups( %replace( @compassdirections, ",", "|"))
#IF %ismember( down, @compassdirections) {#VAR compassdown 1} {#VAR compassdown 0}
#IF %ismember( east, @compassdirections) {#VAR compasseast 1} {#VAR compasseast 0}
#IF %ismember( west, @compassdirections) {#VAR compasswest 1} {#VAR compasswest 0}
#IF %ismember( north, @compassdirections) {#VAR compassnorth 1} {#VAR compassnorth 0}
#IF %ismember( south, @compassdirections) {#VAR compasssouth 1} {#VAR compasssouth 0}
#IF %ismember( southeast, @compassdirections) {#VAR compasssoutheast 1} {#VAR compasssoutheast 0}
#IF %ismember( southwest, @compassdirections) {#VAR compasssouthwest 1} {#VAR compasssouthwest 0}
#IF %ismember( northeast, @compassdirections) {#VAR compassnortheast 1} {#VAR compassnortheast 0}
#IF %ismember( northwest, @compassdirections) {#VAR compassnorthwest 1} {#VAR compassnorthwest 0}
#IF %ismember( out, @compassdirections) {#VAR compassout 1} {#VAR compassout 0}
#IF %ismember( up, @compassdirections) {#VAR compassup 1} {#VAR compassup 0}
}
#BUTTON 5 {OUT} {} {OUT} {} {} {compassout} {} {Size} {27} {24} {Pos} {24} {27} {} {110} {} {} "" {} {} {} {2}
#BUTTON 6 {NE} {} {NE} {} {} {compassnortheast} {} {Size} {27} {24} {Pos} {1} {54} {} {110} {} {} "" {} {} {} {2}
#BUTTON 7 {S} {} {S} {} {} {compasssouth} {} {Size} {27} {24} {Pos} {48} {27} {} {110} {} {} "" {} {} {} {2}
#BUTTON 8 {NW} {} {NW} {} {} {compassnorthwest} {} {Size} {27} {24} {Pos} {1} {1} {} {110} {} {} "" {} {} {} {2}
#BUTTON 9 {SE} {} {SE} {} {} {compasssoutheast} {} {Size} {27} {24} {Pos} {48} {54} {} {110} {} {} "" {} {} {} {2}
#BUTTON 10 {SW} {} {SW} {} {} {compasssouthwest} {} {Size} {27} {24} {Pos} {48} {1} {} {110} {} {} "" {} {} {} {2}
#BUTTON 11 {E} {} {E} {} {} {compasseast} {} {Size} {27} {24} {Pos} {24} {54} {} {110} {} {} "" {} {} {} {2}
#BUTTON 12 {UP} {} {UP} {} {} {compassup} {} {Size} {27} {36} {Pos} {1} {81} {} {110} {} {} "" {} {} {} {2}
#BUTTON 13 {DN} {} {DN} {} {} {compassdown} {} {Size} {27} {36} {Pos} {36} {81} {} {110} {} {} "" {} {} {} {2}
#BUTTON 14 {W} {} {W} {} {} {compasswest} {} {Size} {27} {24} {Pos} {24} {1} {} {110} {} {} "" {} {} {} {2}
#BUTTON 15 {N} {} {N} {} {} {compassnorth} {} {Size} {27} {24} {Pos} {1} {27} {} {110} {} {} "" {} {} {} {2}
#CLASS 0 |
|