Quina poety

13

Napisz czytać z 1 lub więcej schematem wierszy z http://en.wikipedia.org/wiki/Rhyme_scheme podczas czytania. Następujące znaki są wypowiadane na głos:

  • wszelkie alfanumeryczne słowa lub znaki, których nie ma w komentarzu;
  • znaki porównania i arytmetyczne (+ plus; - minus; * razy, / podzielone przez, | lub, || lub, i oraz && i,! nie, = równa się, == równa się, === równa się).

Następujące elementy nie są uwzględniane (nie są wypowiadane na głos):

  • dowolne znaki, które oznaczają początek lub koniec literałów łańcuchowych („”);
  • dowolne znaki, które oznaczają początek lub koniec bloków logicznych (() {} []);
  • dowolne znaki oznaczające wyznaczenie zmiennej, funkcji lub linii kodu (.,;).
  • dowolne znaki w komentarzach;

Zawsze obowiązują zasady „mówione na głos”. zasady „nie mówione na głos” dotyczą wszystkich języków, z wyjątkiem Brainfuck, K, J, APL, Befunge i Sclipting. W przypadku APL, Brainfuck, Befunge, K i J każda postać niewymieniona w „zasadach mówionych na głos” podlega regule „konsekwentnie wybieraj” opisanej powyżej. Znaki przewijane są wymawiane tak, jakby były tą chińską postacią, z wolnym wyborem używanej wymowy.

Wszelkie znaki, które nie są wyraźnie dozwolone lub odmawia się wymowy, można wymawiać lub milczeć. Jednak konkretna postać jest zawsze wymawiana lub milcząca. Nie możesz wymawiać # jako hashtag w jednym wierszu i milczeć w następnym.

Słowa mogą być wymawiane w dowolnym dialekcie lub języku, ale muszą być spójne w obrębie tej samej zwrotki (bez pierwszego słowa wymawianego w języku szkockim, a drugiego w języku walijskim).

Rodzaj konkursu to konkurs popularności. Termin upływa 23 kwietnia na cześć jednego z najbardziej znanych bardów, Williama Szekspira, który urodził się i rzekomo zmarł tego dnia. Zwycięzcą jest ten, kto dostaje najwięcej głosów.

Edycja: ponieważ nie sądzę, że będzie więcej zgłoszeń, postanowiłem zakończyć konkurs wcześniej. Za chwilę zaznaczę zwycięzcę.

Nzall
źródło
2
+1, dobrze sformułowane. Podoba mi się, jak nazwałeś Sclipting jako specjalny przypadek.
Kaya

Odpowiedzi:

9

Partia AABBA (Limerick)

To moja najlepsza próba, ale nigdy nie byłem dobry w wierszach.

Kod:

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

Po angielsku:

Echo off else CD slash dot
Jeśli to równa się dużej doniczce
Wpisz zero inny szef kuchni
Kolor siedem f
Idź do EOF inaczej szalotka

kitcar2000
źródło
1

Fortran 95 (McCarron Couplet)

McCarron Couplet: „AABBABCCDDCDEEFFEF” to współczesne podejście do klasycznego rymowania, wprowadzone przez akademickiego Jamesa McCarrona.

Mój kod (który należy zapisać tak all.f95, aby działał):

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

Będzie on kopiuje się do numerowanych plików, zaczynając all0.f95, a następnie all1.f95, all2.f95i tak dalej ...

Czyta:

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
gilbertohasnofb
źródło