For those of you with the new zMUD 6.40, this group script is much faster and much more efficient. It also gives six control buttons for the group (hold your mouse over the button for tooltips):
To move a characters position, click their name, then their new position.
Invite person... (asks for the name of char to invite through a prompt)
Heal person (heals the character using cure critical in the position you next click)
Create default group (creates your default group if you don't already have one)
Eject person (ejects the character in the next position you click)
Disband group (disbands the group, asks for confirmation first)
Cancel command (cancels whatever you are doing with the group)
Notes: This script makes use of trigger stuff only available in zMUD 6.40 so don't use it unless you are using this public version. The buttons will be created by default in the bottom left of a toolbar.
Code:
#CLASS {Toolbars|AdvancedControl|GroupControl}
#VAR btn {}
#VAR f1 {------------}
#VAR f2 {------------}
#VAR f3 {------------}
#VAR m1 {------------}
#VAR m2 {------------}
#VAR m3 {------------}
#VAR b1 {------------}
#VAR b2 {------------}
#VAR b3 {------------}
#VAR haveGroup {0}
#VAR charHP {100}
#VAR tmpMove {}
#VAR colButton {black, white}
#VAR typeCom {0}
#TRIGGER {You are not in a group.} {haveGroup = 0}
#TRIGGER {Group: } {haveGroup = 1}
#ONINPUT "infoTrig" {info} {#NOOP %btncol( f1, white, white);#NOOP %btncol( f2, white, white);#NOOP %btncol( f3, white, white);#NOOP %btncol( m1, white, white);#NOOP %btncol( m2, white, white);#NOOP %btncol( m3, white, white);#NOOP %btncol( b1, white, white);#NOOP %btncol( b2, white, white);#NOOP %btncol( b3, white, white)}
#COND "infoTrig" {^~(11:F1~) ~[&f1~] ~(12:F2~) ~[&f2~] ~(13:F3~) ~[&f3~]} {f1 = %trim( @f1);f2 = %trim( @f2);f3 = %trim( @f3)}
#COND "infoTrig" {^~(21:M1~) ~[&m1~] ~(22:M2~) ~[&m2~] ~(23:M3~) ~[&m3~]} {m1 = %trim( @m1);m2 = %trim( @m2);m3 = %trim( @m3)}
#COND "infoTrig" {^~(31:B1~) ~[&b1~] ~(32:B2~) ~[&b2~] ~(33:B3~) ~[&b3~]} {b1 = %trim( @b1);b2 = %trim( @b2);b3 = %trim( @b3)}
#COND "infoTrig" {Characters} {#TEMP {^$} { #STATE infoTrig 0}}
#COND "infoTrig" {:(??)%s%x%s%x%s&charHP} {btn = %1;#if (@charHP = 100) {colButton = "black, white"};#if (@charHP < 100) {colButton = "blue, white"};#if (@charHP < 80) {colButton = "green, white"};#if (@charHP < 60) {colButton = "magenta, white"};#if (@charHP < 40) {colButton = "red, white"};#NOOP %btncol( @btn, @colButton)} {looplines|param=10}
#BUTTON 40 {@f1} {btn = f1;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {1} {1} {32895} {} {} {} "" {} {} {f1} {3}
#BUTTON 41 {@f2} {btn = f2;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {1} {80} {32895} {} {} {} "" {} {} {f2} {3}
#BUTTON 42 {@f3} {btn = f3;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {1} {159} {32895} {} {} {} "" {} {} {f3} {3}
#BUTTON 43 {@m1} {btn = m1;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {15} {1} {32895} {} {} {} "" {} {} {m1} {3}
#BUTTON 44 {@m2} {btn = m2;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {15} {80} {32895} {} {} {} "" {} {} {m2} {3}
#BUTTON 45 {@m3} {btn = m3;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {15} {159} {32895} {} {} {} "" {} {} {m3} {3}
#BUTTON 46 {@b1} {btn = b1;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {29} {1} {32895} {} {} {} "" {} {} {b1} {3}
#BUTTON 47 {@b2} {btn = b2;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {29} {80} {32895} {} {} {} "" {} {} {b2} {3}
#BUTTON 48 {@b3} {btn = b3;#if (@tmpMove = "") {tmpMove = @@btn;typeCom = 1} {#if (@typeCom=1) {position %word( @tmpMove, %numwords( @tmpMove)) @btn};#if (@typeCom=2) {cast 'cure critical' %eval( @@btn)};#if (@typeCom=3) {eject %eval( @@btn)};tmpMove = "";info}} {} {} {} {} {} {Size} {80} {15} {Pos} {29} {159} {32895} {} {} {} "" {} {} {b3} {3}
#BUTTON 49 {} {#PROMPT tmp "Invite whom?";invite @tmp} {} {} {} {} {WALK} {Size} {20} {20} {Pos} {1} {240} {} {} {} {} "" {} {Invite person...} {} {3}
#BUTTON 50 {} {group 'the adventurer in us shall not die'} {} {} {} {} {GROUP} {Size} {20} {20} {Pos} {20} {240} {} {} {} {} "" {} {Create default group} {} {3}
#BUTTON 51 {} {tmpMove = "Heal";typeCom = 2;#SHOW %ansi( white)"Click group member to heal..."} {} {} {} {} {HEART} {Size} {20} {20} {Pos} {1} {259} {} {} {} {} "" {} {Heal person} {} {3}
#BUTTON 53 {} {tmpMove = "Eject";typeCom = 3;#SHOW %ansi( white)"Click group member to eject..."} {} {} {} {} {RUNBACK} {Size} {20} {20} {Pos} {20} {259} {} {} {} {} "" {} {Eject person} {} {3}
#BUTTON 54 {} {tmpMove = "";typeCom = 0;#SHOW %ansi( white)"Cancelled group control command"} {} {} {} {} {EXCLAIM} {Size} {20} {20} {Pos} {1} {278} {} {} {} {} "" {} {Cancel group command} {} {3}
#BUTTON 55 {} {tmpMove = "";typeCom = 0;#yesno "Are you sure you wish to disband the group?" {disband} {};info} {} {} {} {} {PERSON} {Size} {20} {20} {Pos} {20} {278} {} {} {} {} "" {} {Disband the group} {} {3}
#CLASS 0
If you have any problems, don't ask me, I'm not a support centre. :roll:
Hope this helps. :lol: