problem in remove address from list all address is remove

hello i write this script on hotspot logout in hotspot profile but all ip in all list is remove ! :confused: …i need remove address from list on hotspot logout

:local "hotspot_address" $address;
:local fullList [/ip firewall address-list print as-value where list=A address=$address] ;
if ($fullList!="") do={
 :global a ($a+$m) ;
 /ip firewall address-list remove [/ip firewall address-list find address=$address list=A]  ;
 :log warning  ( "The Address remove from A : ". $address);
} else={
:local fullList [/ip firewall address-list print as-value where list=B address=$address] ;
if ($fullList!="") do={
 :global b ($b+$m) ;
 /ip firewall address-list remove [/ip firewall address-list find address=$address list=B]  ;
 :log warning  ( "The Address remove from B : ". $address);
} else={
:local fullList [/ip firewall address-list print as-value where list=C address=$address] ;
if ($fullList!="") do={
 :global c ($c+$m) ;
 /ip firewall address-list remove [/ip firewall address-list find address=$address list=C]  ;
 :log warning  ( "The Address remove from C : ". $address);
} else={
:local fullList [/ip firewall address-list print as-value where list=D address=$address] ;
if ($fullList!="") do={
 :global d ($d+$m) ;
 /ip firewall address-list remove [/ip firewall address-list find address=$address list=D]  ;
 :log warning  ( "The Address remove from D : ". $address);
} else={
:local fullList [/ip firewall address-list print as-value where list=E address=$address] ;
if ($fullList!="") do={
 :global e ($e+$m) ;
 /ip firewall address-list remove [/ip firewall address-list find address=$address list=E]  ;
 :log warning  ( "The Address remove from E : ". $address);
}
}
}
}
}