#ALIAS friends {#pick "Show_Friends" "Add_a_Friend" "Delete_a_Friend"}
#ALIAS Show_Friends {#show;#show;#show Our friends are listed after the place holder:   @gum_friends;#show}
#ALIAS Add_a_Friend {gum_temp=x;#prompt gum_temp "What name do you wish to add?";#IF ((@gum_temp = x) OR (%ismember(@gum_temp,@gum_friends))) {#show @gum_temp NOT added to list.  List remains <@gum_friends>} {gum_friends=%additem(%lower(@gum_temp),@gum_friends);#show %proper(@gum_temp) added to list.  Friends are <@gum_friends>}}
#ALIAS Delete_a_Friend {gum_temp=x;#prompt gum_temp "Who do you want to delete?";#IF (%ismember(%lower(@gum_temp),@gum_friends)) {gum_friends=%delitem(%lower(@gum_temp),@gum_friends);#show %proper(@gum_temp) deleted.  Remaining list is <@gum_friends>} {#show No friend by that name.  No one was deleted from the list.}}
#FUNC gum_slut1 {x}
#FUNC gum_slut2 {x}
#FUNC gum_slut3 {x}
#FUNC gum_slut4 {x}
#FUNC gum_friends {gum}
#TRIGGER {(%w) arrives.} {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#show %1 already a target.} {#IF (%ismember(%lower(%1),@gum_friends)) {#show %1 is on our list of friends.} {#IF (@gum_slut1 = "x") {gum_slut1=%lower(%1)} {#IF (@gum_slut2 = "x") {gum_slut2=%lower(%1)} {#IF (@gum_slut3 = "x") {gum_slut3=%lower(%1)} {gum_slut4=%lower(%1)}}}}}} {gum_arrive} 519
#TRIGGER {(%w) leaves (%w).} {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#IF (%lower(%1) = @gum_slut1) {gum_slut1=x};#IF (%lower(%1) = @gum_slut2) {gum_slut2=x};#IF (%lower(%1) = @gum_slut3) {gum_slut3=x};#IF (%lower(%1) = @gum_slut4) {gum_slut4=x}}} {gum_leave} 519
#TRIGGER {(%w) arrives sneaking.} {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#show %1 already a target.} {#IF (%ismember(%lower(%1),@gum_friends)) {#show %1 is on our list of friends.} {#IF (@gum_slut1 = "x") {gum_slut1=%lower(%1)} {#IF (@gum_slut2 = "x") {gum_slut2=%lower(%1)} {#IF (@gum_slut3 = "x") {gum_slut3=%lower(%1)} {gum_slut4=%lower(%1)}}}}}} {gum_arrive} 519
#TRIGGER {(%w) skulks in wearing Rebox Urbanites. } {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#show %1 already a target.} {#IF (%ismember(%lower(%1),@gum_friends)) {#show %1 is on our list of friends.} {#IF (@gum_slut1 = "x") {gum_slut1=%lower(%1)} {#IF (@gum_slut2 = "x") {gum_slut2=%lower(%1)} {#IF (@gum_slut3 = "x") {gum_slut3=%lower(%1)} {gum_slut4=%lower(%1)}}}}}} {gum_arrive} 519
#TRIGGER {(%w) skulks in wearing Rebox Urbanites sneaking. } {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#show %1 already a target.} {#IF (%ismember(%lower(%1),@gum_friends)) {#show %1 is on our list of friends.} {#IF (@gum_slut1 = "x") {gum_slut1=%lower(%1)} {#IF (@gum_slut2 = "x") {gum_slut2=%lower(%1)} {#IF (@gum_slut3 = "x") {gum_slut3=%lower(%1)} {gum_slut4=%lower(%1)}}}}}} {gum_arrive} 519
#TRIGGER {(%w) skulks off to the (%w).} {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#IF (%lower(%1) = @gum_slut1) {gum_slut1=x};#IF (%lower(%1) = @gum_slut2) {gum_slut2=x};#IF (%lower(%1) = @gum_slut3) {gum_slut3=x};#IF (%lower(%1) = @gum_slut4) {gum_slut4=x}}} {gum_leave} 519
#TRIGGER {(%w) sneaks (%w).} {#IF (((%lower(%1) = @gum_slut1) OR (%lower(%1) = @gum_slut2)) OR ((%lower(%1) = @gum_slut3) OR (%lower(%1) = @gum_slut4))) {#IF (%lower(%1) = @gum_slut1) {gum_slut1=x};#IF (%lower(%1) = @gum_slut2) {gum_slut2=x};#IF (%lower(%1) = @gum_slut3) {gum_slut3=x};#IF (%lower(%1) = @gum_slut4) {gum_slut4=x}}} {gum_leave} 519
#KEY CTRL-F5 {#IF (@gum_slut1 = "x") {gum_slut2=x;gum_slut3=x;gum_slut4=x} {gum_slut1=x}}
#KEY CTRL-F6 {#IF (@gum_slut2 = "x") {gum_slut1=x;gum_slut3=x;gum_slut4=x} {gum_slut2=x}}
#KEY CTRL-F7 {#IF (@gum_slut3 = "x") {gum_slut2=x;gum_slut1=x;gum_slut4=x} {gum_slut3=x}}
#KEY CTRL-F8 {#IF (@gum_slut4 = "x") {gum_slut2=x;gum_slut3=x;gum_slut1=x} {gum_slut4=x}}
#KEY F5 {vhack @gum_slut1}
#KEY F6 {vhack @gum_slut2}
#KEY F7 {vhack @gum_slut3}
#KEY F8 {vhack @gum_slut4}
#KEY F9 {vsteal from @gum_slut1}
#KEY F10 {vsteal from @gum_slut2}
#KEY F11 {vsteal from @gum_slut3}
#KEY F12 {vsteal from @gum_slut4}
#STATUS  F5/F9: @gum_slut1 . F6/F10: @gum_slut2 . F7/F11: @gum_slut3 . F8/F12: @gum_slut4 . . . CRTL+F5,F6,F7,F8 to reset a target, again to reset all targets   Type friends to edit friends