the caturday's really big commit

code/Basic/yabasic-2.bas

@@ -1,5 +1,5 @@
         open window 511,511
         for x=10 to 495 step 5:for y=10 to 495 step 5
                 colour x/2,y/2,0
-                fill rectangle x,y,x+5,y+5
+                fill rectangle x+1,y+1,x+4,y+4
         next y:next x

code/OSC/listen-osc.c

@@ -3,20 +3,18 @@
 #include  <stdio.h>
 #include  <unistd.h>
 #include  <stdlib.h>
-
 #include  <lo/lo.h>
-
 #define LOCAL_PORT	"9000"
 
-/* ----------------------------------------------------------------- */
+/* ------------------------------------------------------- */
 void error(int num, const char *msg, const char *path)
 {
-fprintf(stderr, "liblo server error %d in path %s : %s\n", num, path, msg);
+fprintf(stderr, "liblo server error %d in path %s : %s\n",
+					num, path, msg);
 exit(1);
 }
-/* ----------------------------------------------------------------- */
-
-int handler(const char *path, const char *types, lo_arg ** argv,
+/* ------------------------------------------------------- */
+int handler(const char *path, const char *types, lo_arg **argv,
                 int argc, void *data, void *udata)
 {
 static int	event_number = 1;
@@ -29,14 +27,10 @@ printf("\tdata      %p\n", data);
 // if (NULL!=data) printf("\t >%s<\n", data);
 printf("\tudata     %p\n", udata);
 if (NULL!=udata) printf("\t\t>%s<\n", (char *)udata);
-
 return 0;
 }
-
-/* ----------------------------------------------------------------- */
-
+/* ------------------------------------------------------- */
 char signature[] = "Bourtoulots";
-
 int main(int argc, char *argv[])
 {
 lo_server_thread st;

code/OSC/send-osc.c

@@ -12,7 +12,6 @@ lo_address	loana;
 int		foo;
 
 fprintf(stderr, "sending to %s:%s\n", REMOTE_HOST, REMOTE_PORT);
-
 loana = lo_address_new(REMOTE_HOST, REMOTE_PORT);
 foo = lo_send(loana, "/demo", "is", 61, "meg, efface !");
 fprintf(stderr, "got a %d return code ?\n", foo);

code/POV/.gitignore

@@ -0,0 +1 @@
+*.png

code/POV/Makefile

@@ -0,0 +1,3 @@
+
+hello.png:	hello.pov Makefile
+	povray -I$< -o$@ -W640 -H0 -Q0

code/POV/hello.pov

@@ -0,0 +1,8 @@
+/* HELLO.POV */
+#version 3.7;
+global_settings { assumed_gamma 1.0 }
+#include "colors.inc"
+
+plane          { y, 0 }
+sphere         { <0, 0.50, 0>, 0.333 }
+light_source   { <-210, 350, -530>  color rgb <1, 1, 1>}

code/Perl/README.md

@@ -0,0 +1,3 @@
+# Perl
+
+The famous **Pathologic Eclectic Rubish Lister was here** !!!

code/bdd/mkgdbm.pl

@@ -0,0 +1,20 @@
+#!/usr/bin/perl  -w
+
+use strict;
+use GDBM_File;
+my $nomdb = "exemple.gdbm";
+my (%DB, @champs);
+my ($user, $gecos);
+open(SOURCE, "< /etc/passwd") or die "source $!";
+tie(%DB, "GDBM_File", $nomdb, GDBM_WRCREAT, 0666) or die "gdbm $!";
+
+while (<SOURCE>) {
+    @champs = split ":", $_;
+    $user = $champs[0]."\0";
+    $gecos = $champs[4]."\0";
+    $DB{$user} = $gecos;
+    }
+
+untie %DB;
+close SOURCE;
+0;

code/inet/README.md

@@ -0,0 +1,5 @@
+# Internet protocols
+
+## Finger
+
+Show us the [code](finger.md) !

code/inet/finger.md

@@ -0,0 +1,7 @@
+# Finger
+
+Sur le port 79/tcp.
+
+[https://tools.ietf.org/html/rfc1288](https://tools.ietf.org/html/rfc1288)
+
+[https://www.bortzmeyer.org/1288.html](https://www.bortzmeyer.org/1288.html)

code/inet/plopserver.c

@@ -0,0 +1,4 @@
+#include <stdio.h>
+
+int main(int argc, char *argv[])
+{ puts("plop"); return 0 }

code/inet/plopserver.md

@@ -0,0 +1,2 @@
+# Plop serveur
+

code/inet/qotd.sh

@@ -0,0 +1,3 @@
+#!/bin/bash
+
+/usr/games/fortune -a -n 500

code/roff/README.md

@@ -0,0 +1,2 @@
+# La famille des roffs
+

code/shell/demofonctions.sh

@@ -1,3 +1,3 @@
 #!/bin/sh
-. ./fonctions.sh
+source ./fonctions.sh
 message "hello world"