시인의 퀴네


13

읽을 때 http://en.wikipedia.org/wiki/Rhyme_scheme 에서 하나 이상의 운율 체계를 가진 퀴네를 작성하십시오 . 다음과 같은 문자가 큰 소리로 말해집니다.

  • 주석에없는 영숫자 단어 또는 문자
  • 비교 및 산술 문자 (+ 더하기;-빼기; * 시간, /로 나눈 | 또는 | || 또는, & 및 && 및,! not, = 같음, == 같음, === 같음).

다음은 설명되지 않았다 (소리내어 말하지 않음).

  • 문자열 리터럴의 시작 또는 끝을 나타내는 모든 문자 ( " ');
  • 논리 블록의 시작 또는 끝을 나타내는 문자 (() {} []);
  • 변수, 함수 또는 코드 라인 (.,;)을 나타내는 모든 문자
  • 주석의 모든 문자;

"큰 소리로 말하기"규칙이 항상 적용됩니다. "소리내어 말하지 않음"규칙은 Brainfuck, K, J, APL, Befunge 및 Sclipting을 제외한 모든 언어에 적용됩니다. APL, Brainfuck, Befunge, K 및 J의 경우, "음성 규칙"에 언급되지 않은 모든 문자에는 위에서 설명한 "일관되게 선택"규칙이 적용됩니다. 자르는 문자는 한자 인 경우와 같이 발음되며 발음하는 발음을 자유롭게 선택할 수 있습니다.

발음을 명확하게 허용하거나 거부하지 않은 문자는 자유롭게 발음하거나 침묵 할 수 있습니다. 그러나 특정 문자는 항상 발음되거나 침묵을 유지합니다. 한 줄에서 #을 해시 태그로 발음하지 말고 다음 줄에서 # 침묵을 유지하십시오.

단어는 어떤 방언이나 언어로 발음 될 수 있지만 같은 스탠자 내에서 일관성이 있어야합니다 (첫 번째 단어는 스코틀랜드 방식으로 발음되고 두 번째 단어는 웨일스 어 방식으로 발음되지 않음).

콘테스트 유형은 인기 콘테스트입니다. 마감일은 4 월 23 일로 가장 유명한 바드 중 하나 인 윌리엄 셰익스피어 (William Shakespeare)가 그 날 태어나고 사망했다고합니다. 가장 많은 표를 얻은 사람이 승자입니다.

편집 : 더 이상 제출이 없을 것이라고 생각하기 때문에 대회를 조기에 끝내기로 결정했습니다. 승자를 잠시 표시하겠습니다.


2
+1, 잘 공식화되었습니다. 나는 당신이 특별한 경우로 Sclipting을 부르는 방법을 좋아합니다.
카야

답변:


9

배치 AABBA (리머 릭)

이것은 최선의 노력이지만시를 잘한 적은 없었습니다.

암호:

@Echo off || cd \.
If "this"=="a largeish" pot
Type %0 || chef
Color 7f
Goto :eof || shallot

영어로:

그렇지 않으면 CD 슬래시 도트
제거이 포트가 큰 냄비와 같은 경우
0을 입력하십시오. 요리사
색상 7 f
EOF로 이동 else shallot


1

포트란 95 (맥 캐런 커플 렛)

McCarron Couplet : "AABBABCCDDCDEEFFEF"는 학계 제임스 맥 캐런 (James McCarron)이 소개 한 고전적인 리듬 패턴을 현대적으로 표현한 것입니다.

내 코드 ( all.f95작동하려면 저장해야 함 ) :

character (LEN=100) :: &
bend; logical :: wondered
inquire(file="superstar &
&car",exist=wondered,number=i_r)

open(unit=100, &
file="superstar car")
if (.NOT.(.NOT.(wondered))) then
i_sum = 1; read(100,*) n

i_sum = n + i_sum
rewind(100); else; i_sum = 1
endif; write(100,*) i_sum, 10
codingThis = fun

write(bend,"(I5)") n; call &
SYSTEM ("copy all.f95 all"//&
TRIM(TRIM(ADJUSTL(bend)))//&

".f95"); open(access="append", &
unit=10,file="waterfall")
write(10,*) "foo bar"; end

그것은 시작하여 번호가 파일에 자신을 복사합니다 all0.f95다음 all1.f95,all2.f95 등 ...

읽는다 :

character len equals hundred
bend logical wondered
inquire file superstar
car exist wondered, number equals IR

open unit equals hundred
file equals superstar car
if not not wondered then
I sum equals one, read hundred N

I sum equals N plus I sum
rewind hundred else I sum equals one
endif write hundred I sum ten
conding this equals fun

write bend I five N call
system copy all F point ninety five all
trim trim adjust L bend

point ninety five access append
open unit ten file waterfall
write ten foo bar end
당사 사이트를 사용함과 동시에 당사의 쿠키 정책개인정보 보호정책을 읽고 이해하였음을 인정하는 것으로 간주합니다.
Licensed under cc by-sa 3.0 with attribution required.