Mercurial > repo

annotate src/orenbow.c @ 12500:e48c08805365 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<b_jonas> ` learn \'The password of the month is Cthulhuquagdonic Mothraquagdonic Narwhalicorn.\' # https://logs.esolangs.org/libera-esolangs/2024-04.html#lKE Infinite craft
author HackEso <hackeso@esolangs.org>
date Wed, 01 May 2024 06:39:10 +0000
parents fc9a99a826d3
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8711
15f6dc59410a <oerjan> ` cp orenbow.c src
HackBot
parents:
diff changeset
1 #include <stdio.h>
8732
fc9a99a826d3 <\oren\> ` sed -e \'s/e\\[/\\\\e\\[/\' -i src/orenbow.c
HackBot
parents: 8731
diff changeset
2 int main(){printf("\e[1m");int a,c=0;b:a=getchar();if(a==EOF)return 0;if(!(a&128)||(a&64))printf("\e[%dm","\37! $\"#"[c]),c=c+1-6*(c>4);putchar(a);goto b;}