chiark / gitweb /
segment labelling work-in-progress - yet to do are labels and graph colouring
[trains.git] / hostside / program-cv-svc
1 #!/bin/sh
2
3 set -e
4
5 if [ $# != 3 ]; then cat >&2 <<END; exit 1; fi
6  usage:
7   ./program-cv /dev/ttyS0 CV VALUE
8  where CV, VALUE are all decimal unless prefixed by 0x or 0.
9 END
10
11 port="$1"; shift
12 cv="$1"; shift
13 value="$1"; shift
14
15 ho () { ./hostside-old -s"$port" -w20000 -i0 -d "$@"; }
16
17 # Packet Sequence for Command Stations/Programmers using Direct Mode
18 # RP 9.2.3 E l.100-
19
20 ho command 10
21 sleep 1
22 ho command 11
23 sleep 1
24 ho -i10 reset
25 sleep 1
26 ho -i10 svc_cvwrite "$cv" "$value"
27 sleep 1
28 ho command 10