Advertisement
BrainWaveCC

FixTractor.BAT

Nov 9th, 2024
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Batch 7.10 KB | Source Code | 0 0
  1. @echo off
  2.  setlocal
  3.  set #15galFuelTank=0
  4.  
  5. :shop -- where is this supposed to be?
  6. :a10barn
  7.  cls
  8.  call :ListOptions "First"
  9.  echo:
  10.  set /p a10barn=
  11.  if "%a10barn%"=="1" goto :a11fueltank
  12.  if "%a10barn%"=="2" goto :a11flywheel
  13.  if "%a10barn%"=="3" goto :a11transmission
  14.  if "%a10barn%"=="4" goto :a11carborator
  15.  if "%a10barn%"=="5" goto :a11engine
  16.  if "%a10barn%"=="6" goto :a11battery
  17.  if "%a10barn%"=="7" goto :a11toolshed
  18.  if "%a10barn%"=="8" goto :startfarmallsuperh
  19.  goto :a10barn
  20.  
  21. :a11fueltank
  22.  cls
  23.  if defined #15galFuelTank if %#15galFuelTank% geq 1 goto :a11transmissionfixed
  24.  echo:
  25.  echo The fuel tank is rotted out you will need x1 "Fuel Tank 15 Gallon" from the shop or the toolsheds storage to crank the tractor.
  26.  echo:
  27.  call :ListOptions "Next"
  28.  echo:
  29.  set /p a11fueltank=
  30.  if "%a11fueltank%"=="1" goto :a11fueltank
  31.  if "%a11fueltank%"=="2" goto :a11flywheel
  32.  if "%a11fueltank%"=="3" goto :a11transmission
  33.  if "%a11fueltank%"=="4" goto :a11carborator
  34.  if "%a11fueltank%"=="5" goto :a11engine
  35.  if "%a11fueltank%"=="6" goto :a11battery
  36.  if "%a11fueltank%"=="7" goto :a11toolshed
  37.  goto :a11fueltank
  38.  
  39. :a11flywheel
  40.  cls
  41.  if defined Hammers if %Hammers% geq 1 goto :a11flywheelfixed
  42.  echo:
  43.  echo The flywheel is stuck! You will need a hammer to fix it.
  44.  echo:
  45.  call :ListOptions "Next"
  46.  echo:
  47.  set /p a11flywheel=
  48.  if "%a11flywheel%"=="1" goto :a11fueltank
  49.  if "%a11flywheel%"=="2" goto :a11flywheel
  50.  if "%a11flywheel%"=="3" goto :a11transmission
  51.  if "%a11flywheel%"=="4" goto :a11carborator
  52.  if "%a11flywheel%"=="5" goto :a11engine
  53.  if "%a11flywheel%"=="6" goto :a11battery
  54.  if "%a11flywheel%"=="7" goto :a11toolshed
  55.  goto :a11flywheel
  56.  
  57. :a11transmission
  58.  cls
  59.  if defined Wrenchs if %Wrenchs% geq 1  goto :a11transmissionfixed
  60.  echo:
  61.  echo The transmission is stuck in "Reverse Gear", to fix this you manually have to turn the Transmission to "Nuetral", you will need Wrench Size 2 to manually turn the Transmission.
  62.  echo You can find it the the toolshed if you have it.
  63.  call :ListOptions "Next"
  64.  set /p a11transmission=
  65.  if "%a11transmission%"=="1" goto :a11fueltank
  66.  if "%a11transmission%"=="2" goto :a11flywheel
  67.  if "%a11transmission%"=="3" goto :a11transmission
  68.  if "%a11transmission%"=="4" goto :a11carborator
  69.  if "%a11transmission%"=="5" goto :a11engine
  70.  if "%a11transmission%"=="6" goto :a11battery
  71.  if "%a11transmission%"=="7" goto :a11toolshed
  72.  goto :a11transmission
  73.  
  74. :a11carborator
  75.  cls
  76.  if defined Wrenchs if %Wrenchs% geq 1  goto :a11carboratorfixed
  77.  echo:
  78.  echo The carborator is clogged, you will need a "Wrench Size 4" to unscrew the hose clamps.
  79.  call :ListOptions "Next"
  80.  set /p a11carborator=
  81.  if "%a11carborator%"=="1" goto :a11fueltank
  82.  if "%a11carborator%"=="2" goto :a11flywheel
  83.  if "%a11carborator%"=="3" goto :a11transmission
  84.  if "%a11carborator%"=="4" goto :a11carborator
  85.  if "%a11carborator%"=="5" goto :a11engine
  86.  if "%a11carborator%"=="6" goto :a11battery
  87.  if "%a11carborator%"=="7" goto :a11toolshed
  88.  goto :a11carborator
  89.  
  90. :a11engine
  91.  cls
  92.  if defined Bottleofrustremover if %Bottleofrustremover% geq 1  goto :a11enginefixed
  93.  echo:
  94.  echo The engine block is starting to get some surface rust, all you need is a "Bottle of Rust Remover", you probably have it in the shed.
  95.  call :ListOptions "Next"
  96.  set /p a11engine=
  97.  if "%a11engine%"=="1" goto :a11fueltank
  98.  if "%a11engine%"=="2" goto :a11flywheel
  99.  if "%a11engine%"=="3" goto :a11transmission
  100.  if "%a11engine%"=="4" goto :a11carborator
  101.  if "%a11engine%"=="5" goto :a11engine
  102.  if "%a11engine%"=="6" goto :a11battery
  103.  if "%a11engine%"=="7" goto :a11toolshed
  104.  goto :a11engine
  105.  
  106. :a11battery
  107.  cls
  108.  if defined BatteryTester if %BatteryTester% geq 1  goto :a11batteryfixed
  109.  echo:
  110.  echo The battery needs to be tested, use a "Battery Tester" to test your battery. You might have one in your toolshed.
  111.  call :ListOptions "Next"
  112.  echo:
  113.  set /p a11battery=
  114.  if "%a11battery%"=="1" goto :a11fueltank
  115.  if "%a11battery%"=="2" goto :a11flywheel
  116.  if "%a11battery%"=="3" goto :a11transmission
  117.  if "%a11battery%"=="4" goto :a11carborator
  118.  if "%a11battery%"=="5" goto :a11engine
  119.  if "%a11battery%"=="6" goto :a11battery
  120.  if "%a11battery%"=="7" goto :a11toolshed
  121.  goto :a11battery
  122.  
  123. :a11transmissionfixed
  124.  cls
  125.  set transmissionstartfsh=1
  126.  call :FixOnePart "Transmission"
  127.  set /p fix=
  128.  if "%fix%"=="1" goto :a10barn
  129.  
  130. :a11flywheelfixed
  131.  cls
  132.  set flywheelstartfsh=1
  133.  call :FixOnePart "Flywheel"
  134.  set /p fix=
  135.  if "%fix%"=="1" goto :a10barn
  136.  
  137. :a11batteryfixed
  138.  cls
  139.  set batterystartfsh=1
  140.  call :FixOnePart "Battery"
  141.  set /p fix=
  142.  if "%fix%"=="1" goto :a10barn
  143.  
  144. :a11carboratorfixed
  145.  cls
  146.  set carboratorstartfsh=1
  147.  call :FixOnePart "Carborator"
  148.  set /p fix=
  149.  if "%fix%"=="1" goto :a10barn
  150.  
  151. :a11enginefixed
  152.  cls
  153.  set enginestartfsh=1
  154.  call :FixOnePart "Engine"
  155.  set /p fix=
  156.  if "%fix%"=="1" goto :a10barn
  157.  
  158. :a11fueltankfixed
  159.  cls
  160.  set fueltankstartfsh=1
  161.  call :FixOnePart "Fuel Tank"
  162.  set /p fix=
  163.  if "%fix%"=="1" goto :a10barn
  164.  
  165. :a11toolshed
  166.  cls
  167.  echo:
  168.  echo This place is a mess, I have to clean it before I can find any tools. Press 1 to load.
  169.  echo:
  170.  set /p a11toolshed=
  171.  if "%a11toolshed%"=="1" goto :loadtoolshed
  172.  goto :a11toolshed
  173.  
  174. :loadtoolshed
  175.  cls
  176.  echo Loading Complete, press 1 to continue.
  177.  set Wrenchs=3
  178.  set Hammers=1
  179.  set Nuts=16
  180.  set Washers=9
  181.  set BatteryTester=0
  182.  set Tirepump=0
  183.  set BottleOfRustRemover=1
  184.  set #15galFuelTank=0
  185.  set /p load=
  186.  if "%load%"=="1" goto :toolshed
  187.  
  188. :toolshed
  189.  echo:
  190.  echo You have %Wrenchs% wrenchs, %Hammers% hammers, %Nuts% nuts, %Washers% washers,
  191.  echo %BatteryTester% battery testers, %Tirepump% tire pumps, %#15galFuelTank% 15 gallon fuel tanks, and %BottleOfRustRemover% Bottles of rust remover.
  192.  echo:
  193.  echo Go to? 1. Barn 2. Shop
  194.  echo:
  195.  set /p toolshed=
  196.  if "%toolshed%"=="1" goto :a10barn
  197.  if "%toolshed%"=="2" goto :shop
  198.  goto :toolshed
  199.  
  200. :startfarmallsuperh
  201.  cls
  202.  if "%fueltankstartfsh%"=="1" echo What is supposed to happen here?
  203.  if "%batterystartfsh%"=="1" echo What is supposed to happen here?
  204.  if "%carboratorstartfsh%"=="1" echo What is supposed to happen here?
  205.  if "%enginestartfsh%"=="1" echo What is supposed to happen here?
  206.  if "%flywheelstartfsh%"=="1" echo What is supposed to happen here?
  207.  if "%transmissionstartfsh%"=="1" echo What is supposed to happen here?
  208.  echo Press 1 To Start
  209.  echo:
  210.  set /p starting=
  211.  if "%starting%"=="1" goto :fsh
  212.  goto :a10barn
  213.  
  214. :fsh
  215.  cls
  216.  echo test
  217.  echo:
  218.  set /p fff=
  219.  if "%fff%"=="1" goto :startfarmallsuperh
  220.  
  221. :ListOptions -- %1 = "First" or some other entry
  222.  echo:
  223.  if /i "%~1"=="First" (
  224.      set "#msg1=What do you want to check first?"
  225.      set "#msg2=7. Go to Toolshed first instead."
  226.      set "#msg3=8. Try to start Farmall Super H"
  227.  ) else (
  228.      set "#msg1=What do you want to check next?"
  229.      set "#msg2=7. Toolshed."
  230.      set "#msg3="
  231.  )
  232.  
  233.  echo:%#msg1%
  234.  echo:
  235.  echo 1. The Fuel Tank.
  236.  echo 2. The flywheel.
  237.  echo 3. The Transmission
  238.  echo 4. The carborator
  239.  echo 5. The engine
  240.  echo 6. Battery
  241.  echo:%#msg2%
  242.  echo:%#msg3%
  243.  echo:
  244.  goto :EOF
  245.  
  246.  
  247. :FixOnePart -- %1 = "{Part to be fixed}"
  248.  echo:
  249.  echo You have the correct parts to fix the %~1! Press 1 to fix.
  250.  echo:
  251.  goto :EOF
  252.  
Tags: Scripts
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement