redscript-mc 1.2.9 → 1.2.11

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_for_loop.mcfunction

@@ -0,0 +1,4 @@
+# block: entry
+scoreboard players set $sum rs 0
+scoreboard players set $i rs 1
+function test_control_flow:test_for_loop/for_check_0

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_at/foreach_0.mcfunction

@@ -0,0 +1,2 @@
+# block: entry
+particle minecraft:heart ~ ~ ~ 0 0 0 0 1

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_at.mcfunction

@@ -0,0 +1,5 @@
+# block: entry
+summon minecraft:marker ~ ~1 ~ {Tags:["pos_test"]}
+execute as @e[type=minecraft:marker,tag=pos_test] at @s run function test_control_flow:test_foreach_at/foreach_0
+say [PASS] foreach at @s: executed at entity position
+kill @e[type=marker,tag=pos_test]

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_selector/else_1.mcfunction

@@ -0,0 +1,3 @@
+# block: else_1
+say [INFO] foreach selector: found markers (count varies)
+function test_control_flow:test_foreach_selector/merge_2

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_selector/foreach_0.mcfunction

@@ -0,0 +1,4 @@
+# block: entry
+scoreboard players operation $_23 rs = $marker_count rs
+scoreboard players operation $_23 rs += $const_1 rs
+scoreboard players operation $marker_count rs = $_23 rs

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_selector/merge_2.mcfunction

@@ -0,0 +1,2 @@
+# block: merge_2
+kill @e[type=marker,tag=test_marker]

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_selector/then_0.mcfunction

@@ -0,0 +1,3 @@
+# block: then_0
+say [PASS] foreach selector: found 3 markers
+function test_control_flow:test_foreach_selector/merge_2

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_foreach_selector.mcfunction

@@ -0,0 +1,11 @@
+# block: entry
+say [INFO] foreach selector test - spawning markers
+summon minecraft:marker ~ ~ ~ {Tags:["test_marker"]}
+summon minecraft:marker ~ ~ ~ {Tags:["test_marker"]}
+summon minecraft:marker ~ ~ ~ {Tags:["test_marker"]}
+scoreboard players set $marker_count rs 0
+execute as @e[type=minecraft:marker,tag=test_marker] run function test_control_flow:test_foreach_selector/foreach_0
+scoreboard players set $_24 rs 0
+execute if score $const_0 rs = $const_3 rs run scoreboard players set $_24 rs 1
+execute if score $_24 rs matches 1.. run function test_control_flow:test_foreach_selector/then_0
+execute if score $_24 rs matches ..0 run function test_control_flow:test_foreach_selector/else_1

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/else_1.mcfunction

@@ -0,0 +1,3 @@
+# block: else_1
+say [FAIL] if: x > 5 should be true
+function test_control_flow:test_if_else/merge_2

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/else_13.mcfunction

@@ -0,0 +1,5 @@
+# block: else_13
+scoreboard players set $_5 rs 0
+execute if score $y rs < $const_75 rs run scoreboard players set $_5 rs 1
+execute if score $_5 rs matches 1.. run function test_control_flow:test_if_else/then_15
+execute if score $_5 rs matches ..0 run function test_control_flow:test_if_else/else_16

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/else_16.mcfunction

@@ -0,0 +1,3 @@
+# block: else_16
+say [FAIL] else-if: should not reach final else
+function test_control_flow:test_if_else/merge_17

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/else_4.mcfunction

@@ -0,0 +1,3 @@
+# block: else_4
+say [PASS] else: x < 5 correctly went to else
+function test_control_flow:test_if_else/merge_5

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/merge_11.mcfunction

@@ -0,0 +1,2 @@
+# block: merge_11
+function test_control_flow:test_if_else/merge_8

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/merge_14.mcfunction

@@ -0,0 +1 @@
+# block: merge_14

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/merge_17.mcfunction

@@ -0,0 +1,2 @@
+# block: merge_17
+function test_control_flow:test_if_else/merge_14

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/merge_2.mcfunction

@@ -0,0 +1,5 @@
+# block: merge_2
+scoreboard players set $_1 rs 0
+execute if score $x rs < $const_5 rs run scoreboard players set $_1 rs 1
+execute if score $_1 rs matches 1.. run function test_control_flow:test_if_else/then_3
+execute if score $_1 rs matches ..0 run function test_control_flow:test_if_else/else_4

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/merge_5.mcfunction

@@ -0,0 +1,5 @@
+# block: merge_5
+scoreboard players set $_2 rs 0
+execute if score $x rs > $const_0 rs run scoreboard players set $_2 rs 1
+execute if score $_2 rs matches 1.. run function test_control_flow:test_if_else/then_6
+execute if score $_2 rs matches ..0 run function test_control_flow:test_if_else/merge_8

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/merge_8.mcfunction

@@ -0,0 +1,6 @@
+# block: merge_8
+scoreboard players set $y rs 50
+scoreboard players set $_4 rs 0
+execute if score $const_50 rs < $const_25 rs run scoreboard players set $_4 rs 1
+execute if score $_4 rs matches 1.. run function test_control_flow:test_if_else/then_12
+execute if score $_4 rs matches ..0 run function test_control_flow:test_if_else/else_13

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/then_0.mcfunction

@@ -0,0 +1,3 @@
+# block: then_0
+say [PASS] if: x > 5 works
+function test_control_flow:test_if_else/merge_2

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/then_12.mcfunction

@@ -0,0 +1,3 @@
+# block: then_12
+say [FAIL] else-if: y < 25 should be false
+function test_control_flow:test_if_else/merge_14

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/then_15.mcfunction

@@ -0,0 +1,3 @@
+# block: then_15
+say [PASS] else-if: 25 <= y < 75
+function test_control_flow:test_if_else/merge_17

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/then_3.mcfunction

@@ -0,0 +1,3 @@
+# block: then_3
+say [FAIL] else: x < 5 should be false
+function test_control_flow:test_if_else/merge_5

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/then_6.mcfunction

@@ -0,0 +1,5 @@
+# block: then_6
+scoreboard players set $_3 rs 0
+execute if score $x rs < $const_20 rs run scoreboard players set $_3 rs 1
+execute if score $_3 rs matches 1.. run function test_control_flow:test_if_else/then_9
+execute if score $_3 rs matches ..0 run function test_control_flow:test_if_else/merge_11

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else/then_9.mcfunction

@@ -0,0 +1,3 @@
+# block: then_9
+say [PASS] nested if: 0 < x < 20
+function test_control_flow:test_if_else/merge_11

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_if_else.mcfunction

@@ -0,0 +1,6 @@
+# block: entry
+scoreboard players set $x rs 10
+scoreboard players set $_0 rs 0
+execute if score $const_10 rs > $const_5 rs run scoreboard players set $_0 rs 1
+execute if score $_0 rs matches 1.. run function test_control_flow:test_if_else/then_0
+execute if score $_0 rs matches ..0 run function test_control_flow:test_if_else/else_1

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_0.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_48 rs 1
+say [FAIL] match: should not be 0

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_1.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_48 rs 1
+say [FAIL] match: should not be 1

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_2.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_48 rs 1
+say [PASS] match: correctly matched 2

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_3.mcfunction

@@ -0,0 +1,2 @@
+# block: entry
+say [FAIL] match: should not be default

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_4.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_49 rs 1
+say [FAIL] match range: should not be F

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_5.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_49 rs 1
+say [FAIL] match range: should not be D

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_6.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_49 rs 1
+say [PASS] match range: C (70-79)

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_7.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_49 rs 1
+say [FAIL] match range: should not be B

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_8.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $_49 rs 1
+say [FAIL] match range: should not be A

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match/match_9.mcfunction

@@ -0,0 +1,2 @@
+# block: entry
+say [FAIL] match range: out of range

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_match.mcfunction

@@ -0,0 +1,15 @@
+# block: entry
+scoreboard players set $status rs 2
+scoreboard players set $_48 rs 0
+execute if score $_48 rs matches ..0 if score $status rs matches 0 run function test_control_flow:test_match/match_0
+execute if score $_48 rs matches ..0 if score $status rs matches 1 run function test_control_flow:test_match/match_1
+execute if score $_48 rs matches ..0 if score $status rs matches 2 run function test_control_flow:test_match/match_2
+execute if score $_48 rs matches ..0 run function test_control_flow:test_match/match_3
+scoreboard players set $score rs 75
+scoreboard players set $_49 rs 0
+execute if score $_49 rs matches ..0 if score $score rs matches 0..59 run function test_control_flow:test_match/match_4
+execute if score $_49 rs matches ..0 if score $score rs matches 60..69 run function test_control_flow:test_match/match_5
+execute if score $_49 rs matches ..0 if score $score rs matches 70..79 run function test_control_flow:test_match/match_6
+execute if score $_49 rs matches ..0 if score $score rs matches 80..89 run function test_control_flow:test_match/match_7
+execute if score $_49 rs matches ..0 if score $score rs matches 90..100 run function test_control_flow:test_match/match_8
+execute if score $_49 rs matches ..0 run function test_control_flow:test_match/match_9

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/else_13.mcfunction

@@ -0,0 +1,3 @@
+# block: else_13
+say [FAIL] while+break: expected 5
+function test_control_flow:test_while_loop/merge_14

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/else_4.mcfunction

@@ -0,0 +1,3 @@
+# block: else_4
+say [FAIL] while loop: expected 3
+function test_control_flow:test_while_loop/merge_5

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/loop_body_1.mcfunction

@@ -0,0 +1,5 @@
+# block: loop_body_1
+scoreboard players operation $_17 rs = $count rs
+scoreboard players operation $_17 rs += $const_1 rs
+scoreboard players operation $count rs = $_17 rs
+function test_control_flow:test_while_loop/loop_check_0

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/loop_body_7.mcfunction

@@ -0,0 +1,8 @@
+# block: loop_body_7
+scoreboard players operation $_20 rs = $n rs
+scoreboard players operation $_20 rs += $const_1 rs
+scoreboard players operation $n rs = $_20 rs
+scoreboard players set $_21 rs 0
+execute if score $_20 rs >= $const_5 rs run scoreboard players set $_21 rs 1
+execute if score $_21 rs matches 1.. run function test_control_flow:test_while_loop/then_9
+execute if score $_21 rs matches ..0 run function test_control_flow:test_while_loop/merge_11

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/loop_check_0.mcfunction

@@ -0,0 +1,5 @@
+# block: loop_check_0
+scoreboard players set $_16 rs 0
+execute if score $count rs < $const_3 rs run scoreboard players set $_16 rs 1
+execute if score $_16 rs matches 1.. run function test_control_flow:test_while_loop/loop_body_1
+execute if score $_16 rs matches ..0 run function test_control_flow:test_while_loop/loop_exit_2

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/loop_check_6.mcfunction

@@ -0,0 +1,4 @@
+# block: loop_check_6
+scoreboard players set $_19 rs 1
+execute if score $_19 rs matches 1.. run function test_control_flow:test_while_loop/loop_body_7
+execute if score $_19 rs matches ..0 run function test_control_flow:test_while_loop/loop_exit_8

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/loop_exit_2.mcfunction

@@ -0,0 +1,5 @@
+# block: loop_exit_2
+scoreboard players set $_18 rs 0
+execute if score $count rs = $const_3 rs run scoreboard players set $_18 rs 1
+execute if score $_18 rs matches 1.. run function test_control_flow:test_while_loop/then_3
+execute if score $_18 rs matches ..0 run function test_control_flow:test_while_loop/else_4

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/loop_exit_8.mcfunction

@@ -0,0 +1,5 @@
+# block: loop_exit_8
+scoreboard players set $_22 rs 0
+execute if score $n rs = $const_5 rs run scoreboard players set $_22 rs 1
+execute if score $_22 rs matches 1.. run function test_control_flow:test_while_loop/then_12
+execute if score $_22 rs matches ..0 run function test_control_flow:test_while_loop/else_13

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/merge_11.mcfunction

@@ -0,0 +1,2 @@
+# block: merge_11
+function test_control_flow:test_while_loop/loop_check_6

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/merge_14.mcfunction

@@ -0,0 +1 @@
+# block: merge_14

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/merge_5.mcfunction

@@ -0,0 +1,3 @@
+# block: merge_5
+scoreboard players set $n rs 0
+function test_control_flow:test_while_loop/loop_check_6

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/then_12.mcfunction

@@ -0,0 +1,3 @@
+# block: then_12
+say [PASS] while+break: n = 5
+function test_control_flow:test_while_loop/merge_14

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/then_3.mcfunction

@@ -0,0 +1,3 @@
+# block: then_3
+say [PASS] while loop: count = 3
+function test_control_flow:test_while_loop/merge_5

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop/then_9.mcfunction

@@ -0,0 +1,2 @@
+# block: then_9
+function test_control_flow:test_while_loop/loop_exit_8

package/test-datapacks/test_control_flow/data/test_control_flow/function/test_while_loop.mcfunction

@@ -0,0 +1,3 @@
+# block: entry
+scoreboard players set $count rs 0
+function test_control_flow:test_while_loop/loop_check_0

package/test-datapacks/test_control_flow/pack.mcmeta

@@ -0,0 +1,6 @@
+{
+  "pack": {
+    "pack_format": 26,
+    "description": "test_control_flow datapack — compiled by redscript"
+  }
+}

package/test-datapacks/test_control_flow.mcrs

@@ -0,0 +1,242 @@
+// ===== Control Flow Tests =====
+// 测试: if/else, for, foreach, while, match, break, continue
+
+let test_counter: int = 0;
+
+// === Test 1: if/else 基础 ===
+@keep fn test_if_else() {
+    let x: int = 10;
+    
+    if (x > 5) {
+        raw("say [PASS] if: x > 5 works");
+    } else {
+        raw("say [FAIL] if: x > 5 should be true");
+    }
+    
+    if (x < 5) {
+        raw("say [FAIL] else: x < 5 should be false");
+    } else {
+        raw("say [PASS] else: x < 5 correctly went to else");
+    }
+    
+    // Nested if
+    if (x > 0) {
+        if (x < 20) {
+            raw("say [PASS] nested if: 0 < x < 20");
+        }
+    }
+    
+    // else if chain
+    let y: int = 50;
+    if (y < 25) {
+        raw("say [FAIL] else-if: y < 25 should be false");
+    } else if (y < 75) {
+        raw("say [PASS] else-if: 25 <= y < 75");
+    } else {
+        raw("say [FAIL] else-if: should not reach final else");
+    }
+}
+
+// === Test 2: for loop 基础 ===
+@keep fn test_for_loop() {
+    let sum: int = 0;
+    
+    for (let i: int = 1; i <= 5; i = i + 1) {
+        sum = sum + i;
+    }
+    
+    if (sum == 15) {
+        raw("say [PASS] for loop: sum 1..5 = 15");
+    } else {
+        raw("say [FAIL] for loop: expected 15");
+    }
+    
+    // Nested for
+    let product: int = 0;
+    for (let a: int = 1; a <= 2; a = a + 1) {
+        for (let b: int = 1; b <= 3; b = b + 1) {
+            product = product + 1;
+        }
+    }
+    
+    if (product == 6) {
+        raw("say [PASS] nested for: 2*3 iterations = 6");
+    } else {
+        raw("say [FAIL] nested for: expected 6");
+    }
+}
+
+// === Test 3: while loop ===
+@keep fn test_while_loop() {
+    let count: int = 0;
+    
+    while (count < 3) {
+        count = count + 1;
+    }
+    
+    if (count == 3) {
+        raw("say [PASS] while loop: count = 3");
+    } else {
+        raw("say [FAIL] while loop: expected 3");
+    }
+    
+    // While with break condition
+    let n: int = 0;
+    while (true) {
+        n = n + 1;
+        if (n >= 5) {
+            break;
+        }
+    }
+    
+    if (n == 5) {
+        raw("say [PASS] while+break: n = 5");
+    } else {
+        raw("say [FAIL] while+break: expected 5");
+    }
+}
+
+// === Test 4: foreach with selector ===
+@keep fn test_foreach_selector() {
+    raw("say [INFO] foreach selector test - spawning markers");
+    raw("summon minecraft:marker ~ ~ ~ {Tags:[\"test_marker\"]}");
+    raw("summon minecraft:marker ~ ~ ~ {Tags:[\"test_marker\"]}");
+    raw("summon minecraft:marker ~ ~ ~ {Tags:[\"test_marker\"]}");
+    
+    let marker_count: int = 0;
+    foreach (m in @e[type=marker,tag=test_marker]) {
+        marker_count = marker_count + 1;
+    }
+    
+    if (marker_count == 3) {
+        raw("say [PASS] foreach selector: found 3 markers");
+    } else {
+        raw("say [INFO] foreach selector: found markers (count varies)");
+    }
+    
+    // Cleanup
+    raw("kill @e[type=marker,tag=test_marker]");
+}
+
+// === Test 5: foreach with at @s ===
+@keep fn test_foreach_at() {
+    raw("summon minecraft:marker ~ ~1 ~ {Tags:[\"pos_test\"]}");
+    
+    foreach (e in @e[type=marker,tag=pos_test]) at @s {
+        raw("particle minecraft:heart ~ ~ ~ 0 0 0 0 1");
+    }
+    raw("say [PASS] foreach at @s: executed at entity position");
+    
+    raw("kill @e[type=marker,tag=pos_test]");
+}
+
+// === Test 6: break statement ===
+@keep fn test_break() {
+    let found: int = 0;
+    
+    for (let i: int = 0; i < 10; i = i + 1) {
+        if (i == 5) {
+            found = i;
+            break;
+        }
+    }
+    
+    if (found == 5) {
+        raw("say [PASS] break: exited at i=5");
+    } else {
+        raw("say [FAIL] break: expected 5");
+    }
+}
+
+// === Test 7: continue statement ===
+@keep fn test_continue() {
+    let sum: int = 0;
+    
+    // Sum only even numbers 0-9
+    for (let i: int = 0; i < 10; i = i + 1) {
+        if (i % 2 != 0) {
+            continue;
+        }
+        sum = sum + i;
+    }
+    
+    // 0+2+4+6+8 = 20
+    if (sum == 20) {
+        raw("say [PASS] continue: sum of evens = 20");
+    } else {
+        raw("say [FAIL] continue: expected 20");
+    }
+}
+
+// === Test 8: 复杂条件 ===
+@keep fn test_complex_conditions() {
+    let a: int = 5;
+    let b: int = 10;
+    let c: int = 15;
+    
+    // AND condition
+    if (a < b && b < c) {
+        raw("say [PASS] AND: a < b && b < c");
+    } else {
+        raw("say [FAIL] AND: should be true");
+    }
+    
+    // OR condition
+    if (a > 100 || b == 10) {
+        raw("say [PASS] OR: a > 100 || b == 10");
+    } else {
+        raw("say [FAIL] OR: should be true");
+    }
+    
+    // NOT condition
+    if (!(a > b)) {
+        raw("say [PASS] NOT: !(a > b)");
+    } else {
+        raw("say [FAIL] NOT: should be true");
+    }
+    
+    // Complex nested
+    if ((a < b && b < c) || (a > c)) {
+        raw("say [PASS] complex: (a<b && b<c) || (a>c)");
+    } else {
+        raw("say [FAIL] complex: should be true");
+    }
+}
+
+// === Test 9: match statement ===
+@keep fn test_match() {
+    let status: int = 2;
+    
+    match (status) {
+        0 => { raw("say [FAIL] match: should not be 0"); }
+        1 => { raw("say [FAIL] match: should not be 1"); }
+        2 => { raw("say [PASS] match: correctly matched 2"); }
+        _ => { raw("say [FAIL] match: should not be default"); }
+    }
+    
+    // Match with range
+    let score: int = 75;
+    match (score) {
+        0..59 => { raw("say [FAIL] match range: should not be F"); }
+        60..69 => { raw("say [FAIL] match range: should not be D"); }
+        70..79 => { raw("say [PASS] match range: C (70-79)"); }
+        80..89 => { raw("say [FAIL] match range: should not be B"); }
+        90..100 => { raw("say [FAIL] match range: should not be A"); }
+        _ => { raw("say [FAIL] match range: out of range"); }
+    }
+}
+
+// === Run all tests ===
+@keep fn run_control_flow_tests() {
+    raw("say === Control Flow Tests ===");
+    test_if_else();
+    test_for_loop();
+    test_while_loop();
+    test_foreach_selector();
+    test_foreach_at();
+    test_break();
+    test_continue();
+    test_complex_conditions();
+    test_match();
+    raw("say === Tests Complete ===");
+}

package/test-datapacks/test_decorators/data/minecraft/tags/function/load.json

@@ -0,0 +1,5 @@
+{
+  "values": [
+    "test_decorators:__load"
+  ]
+}

package/test-datapacks/test_decorators/data/minecraft/tags/function/tick.json

@@ -0,0 +1,5 @@
+{
+  "values": [
+    "test_decorators:__tick"
+  ]
+}

package/test-datapacks/test_decorators/data/test_decorators/function/__load.mcfunction

@@ -0,0 +1,20 @@
+# RedScript runtime init
+scoreboard objectives add rs dummy
+scoreboard players set $tick_counter rs 0
+scoreboard players set $tick_test_running rs 0
+scoreboard players set $slow_tick_count rs 0
+scoreboard players set $slow_tick_running rs 0
+scoreboard players set $__tick_every_second rs 0
+scoreboard players set $const_0 rs 0
+scoreboard players set $const_1 rs 1
+scoreboard players set $const_20 rs 20
+scoreboard players set $const_100 rs 100
+scoreboard players set $const_0 rs 0
+scoreboard players set $const_1 rs 1
+scoreboard players set $const_0 rs 0
+scoreboard players set $const_1 rs 1
+scoreboard players set $const_5 rs 5
+scoreboard players set $const_0 rs 0
+scoreboard players set $const_0 rs 0
+scoreboard players set $const_1 rs 1
+function test_decorators:on_load

package/test-datapacks/test_decorators/data/test_decorators/function/__tick.mcfunction

@@ -0,0 +1,3 @@
+# RedScript tick dispatcher
+function test_decorators:on_tick
+function test_decorators:every_second

package/test-datapacks/test_decorators/data/test_decorators/function/every_second/merge_2.mcfunction

@@ -0,0 +1,9 @@
+# block: merge_2
+scoreboard players operation $_6 rs = $slow_tick_count rs
+scoreboard players operation $_6 rs += $const_1 rs
+scoreboard players operation $slow_tick_count rs = $_6 rs
+tellraw @a ["",{"text":"[INFO] @tick(rate=20): second #"},{"score":{"name":"$slow_tick_count","objective":"rs"}}]
+scoreboard players set $_7 rs 0
+execute if score $_6 rs >= $const_5 rs run scoreboard players set $_7 rs 1
+execute if score $_7 rs matches 1.. run function test_decorators:every_second/then_3
+execute if score $_7 rs matches ..0 run function test_decorators:every_second/merge_5

package/test-datapacks/test_decorators/data/test_decorators/function/every_second/merge_5.mcfunction

@@ -0,0 +1 @@
+# block: merge_5

package/test-datapacks/test_decorators/data/test_decorators/function/every_second/then_0.mcfunction

@@ -0,0 +1 @@
+# block: then_0

package/test-datapacks/test_decorators/data/test_decorators/function/every_second/then_3.mcfunction

@@ -0,0 +1,4 @@
+# block: then_3
+scoreboard players set $slow_tick_running rs 0
+say [PASS] @tick(rate=20): completed 5 seconds
+function test_decorators:every_second/merge_5

package/test-datapacks/test_decorators/data/test_decorators/function/every_second/tick_body.mcfunction

@@ -0,0 +1,6 @@
+# block: tick_body
+scoreboard players set $__tick_every_second rs 0
+scoreboard players set $_5 rs 0
+execute if score $slow_tick_running rs = $const_0 rs run scoreboard players set $_5 rs 1
+execute if score $_5 rs matches 1.. run function test_decorators:every_second/then_0
+execute if score $_5 rs matches ..0 run function test_decorators:every_second/merge_2

package/test-datapacks/test_decorators/data/test_decorators/function/every_second/tick_skip.mcfunction

@@ -0,0 +1 @@
+# block: tick_skip

package/test-datapacks/test_decorators/data/test_decorators/function/every_second.mcfunction

@@ -0,0 +1,5 @@
+# block: entry
+scoreboard players add $__tick_every_second rs 1
+execute store success score $__tick_every_second_check rs if score $__tick_every_second rs matches 20..
+execute if score $__tick_every_second_check rs matches 1.. run function test_decorators:every_second/tick_body
+execute if score $__tick_every_second_check rs matches ..0 run function test_decorators:every_second/tick_skip