Il tuo obiettivo è scrivere un programma che non accetta input e genera il seguente testo:
ca e na ŋa va o sa;
þa ša ra la ła.
ma a pa fa ga ta ča;
în ja i da ða.
ar ħo ên ôn ân uħo;
carþ taŋ neŋ es nem.
elo cenvos.
Ma c'è un problema: per ogni lettera (qualsiasi personaggio la cui categoria generale in Unicode inizia con L) nella tua fonte, ricevi una penalità di 20 caratteri! (Per riferimento, il testo da stampare ha 81 lettere.)
Il codice Perl 6 di seguito ha 145 byte e 84 lettere, quindi ottiene un punteggio di 1.845:
say "ca e na ŋa va o sa;
þa ša ra la ła.
ma a pa fa ga ta ča;
în ja i da ða.
ar ħo ên ôn ân uħo;
carþ taŋ neŋ es nem.
elo cenvos."
Il codice seguente ha 152 byte e 70 lettere, quindi ottiene un punteggio di 1.552:
$_="C e N ŋa V o S;
Þ Š R L Ł.
M a P F G T Č;
în J i D Ð.
ar ħo ên ôn ân uħo;
Crþ Tŋ neŋ es nem.
elo cenvos.";s:g/<:Lu>/{$/.lc~'a'}/;.say
Sono vietate le scappatoie standard .
Inizialmente, ho pensato di vietare del tutto le lettere, ma non credo che ci siano molte lingue che lo rendono possibile. Sei più che benvenuto a provare.
(ŋarâþ crîþ [ˈŋaɹa̰θ kɹḭθ] è uno dei miei conlangs. Volevo capitalizzare il suo nome qui, ma qui ho il brutto big eng. Oh beh, la lingua non usa mai le lettere maiuscole nella sua romanizzazione comunque.)
Modifica: ho capito che una delle righe è sbagliata, ma la terrò dal momento che ci sono già delle risposte. La versione corretta della terza riga è ma a fa ga pa ta ča; a tua scelta, puoi scegliere di produrre invece il testo corretto.
as - o no, a seconda di quanti le lettere sarebbero necessarie, perché 20 caratteri sono una penalità molto grande (anche se quando tutto il resto è segnato da byte, non è del tutto ben definito ...)!