#!/usr/bin/perl -w use strict; use lib "$ENV{HOME}/bin", "."; # ... places to find... require "parser.pl"; ###################################################################### # Configure the TSN Canadian Fleet on a server. # Parsed from one of DaveTs Google Sheets (Download as TSV) # Run like: ./TSN-Artemis.ca.pl | nc -q1 127.1 2010 | ./parser.pl # (replace 127.1 with the address of your server) ###################################################################### # (C) 2015-2020 Nosey Nick Waterman, # https://noseynick.net/artemis/ # All wrong righted, all rights reserved. Licensed under thev GNU # Affero General Public License v3.0 https://www.gnu.org/licenses/agpl.txt # with Commons Clause https://commonsclause.com/ v1.0 ###################################################################### # from https://docs.google.com/spreadsheets/d/1jh1O3uifBCYGGGBHqt_drTiWRDWWqE26ILwxaLd7Vik/export?format=tsv ... *Adventure = SSConf(qw(131 TSN player singleseat shuttle)); *TSNLRShuttle = SSConf(qw(103 Ximni player singleseat shuttle)); ###################################################################### ShipConf(1, 11, 0.55, "TSN-Bluenose III", # Jump (Ximni) XimniBattleship # CO: Jay MacKinnon # Comms: Jadarendir TSNLRShuttle("Theodore Tugboat"), ); ShipConf(0, 1, 0.87, "TSN-Ranger", # Warp (TSN) Scout # CO: Graybeard Adventure("Patriot"), );