[elcius]

local a = {38,25,18,6,353,320,333,342,338}
for i = 2,#a-1 do
    a[i] = ((a[i-1]+a[i+1])/2+(abs(a[i-1]-a[i+1])>180 and 180 or 0))%360
end

?