View difference between Paste ID: YU3xb5VY and 3us5SqG9

 --Automated Cruise Control v2 by Gazer29
 --Uses Automation mod version: Beta 1
 
 local component = require("component")
 local term = require ("term")
 local entity = component.entity_link.getAPI("immersiverailroading:locomotivediesel")
 local thread = require("thread")
 require("PIDController")
 local serial = require("serialization")
 local fs = require("filesystem")
 local glassesTerminal = require("component").glasses
 local event = require("event")
 local modem = component.modem
 
 local ATC = false
 local RUNNING = true
 local MODE = 0 -- 0 SET, 1 RAMP,
 local sleep = 1 -- seconds
 local display = false
 local iteration = 1
 local timer = nil
-local CONFIG_FILE = "/home/Waypoints.cfg"
+
 local CONFIG_FILE = "/home/CMD.dat"
-local DEFAULT_CONFIG = {
+
-  array = {
+local DEFAULT_CONFIG = {}
-	{
+
-	waypoint = "Station 1",
+
-	speed = 0,
+
-	radius = 10,
+
-	x = 1180,
+
-	z = -333,
+
-	mode = "wait",
+
-	data = 20
+
-	},
+
-	{
+
-	waypoint = "Waypoint 2",
+
-	speed = 10,
+
-	radius = 10,
+
-	x = 1180,
+
-	z = -333,
+
-	mode = nil,
+
-	data = nil
+
-	},
+
-	{
+
-	waypoint = "Waypoint 3",
+
-	speed = 5,
+
-	radius = 10,
+
-	x = 1136,
+
-	z = -333,
+
-	mode = nil,
+
-	data = nil
+
-	}
+
-  }
+
-}
+
 
 local function loadConfig() -- Adapted from HandieAndy's code
   local f = io.open(CONFIG_FILE, "r")
   if f == nil then
 	--print("Could not open " .. CONFIG_FILE .. ".")
 	--print("Loading default config")
 	--saveConfig(CONFIG_FILE, DEFAULT_CONFIG)
 	return DEFAULT_CONFIG
 	else
 	local config = serial.unserialize(f:read("*a"))
 	f:close()
 	return config
 	end
 end
 
 function helpdisplay()
 	print("AutomaticTrainControl v1")
 	print("Commands:")
 	print("'Any number'    - Changes set speed")
 	print("'+' 		- Displays additional information")
 	print("'-' 		- Hides additional information")
 	print("'ramp'		- Changes to ramp mode, requires further input")
 	print("'idle'		- Pauses train control")
 	print("'auto'		- Automatic control")
 	print("'stop' 		- Ends program")
 end
 
 function GetTrainPos()
 	positions = entity.getLocation()
 	xpos = positions.getX()
 	ypos = positions.getY()
 	zpos = positions.getZ()
 	print("X: 	", xpos)
-	print("Could not open " .. CONFIG_FILE .. ".")
+
-	print("Loading default config")
+
-	saveConfig(CONFIG_FILE, DEFAULT_CONFIG)
+
 function GetTrainSpeed()
 	speed = entity.getCurrentSpeed()
 	return speed
 end
 
 function GetUUID()
 	uuid = entity.getUUID()
 	return uuid
 end
 
 function setThrottle(x)
 	if 0 >= x then x = 0 end
 	if 1 <= x then x = 1 end
 	entity.setThrottleLevel(x)
 	if display then
 		print("Throttle: ", x)
-	print("'save'		- Saves config file")
+
 end
 
 function setBrake(x)
 	if 0 >= x then x = 0 end
 	if 1 <= x then x = 1 end
 	entity.setAirBrakeLevel(x)
 	if display then
 		print("Brake:   ", x)
 		end
 end
 
 local function reads()
   while RUNNING do
     user = nil
     user = io.read()
 	if user == "stop" then
 		print("STOPPING...")
 		os.sleep(1)
 		stop()
 		end
 	if user == "." then
 		term.clear()
 		end
 	if user == "idle" then
 		MODE = 2
 		end
     if user == "auto" then
 		MODE = 3
 		end
 	if user == "ramp" then
 		print("Start Speed (type 'x' for current setpoint):")
 		c = io.read()
 		if c == "x" then
 			c = setpoint
 			end
 		print("End Speed:")
 		rampStart = c
 		c = io.read()
 		print("Ramp Time (seconds):")
 		rampEnd = c
 		c = io.read()
 		rampTime = c
 		rampDiff = rampEnd - rampStart
 		rampCount = math.floor(rampTime/sleep)
 		rampInc = rampDiff / rampCount
 		PID:SetPoint(rampStart)
 		setpoint = rampStart
 		MODE = 1
 		end
 	if user == "+" then
 		display = true
 		term.clear()
 		end
 	if user == "-" then
 		display = false
 		term.clear()
 		os.sleep(1)
 		helpdisplay()
 		end
 	if nil ~= tonumber(user) then
 		MODE = 0
 		PID:SetPoint(user)
 		setpoint = user
 		print("Setting Speed: ", user)
 		end
     os.sleep(1)
   end
 end
 
 
 local function main()
 	while RUNNING do
 		input = GetTrainSpeed()
 		if MODE ~= 2 then
-	if user == "save" then
+
-		saveConfig(CONFIG_FILE, CONFIG)
+
 				  rampCount = rampCount - 1
 				  setpoint = setpoint + rampInc
 				  PID:SetPoint(setpoint)
 				  if rampCount == 0 then
 					setpoint = rampEnd
 					PID:SetPoint(rampEnd)
 					end
 				  else
 				  Mode = 0
 				  end
 				end
             if MODE == 3 then
                 CONFIG = loadConfig()
                 if CONFIG[uuid] ~= nil then
                     print(CONFIG[uuid].setspeed)
                 	setpoint = CONFIG[uuid].setspeed
 					PID:SetPoint(setpoint)
--- run through array
+                    end
-function getDistance()
+                end
-	--active = CONFIG.array[iteration]
+
-	x1 = active.x
+
-	z1 = active.z
+
-	positions = entity.getLocation()
+
-	y1 = positions.getY()
+
-	x = positions.getDistanceToCoordinates(x1,y1,z1)
+
-	return x
+
 		if display then
 			print("CurrentSpeed: ", input)
 			if MODE ~= 2 then
 				print("SetPoint: ", setpoint)
 				end
-		array = CONFIG.array
+
-		active = CONFIG.array[iteration]
+
-		distance = getDistance()
+
-		if distance < active.radius or timer ~= nil then
+
-			setpoint = active.speed
+
-			PID:SetPoint(setpoint)
+
-			if active.mode == "wait" then
+
-				if timer == nil then
+
-					timer = active.data
+
   end
-				if timer > 0 then
+
-					timer = timer - 1
+
-					else
+
-					timer = nil
+
-					if iteration >= #array then
+
-						iteration = 1
+
-						else
+  if MODE == 3 then
-						iteration = iteration + 1
+
-						end
+
     end
-				else
+
-				if iteration >= #array then
+
-					iteration = 1
+
-					else
+
-					iteration = iteration + 1
+
 
 function inbounds(x0, y0, x1, y1, x2, y2)
   local output = false
-
+
     if y0 > y1 then
       if x0 < x2 then
         if y0 < y2 then
           output = true
           end
         end
       end
     end
   return output
 end
 
 function pullOverlay()
 while RUNNING do
   EVENT, ID, USER, X, Y, BUTTON = event.pull("interact_overlay")
   if inbounds(X,Y,0,0,41,7) then
 	if ATC == true then
     	MODE = 2
         else
         MODE = 3
         PID:SetPoint(setpoint)
         end
   elseif inbounds(X,Y,0,11,20,16) then
     setpoint = setpoint + 10
     PID:SetPoint(setpoint)
   elseif inbounds(X,Y,0,19,20,24) then
     setpoint = setpoint - 10
     PID:SetPoint(setpoint)
-			print("Waypoint: ",active.waypoint)
+
-			print("Distance: ",distance)
+
-			print("Timer: 	",timer)
+
 
 local function handleMessage(host, msg)
   local packet = serial.unserialize(msg)
   if packet == nil then
     print("nil packet")
     return
   end
   if packet.t == "STATUS" then
         print(packet.v)
     	saveConfig(CONFIG_FILE, packet.v)
   else
     print("unknown command")
   end
 end
 
 function start()
-  if MODE == 0 then
+    modem.open(54421)
     while RUNNING do
       local eventName, p1, p2, p3, p4, p5 = event.pull()
       if eventName == "modem_message" then
         print("recv")
         handleMessage(p2, p5)
       end
     end
     modem.close(54421)
 end
 
 ----------- Main loop ------------
 
 term.clear()
 CONFIG = loadConfig()
 setpoint = 0
 PID:new(0.01, 0.5, 0.0001, 0)
 PID:SetInput((GetTrainSpeed()))
 PID:SetOutput(0)
 PID:SetPoint(setpoint)
 PID:SetOutputLimits(-1, 1)
 PID:SetMode(1)
 
 helpdisplay()
 uuid = GetUUID()
 
 local tb = thread.create(main)
 local ta = thread.create(reads)
 local tc = thread.create(pullOverlay)
 local td = thread.create(start)
 tb:join()
-        MODE = 0
+
 tc:join()
 td:join()
 term.clear()