API tools faq
paste
Advertisement
funkd0ct0r

Untitled

funkd0ct0r
Sep 30th, 2013
55
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 27.63 KB | None | 0 0
raw download clone embed print report diff
  1.  
  2.  
  3. -- BeeAnalyzer x
  4. -- dropping excess drones should retain a few of each needed type
  5. --
  6.  
  7.  
  8. invmod = peripheral.wrap("right")
  9. targetedSpecies = ""
  10.  
  11. -- the bee graph ---------------------------------------------------------------
  12.  
  13. bees = {}
  14.  
  15. function addParent(parent, offspring)
  16. if not bees[parent] then
  17. bees[parent] = {
  18. --name = parent,
  19. score = 0,
  20. mutateFrom = {}
  21. }
  22. end
  23. end
  24.  
  25. function addOffspring(offspring, parentss)
  26. if bees[offspring] then
  27. for i, parents in ipairs(parentss) do
  28. table.insert(bees[offspring].mutateFrom, parents)
  29. end
  30. else
  31. bees[offspring] = {
  32. score = 0,
  33. mutateFrom = parentss
  34. }
  35. end
  36. for i, parents in ipairs(parentss) do
  37. for i, parent in ipairs(parents) do
  38. addParent(parent, offspring)
  39. end
  40. end
  41. end
  42.  
  43.  
  44.  
  45.  
  46. -- produce combinations from 1 or 2 lists
  47. function choose(list, list2)
  48. local newList = {}
  49. if list2 then
  50. for i = 1, #list2 do
  51. for j = 1, #list do
  52. if list[j] ~= list[i] then
  53. table.insert(newList, {list[j], list2[i]})
  54. end
  55. end
  56. end
  57. else
  58. for i = 1, #list do
  59. for j = i, #list do
  60. if list[i] ~= list[j] then
  61. table.insert(newList, {list[i], list[j]})
  62. end
  63. end
  64. end
  65. end
  66. return newList
  67. end
  68.  
  69. -- Forestry Bees ---------------------------------------------------------------
  70.  
  71. -- Apis Branch
  72. addOffspring("Common", choose({"Forest", "Meadows", "Modest", "Marbled", "Tropical", "Wintry", "Marshy", "Water", "Rocky", "Embittered", "Unusual", "Mystical", "Sorcerous", "Attuned"}))
  73. addOffspring("Cultivated", choose({"Common"}, {"Forest", "Meadows", "Modest", "Marbled", "Tropical", "Wintry", "Marshy", "Water", "Rocky", "Embittered", "Unusual", "Mystical", "Sorcerous", "Attuned"}))
  74. -- Noble Branch
  75. addOffspring("Noble", {{"Cultivated", "Common"}})
  76. addOffspring("Majestic", {{"Noble", "Cultivated"}})
  77. addOffspring("Imperial", {{"Majestic", "Noble"}})
  78. -- Industrious Branch
  79. addOffspring("Diligent", {{"Cultivated", "Common"}})
  80. addOffspring("Unweary", {{"Diligent", "Cultivated"}})
  81. addOffspring("Industrious", {{"Unweary", "Diligent"}})
  82. -- Heroic Branch
  83. addOffspring("Heroic", {{"Steadfast", "Valiant"}})
  84. -- Infernal Branch
  85. addOffspring("Sinister", {{"Cultivated", "Modest"}, {"Cultivated", "Tropical"}})
  86. addOffspring("Fiendish", {{"Sinister", "Cultivated"}, {"Sinister", "Modest"}, {"Sinister", "Tropical"}})
  87. addOffspring("Demonic", {{"Fiendish", "Sinister"}})
  88. -- Austere Branch
  89. addOffspring("Frugal", {{"Sinister", "Modest"}, {"Fiendish", "Modest"}})
  90. addOffspring("Austere", {{"Frugal", "Modest"}})
  91.  
  92. -- Tropical Branch
  93. addOffspring("Exotic", {{"Austere", "Tropical"}})
  94. addOffspring("Edenic", {{"Exotic", "Tropical"}})
  95.  
  96. -- Frozen Branch
  97. addOffspring("Icy", {{"Industrious", "Wintry"}})
  98. addOffspring("Glacial", {{"Icy", "Wintry"}})
  99. addOffspring("Frigid", {{"Diligent", "Wintry"}})
  100. addOffspring("Absolute", {{"Frigid", "Ocean"}})
  101. -- Festive Branch
  102. addOffspring("Celebratory", {{"Austere", "Excited"}})
  103. addOffspring("Leporine", {{"Meadows", "Forest"}})
  104. addOffspring("Merry", {{"Wintry", "Forest"}})
  105. addOffspring("Tipsy", {{"Wintry", "Meadows"}})
  106.  
  107. -- Agrarian Branch
  108. addOffspring("Rural", {{"Diligent", "Meadows"}})
  109. addOffspring("Farmed", {{"Rural", "Cultivated"}})
  110.  
  111. -- Boggy Branch
  112. addOffspring("Swamp", {{"Common", "Marshy"}})
  113. addOffspring("Boggy", {{"Swamp", "Marshy"}})
  114. addOffspring("Fungal", {{"Boggy", "Swamp"}})
  115.  
  116. -- Agricultural Branch
  117. addOffspring("Fermented", {{"Rural", "Fruity"}})
  118. addOffspring("Bovine", {{"Rural", "Water"}})
  119. addOffspring("Caffeine", {{"Rural", "Tropical"}})
  120. addOffspring("Citrus", {{"Farmed", "Modest"}})
  121. addOffspring("Minty", {{"Farmed", "Tropical"}})
  122.  
  123. -- Barren Branch
  124. addOffspring("Arid", {{"Meadows", "Modest"}})
  125. addOffspring("Barren", {{"Arid", "Common"}})
  126. addOffspring("Desolate", {{"Barren", "Arid"}})
  127.  
  128.  
  129. -- Hostile Branch
  130. addOffspring("Skeletal", {{"Desolate", "Frugal"}})
  131. addOffspring("Decaying", {{"Desolate", "Modest"}})
  132. addOffspring("Creepy", {{"Desolate", "Austere"}})
  133. -- Rocky Branch
  134. addOffspring("Tolerant", {{"Diligent", "Rocky"}})
  135. addOffspring("Hardy", {{"Tolerant", "Rocky"}})
  136. addOffspring("Resilient", {{"Hardy", "Tolerant"}})
  137.  
  138. -- Rusty Branch
  139. addOffspring("Rusty", {{"Resilient", "Diligent"}})
  140. addOffspring("Corroded", {{"Resilient", "Diligent"}})
  141. addOffspring("Tarnished", {{"Resilient", "Diligent"}})
  142. addOffspring("Leaden", {{"Resilient", "Unweary"}})
  143.  
  144.  
  145. -- Metallic Branch
  146. addOffspring("Lustered", {{"Resilient", "Unweary"}})
  147. addOffspring("Galvanized", {{"Tarnished", "Cultivated"}})
  148. addOffspring("Invincible", {{"Resilient", "Ender"}})
  149.  
  150. -- Alloyed Branch
  151. addOffspring("Impregnable", {{"Resilient", "Noble"}})
  152. addOffspring("Resolute", {{"Corroded", "Tarnished"}})
  153. addOffspring("Brazen", {{"Corroded", "Galvanized"}})
  154. addOffspring("Fortified", {{"Rusty", "Fossiled"}})
  155. addOffspring("Lustrous", {{"Resilient", "Imperial"}})
  156.  
  157. -- Precious Branch
  158. addOffspring("Shining", {{"Rusty", "Noble"}})
  159. addOffspring("Glittering", {{"Resolute", "Noble"}})
  160. addOffspring("Precious", {{"Glittering", "Shining"}})
  161. addOffspring("Valuable", {{"Glittering", "Ender"}})
  162.  
  163. -- Mineral Branch
  164. addOffspring("Lapis", {{"Resilient", "Water"}})
  165. addOffspring("Sodalite", {{"Lapis", "Diligent"}})
  166. addOffspring("Pyrite", {{"Rusty", "Sinister"}})
  167. addOffspring("Bauxite", {{"Resilient", "Diligent"}})
  168. addOffspring("Cinnabar", {{"Resilient", "Sinister"}})
  169. addOffspring("Sphalerite", {{"Tarnished", "Sinister"}})
  170.  
  171. -- Gemstone Branch
  172. addOffspring("Emerald", {{"Lapis", "Noble"}})
  173. addOffspring("Ruby", {{"Emerald", "Austere"}})
  174. addOffspring("Sapphire", {{"Emerald", "Ocean"}})
  175. addOffspring("Olivine", {{"Emerald", "Ender"}})
  176. addOffspring("Diamond", {{"Sapphire", "Imperial"}})
  177.  
  178. -- Nuclear Branch
  179. addOffspring("Unstable", {{"Austere", "Rocky"}})
  180. addOffspring("Nuclear", {{"Unstable", "Rusty"}})
  181. addOffspring("Radioactive", {{"Nuclear", "Glittering"}})
  182. -- Historic Branch
  183. addOffspring("Ancient", {{"Noble", "Diligent"}})
  184. addOffspring("Primeval", {{"Ancient", "Noble"}})
  185. addOffspring("Prehistoric", {{"Primeval", "Majestic"}})
  186. addOffspring("Relic", {{"Prehistoric", "Imperial"}})
  187.  
  188. -- Fossilized
  189. addOffspring("Fossiled", {{"Primeval", "Forest"}})
  190. addOffspring("Oily", {{"Primeval", "Modest"}})
  191. addOffspring("Preserved", {{"Primeval", "Boggy"}})
  192. addOffspring("Resinous", {{"Primeval", "Marshy"}})
  193.  
  194. -- Refined Branch
  195. addOffspring("Distilled", {{"Oily", "Industrious"}})
  196. addOffspring("Refined", {{"Distilled", "Oily"}})
  197. addOffspring("Elastic", {{"Refined", "Resinous"}})
  198. addOffspring("Tarry", {{"Refined", "Fossiled"}})
  199.  
  200.  
  201. -- Aquatic Branch
  202. addOffspring("River", {{"Common", "Water"}})
  203. addOffspring("Ocean", {{"Common", "Water"}})
  204. addOffspring("Stained", {{"Ocean", "Water"}})
  205.  
  206.  
  207. -- Saccharine Branch
  208. addOffspring("Sweetened", {{"Diligent", "Tropical"}})
  209. addOffspring("Sugary", {{"Sweetened", "Diligent"}})
  210. addOffspring("Fruity", {{"Sugary", "Forest"}})
  211.  
  212.  
  213. -- Volcanic Branch
  214. addOffspring("Angry", {{"Sinister", "Embittered"}})
  215. addOffspring("Furious", {{"Angry", "Embittered"}})
  216. addOffspring("Volcanic", {{"Furious", "Angry"}})
  217. addOffspring("Glowering", {{"Excited", "Angry"}})
  218.  
  219.  
  220. -- Viscous Branch
  221. addOffspring("Viscous", {{"Exotic", "Water"}})
  222. addOffspring("Glutinous", {{"Viscous", "Exotic"}})
  223. addOffspring("Sticky", {{"Glutinous", "Viscous"}})
  224.  
  225. -- Virulent Branch
  226. addOffspring("Malicious", {{"Sinister", "Tropical"}})
  227. addOffspring("Infectious", {{"Malicious", "Tropical"}})
  228. addOffspring("Virulent", {{"Infectious", "Malicious"}})
  229.  
  230. -- Caustic Branch
  231. addOffspring("Corrosive", {{"Virulent", "Sticky"}})
  232. addOffspring("Caustic", {{"Corrosive", "Fiendish"}})
  233. addOffspring("Acidic", {{"Caustic", "Corrosive"}})
  234.  
  235.  
  236. -- Energetic Branch
  237. addOffspring("Excited", {{"Cultivated", "Valiant"}})
  238. addOffspring("Energetic", {{"Excited", "Valiant"}})
  239. addOffspring("Ecstatic", {{"Energetic", "Excited"}})
  240.  
  241.  
  242. -- Shadow Branch
  243. addOffspring("Shadowed", {{"Rocky", "Furious"}})
  244. addOffspring("Darkened", {{"Shadowed", "Embittered"}})
  245. addOffspring("Abyssmal", {{"Darkened", "Shadowed"}})
  246.  
  247. -- Primary Branch
  248. addOffspring("Bleached", {{"Wintry", "Valiant"}})
  249. addOffspring("Ebony", {{"Rocky", "Valiant"}})
  250. addOffspring("Maroon", {{"Forest", "Valiant"}})
  251. addOffspring("Natural", {{"Tropical", "Valiant"}})
  252. addOffspring("Prussian", {{"Water", "Valiant"}})
  253. addOffspring("Saffron", {{"Meadows", "Valiant"}})
  254. addOffspring("Sepia", {{"Marshy", "Valiant"}})
  255. -- Secondary Branch
  256. addOffspring("Amber", {{"Maroon", "Saffron"}})
  257. addOffspring("Azure", {{"Prussian", "Bleached"}})
  258. addOffspring("Indigo", {{"Maroon", "Prussian"}})
  259. addOffspring("Lavender", {{"Maroon", "Bleached"}})
  260. addOffspring("Lime", {{"Natural", "Bleached"}})
  261. addOffspring("Slate", {{"Ebony", "Bleached"}})
  262. addOffspring("Turquoise", {{"Natural", "Prussian"}})
  263. -- Tertiary Branch
  264. addOffspring("Ashen", {{"Slate", "Bleached"}})
  265. addOffspring("Fuchsia", {{"Indigo", "Lavender"}})
  266.  
  267.  
  268. -- hungry,confused,forestry,wooden branch
  269.  
  270. addOffspring("Hungry", {{"Arid", "Rural"}})
  271. addOffspring("Starved", {{"Barren", "Hungry"}})
  272. addOffspring("Ravenous", {{"Hungry", "Starved"}})
  273. addOffspring("Dazed", {{"Arid", "Edenic"}})
  274. addOffspring("Irrational", {{"Barren", "Dazed"}})
  275. addOffspring("Delirious", {{"Dazed", "Irrational"}})
  276. addOffspring("Pulped", {{"Unweary", "Forest"}})
  277. addOffspring("Spoiled", {{"Pulped", "Decaying"}})
  278. addOffspring("Decomposed", {{"Pulped", "Decaying"}})
  279. addOffspring("Wooden", {{"Diligent", "Forest"}})
  280. addOffspring("Lumbered", {{"Diligent", "Wooden"}})
  281. addOffspring("Timbered", {{"Wooden", "Lumbered"}})
  282.  
  283. -- Beastly Branch
  284. addOffspring("Jaded", {{"Ender", "Relic"}})
  285.  
  286.  
  287. -- Magic Bees ------------------------------------------------------------------
  288.  
  289. -- Arcane Branch
  290. addOffspring("Esoteric", {{"Imperial", "Demonic"}, {"Heroic", "Demonic"}})
  291. addOffspring("Mysterious", {{"Ender", "Esoteric"}})
  292. addOffspring("Arcane", {{"Mysterious", "Esoteric"}})
  293.  
  294. -- Supernatural Branch
  295. addOffspring("Charmed", {{"Diligent", "Valiant"}})
  296. addOffspring("Enchanted", {{"Valiant", "Charmed"}})
  297. addOffspring("Supernatural", {{"Enchanted", "Charmed"}})
  298. -- Scholarly Branch
  299. addOffspring("Pupil", {{"Arcane", "Enchanted"}})
  300. addOffspring("Scholarly", {{"Arcane", "Pupil"}})
  301. addOffspring("Savant", {{"Scholarly", "Pupil"}})
  302.  
  303.  
  304. -- Thaumic Branch
  305. addOffspring("Stark", {{"Arcane", "Supernatural"}})
  306.  
  307.  
  308. -- Skulking Branch
  309. addOffspring("Skulking", {{"Mysterious", "Modest"}, {"Mysterious", "Desolate"}})
  310. addOffspring("Brainy", {{"Skulking", "Sinister"}})
  311. addOffspring("Gossamer", {{"Skulking", "Supernatural"}, {"Skulking", "Ancient"}})
  312. addOffspring("Wispy", {{"Gossamer", "Cultivated"}})
  313. addOffspring("Batty", {{"Skulking", "Frugal"}, {"Skulking", "Rocky"}})
  314. addOffspring("Ghastly", {{"Skulking", "Austere"}, {"Skulking", "Creepy"}})
  315.  
  316.  
  317. addOffspring("Aware", {{"Demonic", "Edenic"}})
  318. addOffspring("Vis", {{"Aware", "Arcane"}, {"Aware", "Stark"}})
  319. addOffspring("Pure", {{"Vis", "Edenic"}})
  320. addOffspring("Flux", {{"Vis", "Edenic"}})
  321. addOffspring("Node", {{"Pure", "Flux"}})
  322. addOffspring("Rejuvenating", {{"Vis", "Energetic"}})
  323. addOffspring("Timely", {{"Industrious", "Enchanted"}})
  324. addOffspring("Lordly", {{"Timely", "Imperial"}})
  325. addOffspring("Doctoral", {{"Timely", "Lordly"}})
  326. addOffspring("Spirit", {{"Fiendish", "Enchanted"}, {"Fiendish", "Ender"}})
  327. addOffspring("Soul", {{"Fiendish", "Spirit"}})
  328. addOffspring("Minium", {{"Sinister", "Mysterious"}, {"Frugal", "Pupil"}})
  329. addOffspring("Iron", {{"Industrious", "Diligent"}})
  330. addOffspring("Gold", {{"Minium", "Lead"}})
  331.  
  332.  
  333. addOffspring("Copper", {{"Industrious", "Meadows"}})
  334. addOffspring("Tin", {{"Industrious", "Forest"}})
  335. addOffspring("Silver", {{"Imperial", "Modest"}})
  336. addOffspring("Lead", {{"Industrious", "Copper"}, {"Industrious", "Tin"}, {"Industrious", "Common"}})
  337. addOffspring("Diamond", {{"Austere", "Gold"}})
  338. addOffspring("Emerald", {{"Austere", "Silver"}})
  339. addOffspring("Poultry", {{"Common", "Skulking"}})
  340. addOffspring("Beefy", {{"Common", "Skulking"}})
  341. addOffspring("Porcine", {{"Common", "Skulking"}})
  342.  
  343.  
  344.  
  345. -- logging ---------------------------------------------------------------------
  346.  
  347. local logFile = fs.open("bee.log", "w")
  348. function log(msg)
  349. msg = msg or ""
  350. logFile.write(tostring(msg))
  351. logFile.flush()
  352. io.write(msg)
  353. end
  354. function logLine(msg)
  355. msg = msg or ""
  356. logFile.write(msg.."\n")
  357. logFile.flush()
  358. io.write(msg.."\n")
  359. end
  360.  
  361. -- analyzing functions ---------------------------------------------------------
  362.  
  363. -- Fix for some versions returning bees.species.*
  364. function fixName(name)
  365. return name:gsub("bees%.species%.",""):gsub("^.", string.upper)
  366. end
  367.  
  368. function clearSystem()
  369. -- orient turtle
  370. while true do
  371. local p = peripheral.wrap("front")
  372. if p and p.isBee then
  373. break
  374. end
  375. turtle.turnRight()
  376. end
  377. -- clear out analyzer
  378. turtle.turnLeft()
  379. while turtle.suckUp() do end
  380. -- clear out beealyzer
  381. turtle.turnRight()
  382. turtle.suck()
  383. -- clear out apiary
  384. turtle.turnRight()
  385. while turtle.suck() do end
  386. end
  387.  
  388. function getBees()
  389. -- get bees from apiary
  390. log("waiting for bees.")
  391. turtle.select(1)
  392. while not turtle.suck() do
  393. sleep(10)
  394. log(".")
  395. end
  396. log("*")
  397. while turtle.suck() do
  398. log("*")
  399. end
  400. logLine()
  401. end
  402.  
  403. function countBees()
  404. -- spread dups and fill gaps
  405. local count = 0
  406. for i = 1, 16 do
  407. local slotCount = turtle.getItemCount(i)
  408. if slotCount == 1 then
  409. for j = 1, i-1 do
  410. if turtle.getItemCount(j) == 0 then
  411. turtle.select(i)
  412. turtle.transferTo(j)
  413. break
  414. end
  415. end
  416. count = count + 1
  417. elseif slotCount > 1 then
  418. for j = 2, slotCount do
  419. turtle.select(i)
  420. for k = 1, 16 do
  421. if turtle.getItemCount(k) == 0 then
  422. turtle.transferTo(k, 1)
  423. end
  424. end
  425. end
  426. if turtle.getItemCount(i) > 1 then
  427. turtle.dropDown(turtle.getItemCount(i)-1)
  428. end
  429. end
  430. end
  431. return count
  432. end
  433.  
  434. function breedBees(princessSlot, droneSlot)
  435. turtle.select(princessSlot)
  436. invmod.dropSneaky(1)
  437. turtle.select(droneSlot)
  438. invmod.dropSneaky(0)
  439. end
  440.  
  441. function ditchProduct()
  442. print("ditching product...")
  443. turtle.turnLeft()
  444. m = peripheral.wrap("front")
  445. for i = 1, 16 do
  446. if turtle.getItemCount(i) > 0 then
  447. turtle.select(i)
  448. turtle.drop()
  449. if not m.isBee() then
  450. turtle.suck()
  451. turtle.dropDown()
  452. else
  453. turtle.suck()
  454. end
  455. end
  456. end
  457. turtle.turnRight()
  458. end
  459.  
  460. function scanBees()
  461. log("scanning bees")
  462. turtle.turnLeft()
  463. turtle.turnLeft()
  464. for i = 1, 16 do
  465. if turtle.getItemCount(i) > 0 then
  466. log(".")
  467. turtle.select(i)
  468. invmod.dropSneakyUp(2)
  469. while not turtle.suckUp() do
  470. sleep(1)
  471. end
  472. end
  473. end
  474. logLine()
  475. turtle.turnRight()
  476. turtle.turnRight()
  477. end
  478.  
  479. function swapBee(slot1, slot2, freeSlot)
  480. turtle.select(slot1)
  481. turtle.transferTo(freeSlot)
  482. turtle.select(slot2)
  483. turtle.transferTo(slot1)
  484. turtle.select(freeSlot)
  485. turtle.transferTo(slot2)
  486. end
  487.  
  488. --if princess has no scored offspring (mutated) ... maybewe want to breed with the highest scored drone (droneScore)
  489. --find the highest drone bee we have, find what we need to breed with it
  490. --if we have that drone, breed princess with that drone
  491. --else find the highest we have in that tree, and repeat
  492. --if we dont have any then exit with needbee: bee (tree)
  493.  
  494.  
  495. --returns which drone is highest parent for species, or species if available
  496. function findAvailableParent(species, droneData)
  497. local droneIndex = 0
  498. local droneScore = 99999
  499.  
  500. for i = 2, 16 do
  501. if droneData[i] then
  502. if droneData[i]["speciesPrimary"] == species or droneData[i]["speciesSecondary"] == species then
  503. droneIndex = i
  504. droneScore = bees[species].score
  505. return droneIndex, droneScore
  506. end
  507. end
  508. end
  509.  
  510. for i, parents in ipairs(bees[species].mutateFrom) do
  511. index, score = findAvailableParent(parents[1], droneData)
  512. if score < droneScore then
  513. droneIndex = index
  514. droneScore = score
  515. end
  516. index, score = findAvailableParent(parents[2], droneData)
  517. if score < droneScore then
  518. droneIndex = index
  519. droneScore = score
  520. end
  521. end
  522. if droneScore == 99999 then
  523. logLine("Missing bee species: " .. species)
  524. end
  525. return droneIndex, droneScore
  526. end
  527.  
  528. function analyzeBees()
  529.  
  530. logLine("analyzing bees...")
  531. local freeSlot
  532. local princessSlot
  533. local princessData
  534. local droneData = {}
  535. turtle.turnLeft()
  536. local beealyzer = peripheral.wrap("front")
  537.  
  538. for i = 1, 16 do
  539. if turtle.getItemCount(i) > 0 then
  540. turtle.select(i)
  541. turtle.drop()
  542. local beeData = beealyzer.analyze()
  543. turtle.suck()
  544. if not beeData["speciesPrimary"] then
  545. print("Bee "..i.." not correctly analyzed")
  546. else
  547. beeData["speciesPrimary"] = fixName(beeData["speciesPrimary"])
  548. beeData["speciesSecondary"] = fixName(beeData["speciesSecondary"])
  549. if beeData["type"] == "princess" then
  550. princessData = beeData
  551. princessSlot = i
  552. else
  553. droneData[i] = beeData
  554. end
  555. end
  556. else
  557. freeSlot = i
  558. end
  559. end
  560.  
  561. if princessData then
  562. if princessSlot ~= 1 then
  563. swapBee(1, princessSlot, freeSlot)
  564. droneData[princessSlot] = droneData[1]
  565. droneData[1] = nil
  566. princessSlot = 1
  567. end
  568.  
  569. -- bubble sort drones
  570. print("sorting drones...")
  571. for i = 2, 16 do
  572. if turtle.getItemCount(i) > 0 and droneData[i] then
  573. droneData[i].score = scoreBee(princessData, droneData[i])
  574. for j = i - 1, 2, -1 do
  575. if droneData[j+1].score > droneData[j].score then
  576. swapBee(j+1, j, freeSlot)
  577. droneData[j+1], droneData[j] = droneData[j], droneData[j+1]
  578. end
  579. end
  580. end
  581. end
  582.  
  583. if droneData[2] and droneData[2].score < 1 then
  584. --no breeding combos found for this princess
  585. i, j = findAvailableParent(targetedSpecies, droneData)
  586.  
  587. if j == 99999 then
  588. droneData[2].score = 0
  589. else
  590. swapBee(2, i, freeSlot)
  591. droneData[2], droneData[i] = droneData[i], droneData[2]
  592. end
  593. end
  594.  
  595. printHeader()
  596. princessData.slot = 1
  597. printBee(princessData)
  598. for i = 2, 16 do
  599. if droneData[i] then
  600. droneData[i].slot = i
  601. printBee(droneData[i])
  602. end
  603. end
  604. end
  605. logLine()
  606. turtle.turnRight()
  607. return princessData, droneData
  608. end
  609.  
  610.  
  611.  
  612. --if drone score is 9999 return 9999 or 10k for pure
  613. --find offspring for this combo, return highest scoring offspring ... for each bee, if its cerated from these get its score
  614.  
  615.  
  616. function scoreBee(princessData, droneData)
  617.  
  618. local droneSpecies = {droneData["speciesPrimary"], droneData["speciesSecondary"]}
  619. local princessSpecies = {princessData["speciesPrimary"], princessData["speciesSecondary"]}
  620.  
  621. if bees[droneSpecies[1]].score == 9999 and bees[droneSpecies[2]].score == 9999 then
  622. return 10000
  623. end
  624. if bees[droneSpecies[1]].score == 9999 or bees[droneSpecies[2]].score == 9999 then
  625. return 9999
  626. end
  627.  
  628. local droneScore = 0
  629.  
  630. for name, beeData in pairs(bees) do
  631. if beeData.score > droneScore then
  632. for i, parents in ipairs(beeData.mutateFrom) do
  633. if princessSpecies[1] == parents[1] or princessSpecies[2] == parents[1] then
  634. if droneSpecies[1] == parents[2] and droneSpecies[2] == parents[2] then
  635. if princessSpecies[1] == princessSpecies[2] then
  636. droneScore = beeData.score + 2
  637. else
  638. droneScore = beeData.score + 1
  639. end
  640. break
  641. end
  642. if ((droneSpecies[1] == parents[1] and droneSpecies[2] == parents[2]) or (droneSpecies[2] == parents[1] and droneSpecies[1] == parents[2]))
  643. and ((princessSpecies[1] == parents[1] and princessSpecies[2] == parents[2]) or (princessSpecies[2] == parents[1] and princessSpecies[1] == parents[2])) then
  644.  
  645. droneScore = beeData.score + 2
  646. break
  647. end
  648. if droneSpecies[1] == parents[2] or droneSpecies[2] == parents[2] then
  649. droneScore = beeData.score
  650. break
  651. end
  652. end
  653. if princessSpecies[1] == parents[2] or princessSpecies[2] == parents[2] then
  654. if droneSpecies[1] == parents[1] and droneSpecies[2] == parents[1] then
  655. if princessSpecies[1] == princessSpecies[2] then
  656. droneScore = beeData.score + 2
  657. else
  658. droneScore = beeData.score + 1
  659. end
  660. break
  661. end
  662. if ((droneSpecies[1] == parents[1] and droneSpecies[2] == parents[2]) or (droneSpecies[2] == parents[1] and droneSpecies[1] == parents[2]))
  663. and ((princessSpecies[1] == parents[1] and princessSpecies[2] == parents[2]) or (princessSpecies[2] == parents[1] and princessSpecies[1] == parents[2])) then
  664.  
  665. droneScore = beeData.score + 2
  666. break
  667. end
  668. if droneSpecies[1] == parents[1] or droneSpecies[2] == parents[1] then
  669. droneScore = beeData.score
  670. break
  671. end
  672. end
  673. end
  674. end
  675. end
  676.  
  677. return droneScore
  678. end
  679.  
  680. function printHeader()
  681. logLine()
  682. logLine("typ species f spd d n f c tmp hmd score")
  683. logLine("-|-|-------|-|---|-|-|-|-|---|---|-----")
  684. end
  685.  
  686. toleranceString = {
  687. ["NONE"] = " ",
  688. ["UP_1"] = " +1 ",
  689. ["UP_2"] = " +2 ",
  690. ["UP_3"] = " +3 ",
  691. ["DOWN_1"] = " -1 ",
  692. ["DOWN_2"] = " -2 ",
  693. ["DOWN_3"] = " -3 ",
  694. ["BOTH_1"] = "+-1 ",
  695. ["BOTH_2"] = "+-2 ",
  696. ["BOTH_3"] = "+-3 "
  697. }
  698. function printBee(beeData)
  699. log(beeData["slot"] < 10 and beeData["slot"].." " or beeData["slot"])
  700. if (beeData["type"] == "princess") then
  701. log("P ")
  702. else
  703. log("d ")
  704. end
  705. log(beeData["speciesPrimary"]:gsub("bees%.species%.",""):sub(1,3)..":"..beeData["speciesSecondary"]:gsub("bees%.species%.",""):sub(1,3).." ")
  706. log(tostring(beeData["fertility"]).." ")
  707. log(beeData["speed"] == 1 and "1.0 " or tostring(beeData["speed"]).." ")
  708. if beeData["diurnal"] then
  709. log("d ")
  710. else
  711. log(" ")
  712. end
  713. if beeData["nocturnal"] then
  714. log("n ")
  715. else
  716. log(" ")
  717. end
  718. if beeData["tolerantFlyer"] then
  719. log("f ")
  720. else
  721. log(" ")
  722. end
  723. if beeData["caveDwelling"] then
  724. log("c ")
  725. else
  726. log(" ")
  727. end
  728. log(toleranceString[beeData["toleranceTemperature"]])
  729. log(toleranceString[beeData["toleranceHumidity"]])
  730. if beeData.score then
  731. logLine(string.format("%5.1d", beeData.score).." ")
  732. else
  733. logLine()
  734. end
  735. end
  736.  
  737. function dropExcess(droneData)
  738. print("dropping excess...")
  739. local count = 0
  740. for i = 1, 16 do
  741. if turtle.getItemCount(i) > 0 then
  742. count = count + 1
  743.  
  744. -- drop drones over 9 to clear space for newly bred bees and product
  745. if count > 9 then
  746. turtle.select(i)
  747. turtle.dropDown()
  748. count = count - 1
  749. end
  750. end
  751. end
  752. end
  753.  
  754. function isPurebred(princessData, droneData)
  755. -- check if princess and drone are exactly the same and no chance for mutation
  756. if princessData["speciesPrimary"] ~= princessData["speciesSecondary"] then
  757. return false
  758. end
  759. for key, value in pairs(princessData) do
  760. if value ~= droneData[key] and key ~= "territory" and key ~= "type" and key ~= "slot" then
  761. return false
  762. end
  763. end
  764. return true
  765. end
  766.  
  767. function getUnknown(princessData, droneData)
  768. -- lists species that are not in the bee graph
  769. local unknownSpecies = {}
  770. if not bees[princessData["speciesPrimary"]] then
  771. table.insert(unknownSpecies, princessData["speciesPrimary"])
  772. end
  773. if not bees[princessData["speciesSecondary"]] then
  774. table.insert(unknownSpecies, princessData["speciesSecondary"])
  775. end
  776. for _, beeData in pairs(droneData) do
  777. if not bees[beeData["speciesPrimary"]] then
  778. table.insert(unknownSpecies, beeData["speciesPrimary"])
  779. end
  780. if not bees[beeData["speciesSecondary"]] then
  781. table.insert(unknownSpecies, beeData["speciesSecondary"])
  782. end
  783. end
  784. return unknownSpecies
  785. end
  786.  
  787.  
  788. function scoreBeesIterate(name)
  789.  
  790. for i, parents in ipairs(bees[name].mutateFrom) do
  791. if bees[parents[1]].score < bees[name].score - 4 then
  792. bees[parents[1]].score = bees[name].score - 4
  793. scoreBeesIterate(parents[1])
  794. end
  795. if bees[parents[2]].score < bees[name].score - 4 then
  796. bees[parents[2]].score = bees[name].score - 4
  797. scoreBeesIterate(parents[2])
  798. end
  799. end
  800. end
  801.  
  802. -- program begins, read input---------------------------------------------------
  803.  
  804. tArgs = { ... }
  805. if #tArgs > 0 then
  806.  
  807. logLine("targeting bee species:")
  808. for i, target in ipairs(tArgs) do
  809. targetedSpecies = target
  810. bees[target].score = 9999
  811. for name, data in pairs(bees) do
  812. if data.score > 1 then
  813. logLine(name .. string.rep(" ", 20-#name), data.score)
  814. end
  815. end
  816. end
  817.  
  818. for name, beeData in pairs(bees) do
  819. if beeData.score == 9999 then
  820. scoreBeesIterate(name)
  821. end
  822. end
  823. else
  824. logLine("Usage Bee [species]")
  825. logFile.close()
  826. return false
  827. end
  828.  
  829. -- breeding loop ---------------------------------------------------------------
  830.  
  831. logLine("Clearing system...")
  832. clearSystem()
  833. while true do
  834.  
  835. ditchProduct()
  836. countBees()
  837. scanBees()
  838. princessData, droneData = analyzeBees()
  839.  
  840. if droneData[2].score == 0 then --analyze failed to find a breeding pair
  841. break
  842. end
  843.  
  844. if princessData then
  845.  
  846. if isPurebred(princessData, droneData[2]) then
  847. logLine("Bees are purebred")
  848. turtle.turnRight()
  849. break
  850. end
  851.  
  852. local unknownSpecies = getUnknown(princessData, droneData)
  853. if #unknownSpecies > 0 then
  854. logLine("Please add new species to bee graph:")
  855. for _, species in ipairs(unknownSpecies) do
  856. logLine(" "..species)
  857. end
  858. turtle.turnRight()
  859. break
  860. end
  861.  
  862. breedBees(1, 2)
  863. dropExcess(droneData)
  864. end
  865.  
  866. getBees()
  867. if redstone.getInput("right") then logLine("Execution ended by user.") break end
  868. end
  869. logFile.close()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!