オートバッチゴルファー


25

整数以外のサポートがないにもかかわらず、機能的なコマンドが驚くほど不足しているにもかかわらず、私はBATCHが大好きです。どうして?これが機能するため:

SET var=SET
%var% i=0

これは次のように評価されます。

SET var=SET
SET i=0

素晴らしいですね。バイトを節約するため、この手法をBATCHプログラムで使用したことがあります。

あなたの挑戦は、もしあなたがそれを受け入れるなら、この方法でBATCHプログラムを「ゴルフ」することです。プログラムのSET一部に評価されるステートメントを含めることにより、入力BATCHプログラムのバイトサイズを減らし、他の方法でプログラムを変更することはできません。(たとえば、変数名をより短い名前に変更することはできません。変数の横にあるBATCHは大文字と小文字を区別しないことに注意してください。)スコアは次のように計算されます。

score = # of characters in your program + 5*(net result bytes in test cases below)

私は、テストケース用にプログラムを最適化する作業を阻止するために、テストケースを追加する権利を留保します。

この挑戦のために、あなたのSET文は、制御文字(含めることはできません|<>%)または改行を。setステートメント内でコードの一部を移動する以外にコードを変更することはできません。(されていることを、あなたは交換してください、不要な空白を削除しないことEQU==私たちは、行がで終わっていると仮定します、など)\n

テストケース

各テストケースは個別のコードブロックにあり、各テストケースは自己完結型です。つまり、その中に与えられた内容のみを想定してゴルフを行う必要があります。(SET d=SETつまり、あるプログラムを使用している場合、そのステートメントは他のプログラムに自動的に与えられません)。各テストケースの後に、各例の結果があります。テストケースの間には行があります。

@ECHO OFF
SETインクリメント= 10
:ループ
IF%increment%EQU 0 GOTO end
ECHO%increment%
SET / A%increment%-= 1
GOTOループ
:終わり
出口

@ECHO OFF
SET / p INPUT =ここに入力を入力:
SET R =%1
ECHO入力の最後の文字:%R:〜-1%

@ECHO OFF
SETインクリメント= 10
:e
GOTO f
エコーf
:f
GOTO g
エコーg
:g
後藤h
エコーh
:h
GOTO i
エコーi
:私
後藤j
エコーj
:j
IF 3 == 4(ECHO 4)ELSE(ECHO 5)
IF 5 == 3(GOTO l)ELSE(GOTO k)
:k
エコー完了。
エコーバッチアウト!!
出口
:l
GOTO g

ECHOこんにちは、こんにちは、こんにちは、こんにちは、こんにちは、こんにちは、こんにちは、こんにちは!、こんにちは、こんにちは!、Lello。

出力例:

@ECHO OFF
SETインクリメント= 10
:ループ
IF%increment%EQU 0 GOTO end
ECHO%increment%
SET / A%increment%-= 1
GOTOループ
:終わり
出口
(0バイト保存)

@ECHO OFF
SET%i%=ここに入力:
SET / p INPUT = Enter%i%
SET R =%1
ECHO%i %% Rの最後の文字:〜-1%
(3バイト獲得)

@ECHO OFF
SETインクリメント= 10
SET g = GOTO 
SET e = ECHO 
:e
%g%f
%e%f
:f
%g%g
%例えば
:g
%g%h
%e%h
:h
%g%i
%e%i
:私
%g%j
%e%j
:j
IF 3 == 4(%e%4)ELSE(%e%5)
IF 5 == 3(%g%l)ELSE(%g%k)
:k
%e%Done。
%e%BATCH OUT !!
出口
:l
%g%g
(10文字保存)

SET%h%= ello、
ECHO H%h%H%h%H%h%h%h%h%h%H%h%Hello!、h%h%ello!、Lello。
(1文字保存)


2
楽しさと利益のためにバッチを短縮します!
アレックスカールセン

さらにいくつかの仕様が必要です。もちろん、AAA %increment%set a=increment¶AAA %%a%%は無効で、AAA %1 BBB %2set a= BBB ¶AAA %1%a%%2は有効です。(iirc)したがって、それを形式化する必要があります。(改行を表す)
-user202729

遅延展開が有効になっているコード、パーセント記号エスケープ、またはfor / ifステートメントの複数行を処理する必要がありますか?最後のテストケース(エコーがオンであるため追加の出力が生成され、の@前にないSET)に従って、ゴルフプログラムからの外部出力は許容可能ですか?
Οurous

1
再びTcl
Ven

1
にも関わらず
アダム

回答:


4

ジャワ8、Java(登録商標)103884 795分の799プログラム+ 484出力= 4368 1279分の1283合計

このコードには2つの制限があります。

  • AからZまでの変数は自由であると想定しています。(大文字)
  • 置換は27個以下であると想定しています。
  • ああ、そしてScannerはそれをまったくカットしないので、空の入力はスタックトレースをダンプします。

しかし、ちょっと-プロがいます!

  • 最高のコードを出力します。常に。

このコードは、チャレンジ作成者が提供する例よりもパフォーマンスが優れています。

このゴルフバージョンはケビンによって作られました。

Java 8

c->{List<String>S=new Stack();HashMap<String,Integer>h=new HashMap(),s=new HashMap();int v=65,l=c.length(),b,e;do{for(b=0,l=c.length(),s.clear();b!=l;b++)for(e=b;++e<=l;)S.add(c.substring(b,e));S.removeIf(t->t.length()<5|t.matches(".*[\n|<%>].*"));S.forEach(t->h.merge(t,1,Integer::sum));S.clear();h.entrySet().removeIf(t->t.getValue()==1);String Y=c;int L=l;char V=(char)v;h.forEach((k,x)->{String i=Y,t;for(int j,I,q;i.contains(k);i=t+"%"+V+"%"+i.substring(j+k.length(),i.length())){for(I=-1,t=i.substring(q=0,j=i.indexOf(k));(I=t.indexOf("%",++I))>=0;q++);if(q%2>0)return;}i="SET "+V+"="+k+"\n"+i;if(i.length()<L)s.put(i,L-i.length());});h.clear();v++;c=s.isEmpty()?c:s.entrySet().stream().max((x,y)->x.getValue()>y.getValue()?1:-1).get().getKey();}while(l>c.length());return c;}

オンラインでお試しください!

Java 10

c->{var S=new Stack<String>();HashMap<String,Integer>h=new HashMap(),s=new HashMap();int v=65,l=c.length(),b,e;do{for(b=0,l=c.length(),s.clear();b!=l;b++)for(e=b;++e<=l;)S.add(c.substring(b,e));S.removeIf(t->t.length()<5|t.matches(".*[\n|<%>].*"));S.forEach(t->h.merge(t,1,(x,y)->x+y));S.clear();h.entrySet().removeIf(t->t.getValue()==1);var Y=c;int L=l;var V=(char)v;h.forEach((k,x)->{String i=Y,t;for(int j,I,q;i.contains(k);i=t+"%"+V+"%"+i.substring(j+k.length(),i.length())){for(I=-1,t=i.substring(q=0,j=i.indexOf(k));(I=t.indexOf("%",++I))>=0;q++);if(q%2>0)return;}i="SET "+V+"="+k+"\n"+i;if(i.length()<L)s.put(i,L-i.length());});h.clear();v++;c=s.isEmpty()?c:s.entrySet().stream().max((x,y)->x.getValue()>y.getValue()?1:-1).get().getKey();}while(l>c.length());return c;}

オンラインでお試しください!

元のバージョン

それはまったくゴルフではありません。ただ苦しむのではなく、ただ楽しみたいだけです。親愛なる読者がこの答えをゴルフにしたいなら、それをしてください。

import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.Scanner;
import java.util.function.BiConsumer;
import java.util.function.Consumer;
import java.util.function.Predicate;

public class Main {
	List<String> substrings = new ArrayList<String>();
	HashMap<String, Integer> hm = new HashMap<String, Integer>();
	HashMap<String, Integer> scores = new HashMap<String, Integer>();
	
	private int v1 = 65;
	
	public static String rfos(String inputString, String stringToReplace,
	        String stringToReplaceWith) {

	    int length = stringToReplace.length();
	    int inputLength = inputString.length();

	    int startingIndexofTheStringToReplace = inputString.indexOf(stringToReplace);

	    if(count(inputString.substring(0, startingIndexofTheStringToReplace), "%") % 2 == 1)
	    	return null;
	    
	    String finalString = inputString.substring(0, startingIndexofTheStringToReplace) + stringToReplaceWith
	            + inputString.substring(startingIndexofTheStringToReplace + length, inputLength);

	    return finalString;

	}
	
	public static int count(String text, String find) {
        int index = 0, count = 0, length = find.length();
        while( (index = text.indexOf(find, index)) != -1 ) {                
                index += length; count++;
        }
        return count;
	}
	
	private String process(String program) {
		int begin = 0, end, il = program.length();
		
		scores.clear();
		
		while(begin != program.length()) {
			for(end = begin + 1; end < program.length() + 1; end++)
				substrings.add(program.substring(begin, end));
			begin++;
		}
		
		substrings.removeIf(new Predicate<String>() {
			@Override
			public boolean test(String arg0) {
				return arg0.length() <= 4 || arg0.contains("\n")
						|| arg0.contains("|")
						|| arg0.contains("<")
						|| arg0.contains("%")
						|| arg0.contains(">");
			}
		});
		
		substrings.forEach(new Consumer<String>() {

			@Override
			public void accept(String t) {
				if(hm.containsKey(t)) {
					hm.replace(t, hm.get(t) + 1);
				} else {
					hm.put(t, 1);
				}
			}
			
		});
		
		substrings.clear();
		
		hm.entrySet().removeIf(new Predicate<Map.Entry<String, Integer>>() {

			@Override
			public boolean test(Map.Entry<String, Integer> t) {
				return t.getValue() == 1;
			}
			
		});
		
		hm.forEach(new BiConsumer<String, Integer>() {
			
			@Override
			public void accept(String arg0, Integer arg1) {
				String iteration = program;
				boolean between = false;
				while(iteration.contains(arg0)) {
					iteration = rfos(iteration, arg0, "%" + Character.toString((char) v1) + "%");
					if(iteration == null)
						return;
				}
				iteration = "SET " + Character.toString((char) v1) + "=" + arg0 + "\n" + iteration;
				if(iteration.length() < program.length())
					scores.put(iteration, program.length() - iteration.length());
			}
			
		});
		
		hm.clear();
		v1++;
		
		if(scores.isEmpty())
			return program;
		else
			return scores.entrySet().stream().max((entry1, entry2) -> entry1.getValue() > entry2.getValue() ? 1 : -1).get().getKey();
	}

	public static void main(String[] args) {
		Main processor = new Main();
		int genid = 0, before = 0, after = 0;
		String currentCode = new Scanner(System.in).useDelimiter("\\Z").next();
		
		System.out.println("Calculating first generation...");
		
		do {
			String cc = processor.process(currentCode);
			before = currentCode.length();
			after = cc.length();
			
			currentCode = cc;
			
			if(before > after) {
				System.out.println("Generation " + genid++);
				System.out.println(before + " -> " + after);
				System.out.println("***\n" + cc + "\n***");
			} else {
				System.out.println("Generation FAIL " + genid++);
				System.out.println(before + " -> " + after);
				System.out.println("***\n" + cc + "\n***");
			}
		} while(before > after);
		
		
	}

}

出力例:

SET B=GOTO 
SET A=ECHO 
@%A%OFF
SET increment=10
:e
%B%f
%A%f
:f
%B%g
%A%g
:g
%B%h
%A%h
:h
%B%i
%A%i
:i
%B%j
%A%j
:j
IF 3==4 ( %A%4 ) ELSE ( %A%5 )
IF 5==3 ( %B%l ) ELSE ( %B%k )
:k
%A%Done.
%A%BATCH OUT!!
EXIT
:l
%B%g

オンラインでお試しください!


それはすべて「java.util」だと思います。繰り返しです。あなたはコードをに単純化したいと思うかもしれませんimport java.util.*
A̲̲

jdkのインポートはカウントされないと思いましたか?
マークジェロニムス

@A_あなたが望むように私の答えを変更することができます(それが有効で精神を保持している場合を除く)
Krzysztof Szewczyk

1
あなたは、親愛なる読者は、ゴルフにこの回答をご希望の場合は、それをしてください799バイトのJava 8または795バイトのJava 10+で。どういたしまして。:)間違いなくもう少しゴルフができますが、今のところはこれで十分です。
ケビンクルーッセン

2
@KevinCruijssen貢献してくれてありがとう。あなたのバージョンを投稿に追加しました。より良いものを見つけたら私に尋ねることなく、それを自由に編集してください。
クシシュトフシェフチク
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.