WoTMUD Archives

#CLASS Weather #VARIABLE Temperature 0 #VARIABLE Snowing 0 #VARIABLE Lightning 0 #VARIABLE Raining 0 #VARIABLE Cloudy 0 #VARIABLE Wind %null #ALIAS clearweatherattributes {#VARIABLE Snowing 0;#VARIABLE Lightning 0;#VARIABLE Raining 0;#VARIABLE Cloudy 0} #TRIGGER {It starts to rain.$} {#VAR Snowing 0...

#class TravelExpire #var FoundMatch 0 #var Destinations %null #var CurrentTime %null #alias goto {#var FoundMatch 0;#forall @Destinations {#if (%lower(%i.Familiar) = %lower("%1")) {#var FoundMatch 1;#if (%i.Month = @CurrentTime.Month and %i.Year = @CurrentTime.Year) {channel 'travel' %i.Ea...

#CLASS {statusbar} #TRIGGER {You have %1 hit, %5 saidar and %2 movement points.} { #var hp {%1} #var mv {%2} #var sp {%5} } #TRIGGER {You have %1 hit and %2 movement points.} { #var hp {%1} #var mv {%2} } #TRIGGER {You need %3 exp to level and %4 qp to rank.} { #var tnl {%3} #var tnr {%4} } #STAT {H...

#CLASS {StatusBar 1.6} #ALIAS NoticeOff {#VARIABLE NoticeStatusColor dimgray} #ALIAS NoticeOn {#VARIABLE NoticeStatusColor 65280} #ALIAS MoodWimpy { #VARIABLE MoodStatus Wimpy #VARIABLE MoodStatusColor lightblue } #ALIAS MoodNormal { #VARIABLE MoodStatus Normal #VARIABLE MoodStatusColor steelblue } ...

#CLASS {DirectionNarrate} #ALIAS dirnar { embrace channel 'locate object' %-1 #TEMP {^Ok.$} { #T+ {DirectionNarrate|Catcher} #VARIABLE Catcher %null #VARIABLE Located "%-1" #ALARM +10 {#T- {DirectionNarrate|Catcher}} } } #ALIAS doreport {#IF (%numparam( ) > 0) {narr Whispers on the wind, h...

#CLASS {Report} #ALIAS internalcomm {#say %-1} #ALIAS remreport {#deli spreadout {%-1};#say %-1 removed from the Scout Report.} #ALIAS addreport {#addi spreadout {%-1};#say %-1 added to the Scout Report.} #ALIAS listreport {#say The script is currently reporting to:;#if (%numitems( @spreadout)=0) {#...

#CLASS {Rent Script} #ALIAS calcrent { #VAR copperwith 0 #VAR goldwith 0 take all.coin @container count copper count crowns put all.coin @container #TEMP {A banker whispers to you '*'} { #IF ((@copperwith + @goldwith) = @rentcost) {#ECHO "Exactly enough!"} { #IF ((@copperwith + @goldwith) ...

#ALIAS calcrent { #VAR copperwith 0 #VAR goldwith 0 take all.coin @container count copper count crowns put all.coin @container #TEMP {A banker whispers to you '*'} { #IF ((@copperwith + @goldwith) = @rentcost) {#ECHO "Exactly enough!"} { #IF ((@copperwith + @goldwith) > @rentcost) { #ECHO ...

#CLASS {rentbar}
#VAR OfferTime {10/21/2004 2:47:22 AM}
#TRIGGER {* tells you, 'Rent will cost you (%*) per day, or (*) per day over five days.'} {
#var OfferTime %time( c)
#sta Rent at @OfferTime: %1
}
#CLASS 0

#CLASS ReceiptSort #ALIAS {reclist} {#IF ("%1" <> %null) {#VAR liststart "%1"};#IF ("%2" <> %null) {#VAR listend "%2"};reclists2e} #ALIAS {rl} {#IF ("%1" <> %null) {#VAR liststart "%1"};#IF ("%2" <> %null) {#VAR listend "%2&q...