#PHP, (削除) 231 (削除ここまで)(削除) 226 (削除ここまで) 228 bytes
PHP, (削除) 231 (削除ここまで)(削除) 226 (削除ここまで) 228 bytes
for a start
<?preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Save to file, rund php <scriptpath> <text>. Escape newlines in the text to make it work in shell.
#PHP, (削除) 231 (削除ここまで)(削除) 226 (削除ここまで) 228 bytes
for a start
<?preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Save to file, rund php <scriptpath> <text>. Escape newlines in the text to make it work in shell.
PHP, (削除) 231 (削除ここまで)(削除) 226 (削除ここまで) 228 bytes
for a start
<?preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Save to file, rund php <scriptpath> <text>. Escape newlines in the text to make it work in shell.
- 14.9k
- 1
- 25
- 41
#PHP, (削除) 231 (削除ここまで) 226(削除) 226 (削除ここまで) 228 bytes
for a start
<?preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Rund withSave to file, rund php -r '<code>'<scriptpath> <text>. Escape newlines in the text to make it work in shell.
#PHP, (削除) 231 (削除ここまで) 226 bytes
for a start
preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Rund with php -r '<code>' <text>. Escape newlines in the text to make it work in shell.
#PHP, (削除) 231 (削除ここまで) (削除) 226 (削除ここまで) 228 bytes
for a start
<?preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Save to file, rund php <scriptpath> <text>. Escape newlines in the text to make it work in shell.
#PHP, (削除) 231 (削除ここまで) 226 bytes
for a start
preg_match_all("#([\w\*']+)([^\w\*']*)#i"#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>'']["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?'". '":(strpos(".$b",'" '")?'" '":''"");}echo'echo".';";
Rund with php -r '<code>' <text>. Escape newlines in the text to make it work in shell.
#PHP, (削除) 231 (削除ここまで) 226 bytes
for a start
preg_match_all("#([\w\*']+)([^\w\*']*)#i",$argv[1],$m,2);foreach($m as list($a,$b)){$e=strlen(strtr($a,["'"=>'']))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?'. ':(strpos(".$b",' ')?' ':'');}echo'.';
#PHP, (削除) 231 (削除ここまで) 226 bytes
for a start
preg_match_all("#([\w\*']+)([^\w\*']*)#",$argv[1],$m,2);foreach($m as list(,$a,$b)){$e=strlen(strtr($a,["'"=>""]))+$d;if(!$d=strstr($a,'*')?$e%2*10:0)echo chr($e+64),strpos(".$b","
")?". ":(strpos(".$b"," ")?" ":"");}echo".";
Rund with php -r '<code>' <text>. Escape newlines in the text to make it work in shell.