add queer pride flag drawer, 72 bytes

queerflag.tal

@@ -0,0 +1,31 @@
+( a blank file )
+
+%RTN { JMP2r }
+( devices )
+
+|00 @System     [ &vector $2 &wst      $1 &rst    $1 &pad   $4 &r      $2 &g      $2 &b    $2 &debug  $1 &halt $1 ]
+|10 @Console    [ &vector $2 &read     $1 &pad    $5 &write $1 &error  $1 ]
+|20 @Screen     [ &vector $2 &width    $2 &height $2 &auto $1 &pad $1 &x      $2 &y      $2 &addr $2 &pixel  $1 &sprite $1 ]
+
+|0000
+
+$8
+@p $2
+
+|0100 ( -> )
+    #cf00 .System/r DEO2
+    #6f90 .System/g DEO2
+    #ff20 .System/b DEO2
+    #0028 .Screen/width DEO2
+    #0018 .Screen/height DEO2
+    ;draw .Screen/vector DEO2
+BRK
+
+@draw
+    .p LDZ2 DUP2 .Screen/x DEO2
+    #0008 .Screen/y DEO2
+    #06 .Screen/sprite DEO
+    #0010 .Screen/y DEO2 
+    #08 .Screen/sprite DEO
+    #0001 ADD2 .p STZ2
+BRK