annotate src/pikhqbow.c @ 12508:335a2a849232 draft default tip

<wib_jonas> `` f=/hackenv/bin/dateu; >$f echo $\'#!/bin/bash\\nset -e\\nif (( 1 < $# )); then echo "dateu error: too many command-line arguments. Usage: dateu datetimestring"; exit 2; fi\\nexec date -u ${1:+-d "$1"} "+%Y-%m-%d %H:%M:%S.%3N %z %Z %B %-e %A %G-W%V-%u"\'; chmod a+x "$f"
author HackEso <hackeso@esolangs.org>
date Wed, 03 Jul 2024 18:15:24 +0100
parents 6e805f2a05d3
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8738
a9adae96ab7a <pikhq> ` cat >src/pikhqbow.c <<<$\'#include <stdio.h>\\n\'\'#include <wchar.h>\\n\'\'int main(){wint_t c;int a=2;b:c=fgetwc(stdin);if(c==EOF) return 0;printf("\\x03%02d%s%lc",a,c==L\',\'?",99":"",c);a++;if(a==14)a=2;goto b;}\'
HackBot
parents: 8737
diff changeset
1 #include <stdio.h>
8741
281c61d63444 <pikhq> ` cat >src/pikhqbow.c <<<$\'#include <stdio.h>\\n#include <wchar.h>\\n\'\'int main(){wint_t c;int a=2;b:c=fgetwc(stdin);if(c==EOF) return 0;printf("\\x03%02d%s%lc",a,c==L\'\\\'\',\'\\\'\'?",99":"",c);a++;if(a==14)a=2;goto b;}\'
HackBot
parents: 8740
diff changeset
2 #include <wchar.h>
8743
080039703b36 <pikhq> ` cat >src/pikhqbow.c <<<$\'#include <stdio.h>\\n#include <wchar.h>\\n#include <locale.h>\\n\'\'int main(){wint_t c;int a=0;setlocale(LC_ALL,"C.UTF-8");b:c=fgetwc(stdin);if(c==EOF) return 0;printf("\\x03%d%lc%s",(int[]){4,8,9,11,12,13}[a],c,c==L\'\\\'\',\'\\\'\'?"\\x0f":"",c);if(a++==6)a=0;goto b;}\'
HackBot
parents: 8741
diff changeset
3 #include <locale.h>
8745
6e805f2a05d3 <pikhq> ` cat >src/pikhqbow.c <<<$\'#include <stdio.h>\\n#include <wchar.h>\\n#include <locale.h>\\n\'\'int main(){wint_t c;int a=0;setlocale(LC_ALL,"C.UTF-8");b:c=fgetwc(stdin);if(c==EOF) return 0;printf("\\x03%d%lc%s",(int[]){4,8,9,11,12,13}[a],c,c==L\'\\\'\',\'\\\'\'?"\\x0f":"",c);if(++a==6)a=0;goto b;}\'
HackBot
parents: 8743
diff changeset
4 int main(){wint_t c;int a=0;setlocale(LC_ALL,"C.UTF-8");b:c=fgetwc(stdin);if(c==EOF) return 0;printf("\x03%d%lc%s",(int[]){4,8,9,11,12,13}[a],c,c==L','?"\x0f":"",c);if(++a==6)a=0;goto b;}