Zist brew bot zmud6.16

Originally written by Zistrosk

Zist brew bot zmud6.16

#ALIAS promptset {prompt ~&c~{~&W~%h~&R~/~&g~%H~&Wh~&c~|~&W~%m~&R~/~&g~%M~&Wmp~&c~|~&W~%v~&R~/~&g~%V~&Wmv~&c~|~&p~%g~&Wgp~&c~}~&w} {logon}
#ALIAS tranceup {#if (@mana < @manafull) {#t- brewtimer;#var manadiff @manafull;#math manadiff @manafull-@mana;#math manadiff @manadiff/50;#math manadiff @manadiff+2;title is trancing right now;emote is trancing @manadiff times...;#var waittime @manadiff;#math waittime @waittime*10;#show waittime = @waittime;#alarm +@waittime {#show Brewtimer Reenabled;brewtimerset};#loop 1,@manadiff {#var brewtc 100;trance;save};emote is done trancing;title is ready to cast spells}} {brewpots}
#ALIAS brewtimerset {#t+ brewtimer;#var brewtc 1;#alias brewtimer { #if (@brewtc = 1) {#if (@mana < @manafull) {trance};brewnext}}} {logon}
#ALIAS brewtimer {#if (@brewtc = 1) {#if (@mana < @manafull) {trance};brewnext}} {brewtimer}
#ALIAS brewnext {#var brewlist {"true sight|shadowform|stone skin|blazeward|antimagic|demonskin|dragonskin|ethereal shield|shockshield"};#var brewlistlen %numwords( @brewlist, "|");#if (@brewnum > @brewlistlen) {#var brewnum 1};#if (@brewnum < 1) {#var brewnum 1};#var brewitem %word( @brewlist, @brewnum, "|");brewit @brewitem} {brewpots}
#ALIAS brewit {#var pot %concat( %1, %2);get empty ext;hold empty;#t+ brewon;brew @pot;save} {brewpots}
#ALIAS brewagain {brew @pot;#t+ brewon} {brewpots}
#TRIGGER {^By what name are you known} {yourcharname} {logon}
#TRIGGER {^Name:} {yourcharname} {logon}
#TRIGGER {^Password:} {yourpassword;save;time;promptset;brewtimerset;title is ready to cast spells;#t+ brewon} {logon}
#TRIGGER {Press [ENTER] } {save;time;stand} {logon} {nocr|prompt}
#TRIGGER {You disappear into the void.} {save;smile;#var brewtc 1;#alarm +30 {brewtimer}} {brewtimer}
#TRIGGER {You brew up a} {remove potion;put all.potion ext;put all.empty ext;#math brewnum @brewnum+1;#t- brewon} {brewon}
#TRIGGER {You failed} {brewagain;save} {brewon}
#TRIGGER {A tickle in your nose} {brewagain;save} {brewon}
#TRIGGER {I see nothing like that in the ext} {#t- brewon} {brewon}
#TRIGGER {There must be a fire in the room to brew a potion.} {c 'create fire';brewagain} {brewon}
#TRIGGER {You cannot brew that spell} {remove empty;put all.empty ext;#t- brewon} {brewon}
#TRIGGER {You don't have enough mana.} {emote is out of mana, trancing...;tranceup} {brewon}
#TRIGGER {You have not learned that spell} {remove empty;put all.empty ext;#t- brewon} {brewon}
#TRIGGER {Something distracts you} {brewagain;save} {brewon}
#TRIGGER {A twitch in your eye} {brewagain;save} {brewon}
#TRIGGER {You get a mental block} {brewagain;save} {brewon}
#TRIGGER {A tickle in your nose} {brewagain;save} {brewon}
#TRIGGER {gp} {#show %cr} {brewpots}
#TRIGGER {you can't carry that much weight} {cast 'kindred strength';brewagain} {brewon}
#TRIGGER {You must be holding an empty flask to brew a potion} {get empty ext;hold empty;brewagain} {brewon}
#TRIGGER {^~{(%d)/(%d)h|(%d)/(%d)mp|(%d)/(%d)mv|(%d)gp} {#var health %1;#var healthfull %2;#var mana %3;#var manafull %4;#var resptime %ctime;#if (@mana = @manafull) {#if (@brewtc > 50) {brewtimerset;brewagain}}} {prompttrig}
#ALARM *02:00 {#var temp %ctime;#alarm +5 {#var now %time( ddmmmyy|hh:mm:ss);#var temp2 0;#math temp2 %ctime-@temp;#IF (@temp2 = 0) {#CON;#show RECONNECT AT @now} {#var temp2 0;#math temp2 %ctime-@resptime;#show TIME SINCE LAST MUD RESPONSE - @temp2 seconds;#IF (@temp2 > 120) {#CON;#show RECONNECT DUE TO LAG AT @now} {#show reconnection not necessary at @now;#show connected for %ctime seconds}}}} {autoreconnect}
#ALARM *00:30 {brewtimer} {logon}