// SPDX-License-Identifier: WTFPL // export INCLUDE=$WATCOM/h:$WATCOM/h/nt // wcl386 -bcl=nt MojiGene.c #include #include #include #define CRLF "\x0d\x0a" static int mojigene_ch(void) { if (rand() & 3) return 'a' + (rand() % 26); else return '0' + (rand() % 10); } static void mojigene(FILE *fp) { int i; for (i = 0; i < 300; i++) { fputc(mojigene_ch(), fp); if (!((i + 1) % 25)) fputs(CRLF, fp); else if (!((i + 1) % 5)) fputc(' ', fp); } } int main(int argc, char *argv[]) { FILE *fp; time_t t; t = time(NULL); srand(t); fp = fopen("MojiGene.txt", "wb"); if (fp != NULL) { fprintf(fp, "hr hr " CRLF); mojigene(fp); fprintf(fp, "" CRLF); fclose(fp); } return 0; }