alias Writeini2 {
if (!$regex(ini,$1-,^(?|(-\S*)+ |())(?|"([^"])"|([^ ])) (\S+) (\S+) (.+)$)) {
echo -sc info * /writeini2: Invalid parameters
halt
}
else {
!writeini $regml(ini,1) $qt($regml(ini,2)) $regsubex($regml(ini,3),/([\\\[\]])/g,\x $+ $base($asc(\t),10,16,2)) $regml(ini,4) $regml(ini,5)
}
}
alias readini2 {
if ($0 == 3) var %s, %i = $3, %t = $regsubex($2,/\\x([0-9a-f])/gi,$chr($base(\t,16,10)))
else var %s = $2, %i = $4, %t = $regsubex($3,/\\x([0-9a-f])/gi,$chr($base(\t,16,10)))
return $readini($1,%s,%i,%t)
}