Hexagony , 218 92 58 55 바이트

주의 : 이 답변은 Etoplay 의 측면 길이 4 솔루션 으로 확고하게 구타되었습니다 .

)}?}.=(..]=}='.}.}~./%*..&.=&{.<......=|>(<..}!=...&@\[

최초의 비 사소한 (즉, 비선형) 헥사 고니 프로그램! Sp3000의 Labyrinth answer 와 동일한 제곱 요인 접근 방식을 기반으로합니다 . 크기 (10)의 육각 함께 시작한 후, 나는 그러나 크기 5로 그것을 아래로 압축 관리, 좀 중복 코드를 재사용 할 수 있었다 여전히 코드에없는 작전의 꽤 무리가있다, 그래서 크기도 4는 수도 단지 가능하다.

설명

코드를 이해하려면 먼저 코드를 펼치십시오. Hexagony는 임의의 소스 코드를 다음 중심이없는 육각형 숫자에 op-ops ( .)로 채 웁니다 61. 그런 다음 코드를 해당 크기의 일반 육각형으로 재 배열합니다.

     ) } ? } .
    = ( . . ] =
   } = ' . } . }
  ~ . / % * . . &
 . = & { . < . . .
  . . . = | > ( <
   . . } ! = . .
    . & @ \ [ .
     . . . . .

이것은 교차 및 겹치는 실행 경로와 다중 명령 포인터 (IP)로 상당히 무겁습니다. 작동 방식을 설명하기 위해 먼저 제어 흐름이 가장자리를 통과하지 않고 하나의 IP 만 사용되며 실행 경로가 가능한 간단한 ungolfed 버전을 살펴 보겠습니다.

             . . . . . . . . . . . . .
            . . . . . . . . . . . . . .
           . . . . . . . . . . . . . . .
          . . . . . . . . . . @ . . . . .
         . . . . . . . . . . ! . . . . . .
        . . . . . . . . . . % . . . . . . .
       . . . . . . . . . . ' . . . . . . . .
      . . . . . . . . . . & . . . . . . . . .
     . . . . . . . . . . { . . . . . . . . . .
    . . . . . . . . . . * . . . . . . . . . . .
   . . . . . . . . . . = . . . . . . . . . . . .
  . . . . . . . . . . } . . . . . . . . . . . . .
 ) } ? } = & { < . . & . . . . . . . . . . . . . .
  . . . . . . . > ( < . . . . . . . . . . . . . .
   . . . . . . = . . } . . . . . . . . . . . . .
    . . . . . } . . . = . . . . . . . . . . . .
     . . . . | . . . . | . . . . . . . . . . .
      . . . . * . . . ) . . . . . . . . . . .
       . . . . = . . & . . . . . . . . . . .
        . . . . > } < . . . . . . . . . . .
         . . . . . . . . . . . . . . . . .
          . . . . . . . . . . . . . . . .
           . . . . . . . . . . . . . . .
            . . . . . . . . . . . . . .
             . . . . . . . . . . . . .

^{참고 : 위의 코드는 첫 번째 줄을 실행하는 것으로 시작합니다. 그런 다음 IP가 북동쪽 가장자리에 닿으면 가장 왼쪽 모서리 ( ))로 랩핑되어 실제 코드가 시작됩니다.}

시작하기 전에 Hexagony의 메모리 레이아웃에 대한 단어. 그것은 스테로이드에 관한 Brainfuck의 테이프와 약간 같습니다. 실제로 테이프는 아니지만 6 각형 그리드 자체 (무한 한 개)이며 각 가장자리 에는 정수 값이 있으며 초기 값은 0입니다 (표준 Brainfuck과는 달리 임의의 정밀 정수로 표시됩니다). 이 프로그램에서는 4 가지 모서리를 사용합니다.

우리는 가장자리 A 에서 계승을 계산하고 가장자리 C에서 입력을 카운트 다운하고 가장자리 D 에 (모듈러스에 대한) 입력의 다른 사본을 저장 합니다. B 는 계산을위한 임시 에지로 사용됩니다.

메모리 포인터 (MP)는 가장자리 A 에서 시작하여 북쪽을 가리 킵니다 (MP를 움직일 때 중요 함). 다음은 코드의 첫 번째 비트입니다.

)}?}=&{

)에지 A 를 1계승의 기준으로 증가시킵니다 . }MP를 우회전, 즉 가장자리 C (북동쪽) 로 이동시킵니다 . 여기서 입력을 정수로 읽습니다 ?. 그런 다음을 사용하여 우회전 D 를 다시 우회전합니다 }. =MP가 C 와 공유 된 꼭짓점을 가리 키도록 MP를 반전시킵니다 . &복사의 값 C 로 (입력) D – 전류 값 (제로) 비 양성 때문에 값이 왼쪽에서 복사된다. 마지막으로, 우리는 MP가가로 다시 좌회전 걸리고 C 와 함께 {.

다음 <은 기술적으로는 분기이지만 현재 값이 양수이므로 IP는 항상으로 방향을 바꿉니다 >. 측면에서 분기 된 분기는 미러 역할을하므로 IP가 다시 수평으로 다시 이동 (하여 C 의 값이 감소합니다 .

다음 지점 <은 실제로 지점입니다. 이것이 n-1아래 에서 로 반복되는 방법 1입니다. C 의 현재 값 이 양수인 동안 IP는 우회전 (루프를 실행)합니다. 우리가 0을 누르면 대신 왼쪽으로 돌아갑니다.

루프 “body”를 보자. 은 |단순한 거울이다는을 >하고 <도 다시 거울로 사용된다. 이는 실제 루프 바디가

}=)&}=*}=

}에지로 이동 MP B , =정점 얼굴의 방향을 반전 ABC를 . )값을 증가시킵니다. 이는 첫 번째 반복에만 관련이 있으며 B 의 값 이 여전히 0 인 경우 : 다음 명령 &이 올바른 이웃, 즉 A를 복사하도록 양의 값을 유지하려고합니다 . 즉 계승의 현재 값 B 로 계산 .

}다음에 이동 MP A는 , =공통 정점을 향하도록 다시 역전. *두 이웃, 즉 모서리 B 와 C를 곱하고 결과를 A에 저장합니다 . 마지막으로, 우리는 여전히 정점 ABC를 향한 C}= 로 돌아갈 다른 것이 있습니다 .

나는이의 계승 계산 방법 당신이 볼 수 있기를 바랍니다 n-1에 을 .

이제 C 에서 루프 카운터 는 0입니다. 계승을 제곱 한 다음 입력 값으로 모듈로를 취하려고합니다. 이것이이 코드의 기능입니다.

&}=*{&'%!@

C 가 0 이므로 &왼쪽 이웃, 즉 A 의 계승을 복사합니다 . }=*이동하는 B 와의 요인 (즉, 정사각형)의 두 복사본의 생성물 저장 B를 . {다시 C 로 이동 하지만 MP를 반전시키지 않습니다. 현재 값이 양수이므로 D의& 입력 을 C 로 복사합니다 . MP 는 오른쪽으로, 즉 A로 거꾸로 됩니다 . 계승의 제곱은 B에 있고 입력은 C에 있음을 기억하십시오 . 그래서 계산 우리가 찾고있는 정확하게.'%(n-1)!^2 % n!결과를 정수 (0 또는 1)로 인쇄하고 @프로그램을 종료합니다.

알았어. 그러나 그것은 ungolfed 버전이었다. 골프 버전은 어떻습니까? Hexagony에 대해 두 가지 더 알아야합니다.

1. 가장자리가 감 깁니다. IP가 육각형의 모서리에 닿으면 반대쪽 모서리로 이동합니다. IP가 코너를 똑바로 칠 때 모호하므로 모퉁이를 타격하는 것도 브랜치 역할을합니다. 현재 값이 양수이면 IP가 그리드 가장자리로 오른쪽으로 이동하고, 그렇지 않으면 왼쪽으로 이동합니다.
2. 실제로 6 개의 IP가 있습니다. 그들 각각은 다른 모서리에서 시작하여 시계 방향으로 가장자리를 따라 움직입니다. 한 번에 하나만 활성화되므로 다른 5 개의 IP를 원하지 않으면 무시해도됩니다. 을 사용하여 다음 IP로 (시계 방향으로) ]이전 IP로 전환 할 수 있습니다 [. (으로 특정 항목을 선택할 수도 #있지만 다른 시간입니다.)

여기에는 몇 가지 새로운 명령이 있습니다. \그리고 /같은 미러 |이며 ~현재 값에을 곱합니다 -1.

그러면 ungolfed 버전은 어떻게 골프 버전으로 변환됩니까? 선형 설정 코드 )}?}=&{및 기본 루프 구조는 다음에서 찾을 수 있습니다.

        ) } ? } .  ->
       . . . . . .
      . . . . . . .
     . . . . . . . .
->  . = & { . < . . .
     . . . . . > ( <
      . . . . . . .
       . . . . . .
        . . . . .

이제 루프 바디가 가장자리를 몇 차례 교차하지만 가장 중요한 것은 실제 계산이 이전 IP (왼쪽 코너에서 시작하여 북동쪽으로 이동)로 전달됩니다.

        ) . . . .
       = . . . ] .
      } = . . } . .
     ~ . / . * . . .
    . . . . . . . . .
     . . . = . > ( <
      . . } . = . .
       . & . \ [ .
        . . . . .

지점을 남동쪽으로 튀어 =오른 후 IP는 가장자리를 따라 왼쪽 상단 모서리 의 두 개 (함께는 작동하지 않음)로 랩핑 한 다음을 튕 깁니다 /. 는 ~이후의 반복에 대한 중요 현재 값의 부호를 반전시킵니다. IP는 다시 같은 가장자리를 감싸고 [제어권이 다른 IP로 넘어가는 지점에 도달합니다.

이것은 이제 ~}=)&}=*}부정을 취소 한 다음 ungolfed 루프 본문 (마이너스 =)을 실행합니다 . 마지막으로 ]어느 손이 원래의 IP로 제어되는지 확인합니다. (다음 번에이 IP를 실행하면 중단 된 지점부터 시작하여 먼저 모퉁이에 도달합니다. IP가 북서쪽 가장자리로 되돌아 가려면 현재 값이 음수 여야합니다. 남동쪽 대신.)

원래의 IP 제어를 재개되면,이 튕겨 \나머지 실행 =하고 안타 >다음 루프 반복에 피드.

이제 정말 미친 부분 : 루프가 종료되면 어떻게됩니까?

        ) . . . .
       . ( . . ] =
      . . ' . } . }
     . . . % * . . &
    . . . . . . . . .
     . . . = | . . <
      . . } ! . . .
       . & @ . . .
        . . . . .

IP는 북동쪽으로 이동 <하고 북동 대각선으로 둘러싸입니다. 따라서 루프 본문 ( &}=*}]) 과 동일한 실행 경로로 끝납니다 . 적어도 현재 다른 코드를 추가하면 =}( }=}이와 같기 때문에 ) 이 시점에서 실행하려는 코드이기 때문에 실제로 매우 멋집니다 {. 그러나 이것이 어떻게 실제로 이전 루프로 다시 들어 가지 않습니까? 때문에 ]지금 남쪽에서 서쪽으로 이동, 오른쪽 상단에있는 시작 (지금까지 사용되지 않은) IP를 다음 IP 변경. 거기에서 IP는 가장자리를 따라 계속되고 왼쪽 상단 모서리로 감싸고 대각선 아래로 이동하고 튀어 나와 마지막 비트의 선형 코드를 실행하는 동안 |종료됩니다 @.

=}&)('%!@

( )(물론 (이것은 당연한 일 )입니다. 이미 추가 했기 때문에 추가해야 했습니다.)

휴 … 무슨 엉망 …

답변

}QPQ

^(?!(..+)\1+$)..

qimp

@document [ <url> | url-prefix(<string>) | domain(<string>) | regexp(<string>) ]# {
  <group-rule-body>
}

<div id=q><p id=r>1<p id=s>0</div><form method=GET action=#q>

<input type=checkbox name=i>

<input name=d value=d type=submit>

#q,#s,#q:target{display:none}#q:target{display:block}@-moz-document regexp(".*\\?((i=on&)?|(((i=on&)(i=on&)+?)\\4+))d=d#q$"){#s{display:block}#r{display:none}}