alias upndown { var %d = 1,%e,%t | while (%d <= $len($1-)) { %t = $mid($1-,%d,1) | %e = %e $+ $iif($asc(%t) != 32,$iif(%t isalpha,$iif($right(%e,1) islower || (!%e),$upper(%t),$lower(%t)),%t),$chr(160)) | inc %d } | return $replace(%e,$chr(160),$chr(32)) }
make an on input event containing $upndown($1-)
i know the code is huge , but i only just put it together after reading this.