Tickle me!

Hi, you've reached my homepage. I am tickletickle. Please make me laugh, otherwise I'll get you.

I like sailing and playing the piano, although I am not very good at either.

  ~~~~~~~
  ~~~+~~~
  ~~/|\~~
  ~\___/~
  ~~~~~~~
  

I am also interested in gemini and in retro/fantasy computing. Ok, and making roguelikes (cauldron, tsrl). And writing obfuscated code.

Random stuff:

Botany

This is the plant I am trying to grow (if a tombstone is showing, it means that I forgot to water the plant).
    ______________
   /              \
  |                |
  |                |
  |     R.I.P.     |
  |                |
  |                |
  |                |
. |, _\/ .. \. \ /,|_ .
  ^      '        `    '

Burning code

                   main
                   ()        {
                    int n
            =        1280
             ,       i=n,  j=
                    23,v[i]    ;
                 unsigned s
          =     j;while(i>
      0    )v      [i--]=0      ;
          while(1) { for(i     =
     0    ;i<n;i++){s*= j;    int
      r=s%j;v[i]= i>>6==19?   63
    - r&63: v[i+64+r% 3-1]-r%8  ;
     v[i]=v[i ]<0?0 :v[i]; putchar (
      " .'`~*%@X"[v[i]/8]); if(i%64
    ==  63)putchar('\n');}usleep(
      n*j);printf("\x1b[20A");}}
          /* Burning code */

  

Bhaskara's lava lamp


                    char
                   s(char
                  a){int x
                 =a<0?-a:a;
                int z=x*(128
               -x);return a==
              -128? 0:a==-64?-
             127:a==64?127:(a<0
            ?-1:1)*512*z/(20480-
           z);}main(){int x,y;int
          o;while(1){for(y=0;y<20;
           y++){for(x=0;x<80;x++)
            {char v=s(o+x*8)+s(o
             +y*8)+s((o+x+y)*2)
              +s((o+x*x+y*y)/
            16);putchar (64+ v/
              16 ); }putchar(
              '\n');} usleep(
              20000);printf (
              "\x1b[20A");o++
         /* Bhaskara's lava lamp */
                    ;}}
  

Neural network

#include <stdio.h>
#define L o=scanf("%d:%f",&i,&t)
#define E float
#define A return
#define R int
#define N for

R o,s;E n,b,l(),a,t,T[1958];
E l(i){E t,*v;L;v=T+i;o==2?a
+=*v*t,b=l(),*v+=t*b:(b=a*s>
0?0:-s),s=i;A b;}main(m,i){if
(m>1){L;N(;o==1;){N(a=*T;2==
(L);m?T[i]=t:(a+=i[T]*t));m?
m=0:printf("%d\n",a>0?1:-1,a
);}}else{L;s=i;N(;o==1;a=*T,
*T+=l());putchar(1*9+5*8);N(
i=0723<<1;i^0;T[--i]?printf(
" %d:%f",i,i[T]):0);putchar(9
);}}

  

The Matrix

#define T "\x1b["
#define H 1999
#define e printf

int M,a,t,r,i,x                        [H+1]
 ;main(){                             for (a
    =0;a<=                           H;a++)x
   [a]= a <                         80?rand(
    )% 48:0;                       while(1){
    for(M=0;M                     <=H;M ++){
    if(M<80){a                   =x[M]=(M[x]
    +1)%48;a<24                 ?x[(a+1)*80+
    M]=( rand()&               63)*16|15:0;}
    else  {a=M[x]             &15;t=  a>7?(a
    -8)*   32:0;r=           a<8?(a   <<5) +
    31 :    255;e(T         "38;2"    ";%d;"
    "%d"     ";%dm%c"      ,t,r,      t,32+M
    [x]/      16);M %     80 ==       79?e(T
    "0m"       "\n"  T   "48;"        "2;0;"
    "32"        ";0m" ):7;a=a         ?a-1:a
    ;M[x         ]=(x[M]&240          )|a;}}
    e( T           "24A");          usleep (
    32 *
  H); }}
asciinema

Globe

#define p printf
#define w while

                       char *e="N(d"
                    "-*-b)(,,/8(--,*-("
                  "*9(**+2K*,(1+)8*)C()51"
                "(,1((G*(854*(*))(:=26(*((("
               "(<*(>.74(7D)*(58)1I)63(),(+*"
              ")(J+25-(0(I-5.4(()K11-6),)F/2."
             "((7*((G-4+)(6/F+6*:0D+S),(?)[(@("
             "x(u(@*,58-(02O1;(X*", t[1920];int
            u=0,v=0,s,r;float x,y,a;int main(){w
            (*e){ s=*e-39; w(s){ t[v++]="~#"[u&1
            ]; s--; } u++; e++; } s= -50; w(1) {
            for(y=1;y>-0.91;y-=8e-2){ for(x=-2;x
            <2;x+=5e-2){ a=x*x+y*y+64; r=32; if(
            a<64.8){ a=(144-sqrt(20736-a*320))/(
             2*a); u=(-(atan2(-a*8+9,a*x))/6.28
             )*80+s; v=(asin(a*y)+1.57)*7.63; r
              =t[u%80+(24-v)*80]; } p("%c",r);
               } p("\n"); } s++; p("\x1b[24A"
                 ); usleep(32000-1 *3+ 6);}}
                   /* around the world */
                     /* tickletickle */

Got time?

#include <stdio.h>
#include <time.h>
#include <math.h>
#include <unistd.h>
#include <stdlib.h>

#define C "\x1b["
#define l printf
#define o(a,b) l(C"%d;%dH#",a+1,b+1)
#define c 19
#define k cos
#define s .5235

             int x,y,i,v,a,b,d,f,w,e,g;
int main(){for(;;){time_t n=time(0);char*t=ctime(&n);
l(C"2J");l(C"5;13H%.*s %s",10,t,t+20);for(i=-3;i<9; i
++){x=     c*k(     i*s)+c;y=9     *k((     i-15)*s)+
9;o(y,x);  }for(i=  0;i<  3;i++){  v=atoi(  t+11+i*3)
;w =8+     i *4     ;float a=i     ?(v-     15)*.1047
:(v-3)  *s;x=w*  k(a)+c;  y=w*  k ( a -  1.5707)/2+9;
a=abs(     c-x)     ;b=x<c?1:-     1;d=     -abs(9-y)
;f=y<9?1:-1;e=a+d;while(x!=c||y!=9){o(y,x);g=2*e;if(g
>=d){e+=d;x+=b;}if(g<=a){e+=a;y+=f;}}}puts(C"20;1H");
                   usleep(1e5);}}