New example filter

Author: MathIsFun0

filters/double_legendary.cl

@@ -0,0 +1,16 @@
+// Searches for a first shop buffoon pack with the four jokers that give increased mult to suits.
+#include "lib/immolate.cl"
+long filter(instance* inst) {
+    int score = 0;
+    for (int i = 1; i <= 2; i++) {
+        pack pack = pack_info(next_pack(inst, 1));
+        if (pack.type == Arcana_Pack || pack.type == Spectral_Pack) {
+            item cards[5];
+            (pack.type == Arcana_Pack ? arcana_pack(cards, pack.size, inst, 1) : spectral_pack(cards, pack.size, inst, 1));
+            for (int i = 0; i < pack.size; i++) {
+                if (cards[i] == The_Soul) score++;
+            }
+        };
+    }
+    return score;
+}

search.cl

@@ -1,8 +1,6 @@
-#include "filters/test.cl"
+#include "filters/double_legendary.cl"
 
 // Search
-// Note that when embedding the files into the C code, this part will have to be included after filter.cl is loaded.
-
 __kernel void search(char8 starting_seed, long num_seeds, long filter_cutoff) {
     seed _seed = s_new_c8(starting_seed);
     if (get_global_id(0) != 0) {