Bet_elgeuse

Furnace_v 3.0 All Ingot Alloys and Gas + System filtration

Dec 16th, 2020 (edited)
1,609
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.28 KB | None | 0 0
  1. alias Dial d0
  2. alias Lever d1
  3. alias Furnace d2
  4. alias GasMixer d3
  5. alias VPW d4
  6. alias VPIce d5
  7. alias minPressure r15
  8. alias maxPressure r14
  9. alias minTemperature r13
  10. alias IngotHash r12
  11. alias FPressure r11
  12. alias FTemperature r10
  13. alias SetIngot r9
  14. alias Startsmelting r8
  15. s Dial Mode 5
  16. s VPIce Setting 10
  17.  
  18. main:
  19. l SetIngot Dial Setting #Ice/0
  20. bnez SetIngot pushHashmaxP
  21. s db Setting 1217489948
  22. yield
  23. s db Setting -1805394113
  24. yield
  25. s db Setting 1253102035
  26. yield
  27. l Startsmelting Lever Open
  28. beq Startsmelting 1 SmeltingIce
  29. j main
  30.  
  31. pushHashmaxP:
  32. push -654790771.40000 #IngotSteel/1
  33. push -82508479.40000 #IngotSolder/2
  34. push 502280180.02400 #IngotElectrum/3
  35. push 1058547521.40000 #IngotConstantan/4
  36. push -297990285.20000 #IngotInvar/5
  37. loadHashmaxP:
  38.  
  39. move sp SetIngot
  40. peek r0
  41. trunc IngotHash r0
  42. sub r0 r0 IngotHash
  43. s db Setting IngotHash
  44. mul maxPressure r0 100000
  45. abs maxPressure maxPressure
  46. trunc maxPressure maxPressure
  47. ceil maxPressure maxPressure
  48. move sp 0
  49.  
  50. pushminTP:
  51. push 900.01000 #IngotSteel/1
  52. push 350.01000 #IngotSolder/2
  53. push 600.00800 #IngotElectrum/3
  54. push 1000.20000 #IngotConstantan/4
  55. push 1200.18000 #IngotInvar/5
  56.  
  57. loadminTP:
  58. move sp SetIngot
  59. peek r0
  60. trunc minTemperature r0
  61. sub r0 r0 minTemperature
  62. mul minPressure r0 100000
  63. ceil minPressure minPressure
  64. move sp 0
  65. waitsmeltalloys:
  66. l Startsmelting Lever Open
  67. beq Startsmelting 1 SmeltingAlloys
  68. j main
  69.  
  70. offlever:
  71. s Lever Open 0
  72. off:
  73. s Furnace Open 0
  74. s GasMixer On 0
  75. s VPW On 0
  76. s VPIce On 0
  77. j main
  78.  
  79. SmeltingIce:
  80. s VPW Setting 100
  81. l r0 Furnace Temperature
  82. slt r0 r0 274
  83. ls r1 Furnace 0 Occupied
  84. and r0 r0 r1
  85. s VPIce On r0
  86. l r0 Furnace Pressure
  87. sgt r0 r0 50
  88. s VPW On r0
  89. l Startsmelting Lever Setting
  90. beq Startsmelting 0 off
  91. j SmeltingIce
  92.  
  93. SmeltingAlloys:
  94. seq r2 IngotHash -297990285
  95. select r0 r2 34 66
  96. select r1 r2 5 100
  97. s VPW Setting r1
  98. s GasMixer Setting r0
  99. s Furnace Activate 1
  100. l FPressure Furnace Pressure
  101. slt r0 FPressure minPressure
  102. l FTemperature Furnace Temperature
  103. slt r2 FTemperature minTemperature
  104. add r1 r0 r2
  105. s GasMixer On r1
  106. l FPressure Furnace Pressure
  107. sgt r0 FPressure maxPressure
  108. s VPW On r0
  109. l r4 Furnace RecipeHash
  110. seq r4 r4 IngotHash
  111. s Furnace Open r4
  112. yield
  113. beq r4 1 offlever
  114. l Startsmelting Lever Setting
  115. beq Startsmelting 0 off
  116. j SmeltingAlloys
Add Comment
Please, Sign In to add comment