#IF (%ismember(AllyManager,@czd_scripts)) {#IF (%remove(.,%item(@czd_scripts,%ismember(AllyManager,@czd_scripts)+1))=%remove(.,2.0)) {#VA czd_scripts %replace(@czd_scripts,AllyManager|%item(@czd_scripts,%ismember(AllyManager,@czd_scripts)+1),AllyManager|2.1);#ALIAS ally {#IF (%%%1 = restore) {#t- ally-manager;#t- ffa-manager;#t- ffa-allies;#t+ allies;unally all;unenemy all;#IF (@allylist) {#LOOP 1,%%%if(%%%numitems(@allylist)>20,20,%%%numitems(@allylist)) {ally %%%item(@allylist,%%%i)}};#IF (@enemylist) {#LOOP 1,%%%if(%%%numitems(@enemylist)>20,20,%%%numitems(@enemylist)) {enemy %%%item(@enemylist,%%%i)}};#t+ ally-manager} {#IF (%%%ismember(%%%proper(%%%1),@enemylist)) {unenemy %%%1};#VA temp {%%%proper(%%%1)};#IF (%%%2 & (%%%2 = end)) {#IF ((%%%ismember( %%%proper( %%%1), @allylist)) & (%%%ismember( %%%proper( %%%1), @allylist) < 21) & (%%%numitems( @allylist) > 20)) {unally %%%1};#IF ((%%%numitems( @allylist) < 20) & (%%%ismember( %%%proper( %%%1), @allylist) < 1)) {#t- ally-manager;ally %%%1;#t+ ally-manager};#VAR allylist %%%additem( %%%proper( %%%1), %%%delitem( %%%proper( %%%1), @allylist));#EC {%%%proper( %%%1) moved to end of %%%if( %%%numitems( @allylist)>20, standby, active) allies list.}} {#t- ally-manager;#IF (%%%numitems(@allylist) > 19) {#IF (!%%%ismember(%%%proper(%%%1),@allylist) | %%%ismember(%%%proper(%%%1),@allylist) > 20) {unally %%%item(@allylist,20);#EC %%%item(@allylist,20) forced into standby allies list.}};#IF (!%%%ismember(%%%proper(%%%1),@allylist) | %%%ismember(%%%proper(%%%1),@allylist) > 20) {ally %%%1} {#EC %%%proper(%%%1) moved to head of allies list.};#var allylist {%%%dups(%%%additem(@allylist,@temp))};#t+ ally-manager}}} "ally-manager";#ALIAS enemy {#IF (%%%1 = restore) {#t- ally-manager;#t- ffa-manager;#t- ffa-allies;#t+ allies;unally all;unenemy all;#IF (@allylist) {#LOOP 1,%%%if(%%%numitems(@allylist)>20,20,%%%numitems(@allylist)) {ally %%%item(@allylist,%%%i)}};#IF (@enemylist) {#LOOP 1,%%%if(%%%numitems(@enemylist)>20,20,%%%numitems(@enemylist)) {enemy %%%item(@enemylist,%%%i)}};#t+ ally-manager} {#IF (%%%ismember(%%%proper(%%%1),@allylist)) {unally %%%1};#VA temp {%%%proper(%%%1)};#IF (%%%2 & (%%%2 = end)) {#IF ((%%%ismember( %%%proper( %%%1), @enemylist)) & (%%%ismember( %%%proper( %%%1), @enemylist) < 21) & (%%%numitems( @enemylist) > 20)) {unenemy %%%1};#IF ((%%%numitems( @enemylist) < 20) & (%%%ismember( %%%proper( %%%1), @enemylist) < 1)) {#t- ally-manager;enemy %%%1;#t+ ally-manager};#VAR enemylist %%%additem( %%%proper( %%%1), %%%delitem( %%%proper( %%%1), @enemylist));#EC {%%%proper( %%%1) moved to end of %%%if( %%%numitems( @enemylist)>20, standby, active) enemies list.}} {#t- ally-manager;#IF (%%%numitems(@enemylist) > 19) {#IF (!%%%ismember(%%%proper(%%%1),@enemylist) | %%%ismember(%%%proper(%%%1),@enemylist) > 20) {unenemy %%%item(@enemylist,20);#EC %%%item(@enemylist,20) forced into standby enemies list.}};#IF (!%%%ismember(%%%proper(%%%1),@enemylist) | %%%ismember(%%%proper(%%%1),@enemylist) > 20) {enemy %%%1} {#EC %%%proper(%%%1) moved to head of enemies list.};#var enemylist {%%%dups(%%%additem(@enemylist,@temp))};#t+ ally-manager}}} "ally-manager";#EC AllyManager successfully upgraded to v2.1} {#EC Cannot upgrade to v2.1. You currently have v%item(@czd_scripts,%ismember(AllyManager,@czd_scripts)+1)}} {#EC I cannot detect any previous versions of AllyManager on your system.;#EC Upgrade aborted.}

    Source: geocities.com/southbeach/marina/4190/achaea/downloads

               ( geocities.com/southbeach/marina/4190/achaea)                   ( geocities.com/southbeach/marina/4190)                   ( geocities.com/southbeach/marina)                   ( geocities.com/southbeach)