| 上の例と同じアプローチをした例です。
//------- サンプルマクロ -------//
$orgStr="abcDeFあいAAAbbbうえお*+-/ABcd";
call CaseToLOWER $orgStr;
message $$return;
endmacro;
CaseToLOWER:
##s = strlen( $$1 );
while( ##s > 0 ){
##s = ##s - 1;
##code = ascii( midstr( $$1, ##s, 1 ) );
if( ##code > 64 && ##code < 91 ) ##code = ##code + 32;
$$str = char( ##code ) + $$str;
}
return $$str;
// ---------------------------- //
|
|
