diff --git a/MATWEET b/MATWEET
new file mode 100644
index 0000000..de1b30f
--- /dev/null
+++ b/MATWEET
@@ -0,0 +1,5 @@
+1POKE 35,25:DIM K(3,2):C=-1:A=0
+2C=(C+1)-INT((C+1)/3)*3:R=INT(RND(1)*A):IF C=2 THEN A=20
+3IF R=0 THEN K(C,0)=INT(RND(1)*40)+1:K(C,1)=0:K(C,2)=INT(RND(1)*2):GOTO2
+4K(C,1)=K(C,1)+1:IF K(C,1)<25THEN HTAB K(C,0):VTAB K(C,1):PRINT CHR$(INT(RND(1)*96*K(C,2)+32));
+5GOTO2