changeset 283:496c2c457cb1

Cleanups.
author Matti Hamalainen <ccr@tnsp.org>
date Fri, 17 Feb 2006 04:19:09 +0000
parents c639adae361c
children 6517558e2516
files ggrtf-spellnames.tf ggrtf.tf
diffstat 2 files changed, 24 insertions(+), 18 deletions(-) [+]
line wrap: on
line diff
--- a/ggrtf-spellnames.tf	Fri Feb 17 04:18:53 2006 +0000
+++ b/ggrtf-spellnames.tf	Fri Feb 17 04:19:09 2006 +0000
@@ -1,6 +1,6 @@
 ;;
 ;; GgrTF:Spellnames - Module for spell name translation @ BatMUD
-;; (C) Copyright 2005 Cutter, Dazzt & Ggr
+;; (C) Copyright 2005-2006 Cutter, Dazzt & Ggr
 ;;
 ;; This file (triggerset) is Free Software distributed under
 ;; GNU General Public License version 2.
--- a/ggrtf.tf	Fri Feb 17 04:18:53 2006 +0000
+++ b/ggrtf.tf	Fri Feb 17 04:19:09 2006 +0000
@@ -1,8 +1,8 @@
 ;;
-;; GgrTF v0.5.9.18-svn - TinyFugue script for BatMUD
+;; GgrTF v0.5.9.19-svn - TinyFugue script for BatMUD
 ;; (C) Copyright 2004-2006 Matti 'ccr' Hämäläinen (aka Ggr Pupunen)
 ;;
-/set ggrtf_ver=0.5.9.18-svn
+/set ggrtf_ver=0.5.9.19-svn
 ;;
 ;; This triggerset is Free Software distributed under
 ;; GNU General Public License version 2.
@@ -143,6 +143,14 @@
 	/return "BCgreen"
 
 
+;; Execute macros given as parameters
+/def -i prexecfuncs =\
+	/while ({#})\
+		/eval /%{1}%;\
+		/shift%;\
+	/done
+
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Report current statistics
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -170,7 +178,7 @@
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; List available options
+;; List available options / settings
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 /def -i opts_dolist =\
 /while ({#})\
@@ -220,6 +228,7 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Option, setting and hook definition macros
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Define an togglable option
 /set lst_options=
 /def -i deftoggle =\
 	/if (!getopts("n:d:", "")) /msq ERROR! Invalid toggle creation command!%;/break%;/endif%;\
@@ -235,7 +244,8 @@
 		/endif%%%;\
 		/msq @{Cyellow}%{opt_d}@{n} [%%%{qstr}]
 
-;; Value settings
+
+;; Define a value setting
 /set lst_values=
 /def -i defvalue =\
 	/if (!getopts("n:d:", "")) /msq ERROR! Invalid value setting creation command!%;/break%;/endif%;\
@@ -255,7 +265,8 @@
 			/msq Use "@{BCyellow}/%{opt_n} *@{n}" to clear.%%%;\
 		/endif
 
-;; Settings
+
+;; Define a setting with legal values
 /set lst_settings=
 /def -i chksetting =\
 	/set qrvals=0%;\
@@ -286,7 +297,7 @@
 		/endif
 
 
-;; Function hook setting
+;; Define a function hook setting
 /set lst_hooks=
 /def -i defhook =\
 	/if (!getopts("n:d:s:h:", "")) /msq ERROR! Invalid function hook setting creation command!%;/break%;/endif%;\
@@ -309,7 +320,9 @@
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Define a global saveable variable
+;; Variable saving functionality
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Define a global, saveable variable
 /def -i defvar =\
 	/set lst_savevars=%{1} %{lst_savevars}%;\
 	/eval /set %{1}=%{-1}
@@ -368,14 +381,6 @@
 	/msq @{BCgreen}Done.@{n}%;\
 
 
-;; Execute macros given as parameters
-/def -i prexecfuncs =\
-	/while ({#})\
-		/eval /%{1}%;\
-		/shift%;\
-	/done
-
-
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Define some generic option toggles and settings
 /deftoggle -n"verbose"	-d"Verbose (off = echo to client only)"
@@ -411,7 +416,7 @@
 
 ;; Ripcommand
 /defvalue -n"ripcommand" -d"Commands to be executed if ripaction = cmd"
-/set set_ripcommand=@say Puputanssi!;hopple;shake bottom;wiggle;hop!;clap
+/set set_ripcommand=@whee
 
 ;; LoC-action
 /defsetting -n"locaction" -d"Set action performed after blood corpse" -s"off dig eat get"
@@ -474,10 +479,11 @@
 
 
 ;; Main handling macro for binding movemement keys, etc.
-/set set_peer=embedded
 /defhook -n"move" -d"Keyboard movement hooks" -h"prmove" -s"walk ship peer"
 /move walk
 
+/set set_peer=embedded
+
 ;; 'view' on every ship move
 /def -i -F -mregexp -t"^The ship (sails|cruises) " ship_move = @view