initial release

scripts/gagcreator.set

@@ -0,0 +1,57 @@
+#alias addnewgag {#play {@sppath/general/misc/confman.wav} @vol;
+#alarm 0.100 {#say {This prompt allows one to add a string that they would like to be gagged either completely or just from the speach queue. In order to do this, please use the options below} VoiceOnly};
+#pick {P:Creating a new gag|
+What line are we gagging today? @newgag:setgagline|
+What kind of the gagging method would you like? @gagmethod:setgagmethod|
+What file is this going to be stored in? @gagfile:setgagfile|
+I'm done and want to finish:pushnewgag|
+I didn't mean to use this, please abort:#abort}}
+
+#alias setgagline {
+#alarm 0.100 {#say {please enter the line that you would like to be  gagged, if parts of it are not static, E.G random numbers or words, replace this bit by an asterisc, *} VoiceOnly};
+#prompt newgag {Enter the line here.};
+addnewgag}
+
+#alias setgagmethod {
+#alarm 0.100 {#say {please choose one of the methods below:} VoiceOnly};
+#pick {P:Method?|
+Omit the line from my speech queue but leave it in the output window:#var gagmethod voice|
+Omit the line both from the output window and from my speech queue:#var gagmethod all};
+addnewgag}
+#alias setgagfile {
+#alarm 0.100 {#say {Due to VIPMud limitations, a file cannot exceed 32000 characters in length, this is why it is recommended to sort your gags into categories, so please choose from one of the files below:} VoiceOnly};
+#pick {P:What file are we using today?|
+Activity related gags:#var gagfile ActivityGags|
+Ship Related Gags:#var gagfile ShipGags|
+Miscellaneous gags:#var gagfile MiscGags|
+Vehicle Related gags:#var gagfile VehicleGags};
+addnewgag}
+
+#alias pushnewgag {#if {%defined(gagfile)=0 or %defined(gagmethod)=0 or %defined(newgag)=0} {#alarm 1 {#say {you have not filled out all the required fields with rellivant information}; #play {@sppath/general/misc/boop.wav} @vol;#abort}} {
+#file 3 {%CharInfo(MudName)/gags/@gagfile.set};
+#forall {@newgag} {
+#write 3 {~#trigger {%i} {~#gagline @gagmethod}}};
+#close 3;
+#unload {gags/@gagfile.set};
+#load {gags/@gagfile.set};
+#unvar gagmethod;#unvar newgag;#unvar gagfile;#alarm 1 {#say {Complete!}; #play {@sppath/general/misc/loadingfile.wav} @vol}}}
+
+#alias miscgagtoggle {
+#if {@MiscGags="disabled"} {#var MiscGags "enabled";#load {@scpath/gags/MiscGags.set}} {#var MiscGags "disabled";#unload {@scpath/gags/gags.set}}}
+#alias vehiclegagtoggle {
+#if {@VehicleGags="disabled"} {#var VehicleGags "enabled"; #unload {@scpath/gags/VehicleGags.set}} {#var VehicleGags "disabled";#load {@scpath/gags/VehicleGags.set}}}
+#alias activitygagtoggle {
+#if {@ActivityGags="disabled"} {#var ActivityGags "enabled";#load {@scpath/gags/ActivityGags.set}} {#var ActivityGags "disabled";#unload {@scpath/gags/ActivityGags.set}}}
+#alias shipgagtoggle {
+#if {@ShipGags="disabled"} {#var ShipGags "enabled";#load {@scpath/gags/ShipGags.set}} {#var ShipGags "disabled";#unload {@scpath/gags/ShipGags.set}}}
+#alias gagconfig {#play {@sppath/general/misc/confman.wav} @vol;
+#pick {P:Please select an option below|
+Activity-related gags (@ActivityGags):activitygagtoggle|
+Ship-related gags (@ShipGags):shipgagtoggle|
+Vehicle-related gags (@VehicleGags):vehiclegagtoggle|
+Misc Gags (@MiscGags):miscgagtoggle|
+Open Activity gags file for editing:#edit {%CharInfo(MudName)/gags/ActivityGags.set}|
+Open Vehicle gags file for editing:#edit {%CharInfo(MudName)/gags/VehicleGags.set}|
+Open misc gags file for editing:#edit {%CharInfo(MudName)/gags/MiscGags.set}|
+Open ship-related gags file for editing:#edit {%CharInfo(MudName)/gags/ShipGags.set}}}
+#key {alt-f2} {gagconfig}