diff --git a/QUADRADOODLE.A b/QUADRADOODLE.A
new file mode 100644
index 0000000..f401cc5
--- /dev/null
+++ b/QUADRADOODLE.A
@@ -0,0 +1,10 @@
+10 HGR
+11 GOTO 15
+12 HPLOT 139,0 TO 139,191 TO 140,191 TO 140,0: HPLOT 0,95 TO 279,95 TO 279,96 TO 0,96
+15 A = 70:B = 48
+17 X =  RND (1) * 139:Y =  RND ( 1) * 95
+20  HPLOT A,B TO X,Y: HPLOT  - A + 280,B TO  - X + 280,Y: HPLOT A, - B + 192 TO X, - Y + 192 : HPLOT  - A + 280, - B + 192 TO  - X + 280, - Y + 192
+21  HCOLOR= 0: HPLOT A,B TO X,Y: HPLOT  - A + 280,B TO  - X + 280,Y: HPLOT A, - B + 192 TO X, - Y + 192: HPLOT  - A + 280, - B + 192 TO  - X + 280, - Y + 192
+23 H = H + 1: IF H = 8 THEN H = 0
+24  HCOLOR= 3
+25 A = X:B = Y: GOTO 17