Zist brew bot zmud4 6

Originally written by Zistrosk

Zistrosk Brewbot ZMud 4.6

#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}
#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}}
#ALIAS brewtimerset {#t+ brewtimer;#var brewtc 1;#alias brewtimer { #if (@brewtc = 1) {#if (@mana < @manafull) {trance};brewnext}}}
#ALIAS brewtimer { #if (@brewtc = 1) {#if (@mana < @manafull) {trance};brewnext}}
#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}
#ALIAS brewit {#var pot %trimleft(%trimright(%concat( %1, %2)));get empty ext;hold empty;#t+ brewon;brew @pot}
#ALIAS brewagain {brew @pot;#t+ brewon}
#VAR temp {30}
#VAR now { 30Dec01|12:36:05}
#VAR temp2 {1}
#VAR health {853}
#VAR healthfull {783}
#VAR mana {684}
#VAR manafull {983}
#VAR resptime {53}
#VAR brewtc {100}
#VAR brewlist {true sight|shadowform|stone skin|blazeward|antimagic|demonskin|dragonskin|ethereal shield|shockshield}
#VAR brewlistlen {9}
#VAR brewitem {shadowform}
#VAR pot {shadowform}
#VAR brewnum {2}
#VAR manadiff {12}
#VAR waittime {120}
#TRIGGER {^By what name are you known} {mycharname} {logon} 583
#TRIGGER {^Name:} {mycharname} {logon} 583
#TRIGGER {^Password:} {mypassword;save;time;promptset;brewtimerset;title is ready to cast spells;#t+ brewon} {logon} 583
#TRIGGER {Press [ENTER] } {save;time;stand} {logon} 71
#TRIGGER {You disappear into the void.} {save;smile;#var brewtc 1;#alarm +30 {brewtimer}} {brewtimer} 583
#TRIGGER {You brew up a} {remove potion;put all.potion ext;put all.empty ext;#math brewnum @brewnum+1;#t- brewon} {brewon} 583
#TRIGGER {You failed} {brewagain;save} {brewon} 583
#TRIGGER {A tickle in your nose} {brewagain;save} {brewon} 583
#TRIGGER {I see nothing like that in the ext} {#t- brewon} {brewon} 583
#TRIGGER {There must be a fire in the room to brew a potion.} {c 'create fire';brewagain} {brewon} 583
#TRIGGER {You cannot brew that spell} {remove empty;put all.empty ext;#t- brewon} {brewon} 583
#TRIGGER {You don't have enough mana.} {emote is out of mana, trancing...;tranceup} {brewon} 583
#TRIGGER {You have not learned that spell} {remove empty;put all.empty ext;#t- brewon} {brewon} 583
#TRIGGER {Something distracts you} {brewagain;save} {brewon} 583
#TRIGGER {A twitch in your eye} {brewagain;save} {brewon} 583
#TRIGGER {You get a mental block} {brewagain;save} {brewon} 583
#TRIGGER {gp} {#show %cr} {brewpots} 579
#TRIGGER {you can't carry that much weight} {cast 'kindred strength';brewagain} {brewon} 583
#TRIGGER {You must be holding an empty flask to brew a potion} {get empty ext;hold empty;brewagain} {brewon} 583
#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} 583
#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} 527
#ALARM {*00:30} {brewtimer} {logon} 527