var flight_plan_string = flag.String("flight_plan", "",
"Your hidey-holes for the day, comma-separated.")
-var end = flag.String("end", "",
+var end_string = flag.String("end", "",
"A comma-separated list of acceptable ending planets.")
var planet_data_file = flag.String("planet_data_file", "planet-data",
func visit() []string {
if *visit_string == "" {
- return []string{}
+ return nil
}
return strings.Split(*visit_string, ",")
}
func flight_plan() []string {
if *flight_plan_string == "" {
- return []string{}
+ return nil
}
return strings.Split(*flight_plan_string, ",")
}
+func end() map[string]bool {
+ if *end_string == "" {
+ return nil
+ }
+ m := make(map[string]bool)
+ for _, p := range strings.Split(*end_string, ",") {
+ m[p] = true
+ }
+ return m
+}
+
type Commodity struct {
BasePrice int
CanSell bool
dims[UnusedCargo] = eden_capacity + cloak_capacity + 1
dims[Fuel] = *fuel + 1
dims[Location] = len(data.Planets)
- dims[Hold] = len(data.Commodities)
+ dims[Hold] = len(data.Commodities) + 1
dims[NeedFighters] = bint(*drones > 0) + 1
dims[NeedShields] = bint(*batteries > 0) + 1
dims[Visit] = 1 << uint(len(visit()))
if addr[Fuel]+2 < dims[Fuel] {
other[Fuel] = addr[Fuel] + 2
for other[Location] = 0; other[Location] < dims[Location]; other[Location]++ {
- UpdateCell(table, my_index, EncodeIndex(dims, other), 0)
+ if data.Planets[data.i2p[addr[Location]]].BeaconOn {
+ UpdateCell(table, my_index, EncodeIndex(dims, other), 0)
+ }
}
other[Location] = addr[Location]
other[Fuel] = addr[Fuel]
/* Travel here via a hidey hole */
if addr[Fuel]+1 < dims[Fuel] {
hole_index := (dims[Fuel] - 1) - (addr[Fuel] + 1)
- if hole_index < len(flight_plan()) {
+ if hole_index < len(flight_plan()) && addr[Location] == data.p2i[flight_plan()[hole_index]] {
other[Fuel] = addr[Fuel] + 1
- other[Location] = data.p2i[flight_plan()[hole_index]]
- UpdateCell(table, my_index, EncodeIndex(dims, other), 0)
+ for other[Location] = 0; other[Location] < dims[Location]; other[Location]++ {
+ UpdateCell(table, my_index, EncodeIndex(dims, other), 0)
+ }
other[Location] = addr[Location]
other[Fuel] = addr[Fuel]
}
}
/* Travel here via Eden Warp Unit */
- for other[Edens] = addr[Edens] + 1; other[Edens] < dims[Edens]; other[Edens]++ {
- for other[Location] = 0; other[Location] < dims[Location]; other[Location]++ {
- UpdateCell(table, my_index, EncodeIndex(dims, other), 0)
+ if addr[Edens]+1 < dims[Edens] {
+ _, available := data.Planets[data.i2p[addr[Location]]].RelativePrices["Eden Warp Units"]
+ if !available {
+ other[Edens] = addr[Edens] + 1
+ for other[Location] = 0; other[Location] < dims[Location]; other[Location]++ {
+ UpdateCell(table, my_index, EncodeIndex(dims, other), 0)
+ }
+ other[Location] = addr[Location]
+ other[Edens] = addr[Edens]
}
}
- other[Location] = addr[Location]
- other[Edens] = addr[Edens]
}
func FillCellBySelling(data planet_data, dims []int, table []State, addr []int) {
for other[UnusedCargo] = 0; other[UnusedCargo] < dims[UnusedCargo]; other[UnusedCargo]++ {
- quantity := *hold - other[UnusedCargo] // TODO: Partial sales
+ quantity := *hold - (other[UnusedCargo] + other[Cloaks] + other[Edens])
sale_value := quantity * sell_price
UpdateCell(table, my_index, EncodeIndex(dims, other), sale_value)
}
}
base_price := data.Commodities[commodity].BasePrice
absolute_price := int(float64(base_price) * float64(relative_price) / 100.0)
- quantity := *hold - addr[UnusedCargo]
+ quantity := *hold - (addr[UnusedCargo] + addr[Cloaks] + addr[Edens])
total_price := quantity * absolute_price
other[Hold] = 0
+ other[UnusedCargo] = 0
UpdateCell(table, my_index, EncodeIndex(dims, other), -total_price)
+ other[UnusedCargo] = addr[UnusedCargo]
+ other[Hold] = addr[Hold]
}
func FillCellByMisc(data planet_data, dims []int, table []State, addr []int) {
+ my_index := EncodeIndex(dims, addr)
+ other := make([]int, NumDimensions)
+ copy(other, addr)
/* Buy Eden warp units */
/* Buy a Device of Cloaking */
+ if addr[Cloaks] == 1 && addr[UnusedCargo] < dims[UnusedCargo]-1 {
+ relative_price, available := data.Planets[data.i2p[addr[Location]]].RelativePrices["Device Of Cloakings"]
+ if available {
+ absolute_price := int(float64(data.Commodities["Device Of Cloakings"].BasePrice) * float64(relative_price) / 100.0)
+ other[Cloaks] = 0
+ if other[Hold] != 0 {
+ other[UnusedCargo] = addr[UnusedCargo] + 1
+ }
+ UpdateCell(table, my_index, EncodeIndex(dims, other), -absolute_price)
+ other[UnusedCargo] = addr[UnusedCargo]
+ other[Cloaks] = addr[Cloaks]
+ }
+ }
/* Silly: Dump a Device of Cloaking */
/* Buy Fighter Drones */
/* Buy Shield Batteries */
<-barrier
}
work_done++
- fmt.Printf("\r%3.0f%%", 100*work_done/work_units)
+ print(fmt.Sprintf("\r%3.0f%%", 100*work_done/work_units))
}
}
print("\n")
addr[NeedShields] = dims[NeedShields] - 1
addr[Visit] = dims[Visit] - 1
// Fuel, Hold, UnusedCargo left at 0
- var max_index int
+ max_index := -1
max_value := 0
for addr[Location] = 0; addr[Location] < dims[Location]; addr[Location]++ {
- index := EncodeIndex(dims, addr)
- if table[index].value > max_value {
- max_value = table[index].value
- max_index = index
+ if len(end()) == 0 || end()[data.i2p[addr[Location]]] {
+ index := EncodeIndex(dims, addr)
+ if table[index].value > max_value {
+ max_value = table[index].value
+ max_index = index
+ }
}
}
return max_index
}
+func Commas(n int) (s string) {
+ r := n % 1000
+ n /= 1000
+ for n > 0 {
+ s = fmt.Sprintf(",%03d", r) + s
+ r = n % 1000
+ n /= 1000
+ }
+ s = fmt.Sprint(r) + s
+ return
+}
+
func DescribePath(data planet_data, dims []int, table []State, start int) (description []string) {
for index := start; index > 0 && table[index].from > 0; index = table[index].from {
- line := fmt.Sprintf("%10v", table[index].value)
+ line := fmt.Sprintf("%13v", Commas(table[index].value))
addr := DecodeIndex(dims, index)
prev := DecodeIndex(dims, table[index].from)
if addr[Location] != prev[Location] {
}
}
+ if addr[Cloaks] == 1 && prev[Cloaks] == 0 {
+ // TODO: Dump cloaks, convert from cargo?
+ line += " Buy a Cloak"
+ }
description = append(description, line)
}
return
table := InitializeStateTable(data, dims)
FillStateTable1(data, dims, table)
best := FindBestState(data, dims, table)
- fmt.Printf("Best state: %v (%v) with $%v\n",
- best, DecodeIndex(dims, best), table[best].value)
- description := DescribePath(data, dims, table, best)
- for i := len(description) - 1; i >= 0; i-- {
- print(description[i], "\n")
+ if best == -1 {
+ print("Cannot acheive success criteria\n")
+ } else {
+ description := DescribePath(data, dims, table, best)
+ for i := len(description) - 1; i >= 0; i-- {
+ fmt.Println(description[i])
+ }
}
}