cyclinglink for Twine 2 (Harlowe)

cyclinglink.md

passage

replace array with your options

(set: $cyclinglink to (array: "off", "low", "high"))
(set: $cl_index to 0)

The power is currently set to [(print: $cyclinglink[$cl_index])]<cl|.

[]<cl_macro|
(replace: ?cl_macro)[(display: "cyclinglink")]

cyclinglink

in a separate passage

{
(click: ?cl)
[
(if: $cl_index is $cyclinglink.length - 1)[(set: $cl_index = 0)]
(else:)[(set: $cl_index += 1)]
(replace: ?cl)[(print: $cyclinglink[$cl_index])]
(replace: ?cl_macro)[(display: "cyclinglink")]
]
}