aboutsummaryrefslogtreecommitdiff
path: root/advtrains/tests/atcjit_spec.lua
diff options
context:
space:
mode:
Diffstat (limited to 'advtrains/tests/atcjit_spec.lua')
-rw-r--r--advtrains/tests/atcjit_spec.lua10
1 files changed, 9 insertions, 1 deletions
diff --git a/advtrains/tests/atcjit_spec.lua b/advtrains/tests/atcjit_spec.lua
index 6d8b3f4..638e5c8 100644
--- a/advtrains/tests/atcjit_spec.lua
+++ b/advtrains/tests/atcjit_spec.lua
@@ -167,5 +167,13 @@ end)
describe("ATC track reusing malformed code", function()
local t = {atc_command = "I?;"}
- thisatc("Should report the invalid I statement", t, {}, "Invalid I statement", t)
+ thisatc("should report the invalid I statement", t, {}, "Invalid I statement", t)
end)
+
+describe("ATC track that sets ARS modes", function()
+ local t = {atc_command = "A0WA1WAFWAT"}
+ thisatc("should disable ARS on the train with A0", t, {}, nil, {atc_wait_finish=true, ars_disable=true, atc_command="A1WAFWAT"})
+ thisatc("should enable ARS on the train with A1", t, {}, nil, {atc_wait_finish=true, ars_disable=false, atc_command="AFWAT"})
+ thisatc("should disable ARS on the train with AF", t, {}, nil, {atc_wait_finish=true, ars_disable=true, atc_command="AT"})
+ thisatc("should enable ARS on the train with AT", t, {}, nil, {atc_wait_finish=true, ars_disable=false,})
+end) \ No newline at end of file