chiark
/
gitweb
/
~yarrgweb
/
ypp-sc-tools.main.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Junks. Pants icon.
[ypp-sc-tools.main.git]
/
yarrg
/
where-vessels
diff --git
a/yarrg/where-vessels
b/yarrg/where-vessels
index b93db197922e0c74bdd314b946595321c6f03684..af77cbab45221214c58b5d6296ec42c192bd82f0 100755
(executable)
--- a/
yarrg/where-vessels
+++ b/
yarrg/where-vessels
@@
-254,6
+254,7
@@
proc vesselclasses-init {} {
dhow cm dh Dhow
longship dm ls Longship
baghlah em bg Baghlah
dhow cm dh Dhow
longship dm ls Longship
baghlah em bg Baghlah
+ junk eo jk Junk
merchbrig fm mb {Merchant Brig}
warbrig gm wb {War Brig}
xebec hm xe Xebec
merchbrig fm mb {Merchant Brig}
warbrig gm wb {War Brig}
xebec hm xe Xebec
@@
-383,6
+384,7
@@
proc show-report-decode {code} {
F { report-set subclass {Frost class} }
R { report-set subclass {Rogue class} }
V { report-set subclass {Verdant class} }
F { report-set subclass {Frost class} }
R { report-set subclass {Rogue class} }
V { report-set subclass {Verdant class} }
+ I { report-set subclass {Inferno class} }
default { report-set subclass "Subclass \"$subclass\"" }
}
default { report-set subclass "Subclass \"$subclass\"" }
}
@@
-589,6
+591,7
@@
proc vessel {vin} {
icy { lappend codel F }
rogue { lappend codel R }
verdant { lappend codel V }
icy { lappend codel F }
rogue { lappend codel R }
verdant { lappend codel V }
+ inferno { lappend codel I }
default { lappend codel ($subclass) }
}
default { lappend codel ($subclass) }
}