planed.ru


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213

#!/usr/bin/env ruby

def plane
  (('A'..'Z').to_a.sample(rand(2) + 2) +
   (0..9).to_a.sample(rand(2) + 3)).join +
  (rand(3) == 0 ? " heavy" : "")
end

def heading
  "%03d" % (rand(72) * 5)
end

def level
  rand(32) + 7
end

def altitude
  (rand(6) + 1) * 1000
end

def please
  "please #{%w(climb descend).sample} flight level #{level}"
end

def beacon
  c = %w(B C D F G H J K L M N P Q R S T V W X Z)
  v = %w(A E I O U Y)

  case rand(4)
  when 0
    c.sample + v.sample + c.sample
  when 1
    c.sample + v.sample + c.sample + v.sample + c.sample
  when 2
    c.sample + v.sample + c.sample + c.sample + v.sample
  when 3
    c.sample + c.sample + v.sample
  end
end

def digit?
  d = rand(5)
  d = "" if d.zero?
  d.to_s
end

def route
  c = %w(B C D F G H J K L M N P Q R S T V W X Z)
  v = %w(A E I O U Y)

  case rand(2)
  when 0
    c.sample + v.sample + c.sample + v.sample + c.sample + digit?
  when 1
    c.sample + v.sample + c.sample + c.sample + v.sample + digit?
  end
end

def runway
  "#{rand(36) + 1}#{%w(_ _ L L L C R R R).sample.gsub(/_/, "")}"
end

def clearance
  "cleared to " +
    case rand(6)
    when 0
      "heading #{heading}"
    when 1
      "flight level #{level}"
    when 2
      "#{altitude} feet"
    when 3
      beacon
    when 4
      "land runway #{runway}"
    when 5
      "take off runway #{runway}"
    end
end

def localizer?
  case rand(3)
  when 0
    " until established on the localizer"
  when 1..2
    ""
  end
end

def maintain
  "maintain #{altitude} feet#{localizer?}"
end

def vectors
  case rand(2)
  when 0
    "expect vectors for the #{%w(ILS RNAV).sample} runway #{runway}"
  when 1
    "join the localizer runway #{runway}"
  end
end

def proceed
  "#{%w(proceed fly).sample} direct #{beacon}"
end

def location
  %w(
      ground
      delivery
      departure
      arrival
      tower
      tracks
  ).sample
end

def frequency
  (rand(13) + 118) +
    (rand(200) / 200.0)
end

def contact
  "contact #{location} on #{frequency}"
end

def monitor
  "monitor #{frequency}"
end

def turn
  case rand(3)
  when 0
    "turn left heading #{heading}#{localizer?}"
  when 1
    "turn heading #{heading}#{localizer?}"
  when 2
    "turn right heading #{heading}#{localizer?}"
  end
end

def radar
  "radar contact"
end

def transition?
  ", #{runway} transition"
end

def star
  case rand(3)
  when 0
    "descend via #{route}"
  when 1
    "join the #{route} arrival"
  when 2
    "descend on the #{route} arrival"
  end
end

def sid
  "proceed direct #{beacon}, join the #{route} departure"
end

def sentence
  plane + " " +
    case rand(21)
    when 0
      please
    when 1
      proceed
    when 2
      contact
    when 3
      monitor
    when 4..9 
      clearance
    when 10..12
      turn
    when 13
      radar
    when 14..15
      star
    when 16..17
      sid
    when 18..19
      vectors
    when 20
      maintain
    end
end

require 'faye/websocket'

Faye::WebSocket.load_adapter('thin')

webpage = File.read("planed.html")

App = lambda do |env|
  if Faye::WebSocket.websocket?(env)
    ws = Faye::WebSocket.new(env)

    ws.on(:message) do |ev|
      ws.send(sentence)
    end

    ws.rack_response
  else
    [200, { 'Content-Type' => 'text/html' }, [webpage]]
  end
end

run App