pfxstyle1 archive for later

alias pfxstyle {
  if ($isid) return $iif($prop == pfx,$+(,$readini(pfxstyle.ini,prefix,$1),$1),$readini(pfxstyle.ini,prefix,$1))
  else {
    if (!$1) echo -qagc i * /pfxstyle: insufficient parameters
    else {
      var -s %S $iif($regex($1,/^-([buirc]+)$/),$regsubex($replace($regml(1),b,,u,,i,,r,,c,)),/ %P $left($iif(%S,$2,$1),1), %F $left($iif(%S,$3,$2),2)
      $iif(%P,writeini,remini) pfxstyle.ini prefix %P %S $+ $iif($round(%F,0) isnum,$base($v1,10,10,2),$color(normal).dd)
      echo -qagc i * Prefix %P color $iif(%P,set to $+(,$str($readini(pfxstyle.ini,prefix,%P,),removed)
    }
  }
}