summaryrefslogtreecommitdiff
path: root/beescroll.lua
blob: fe0ac868510f4b5401a7330ed74136014881b4d3 (plain)
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
local m = peripheral.find"monitor"

local W,H = m.getSize()

local cities = {}
local fp = assert(fs.open("/cities.txt","r"))
repeat
	local line = fp.readLine()
	table.isert(cities,line)
until not line
fp.close()

local verbs = {
	"recovered",
	"extinguished",
	"exsanguinated",
	"defenestrated",
	"obtained",
	"recovered",
	"mistreated",
	"relocated",
	"enraptured",
	"found",
	"seen",
	"heard",
	"devestated",
	"trusted",
	"distrusted",
	"promoted",
	"extended",
	"stretched",
	"squished",
	"moved",
	"rotated",
	"frozen",
	"unfrozen",
	"deployed",
	"redeployed",
	"shaken",
	"stirred",
	"discovered",
	"defeated",
	"thwarted",
	"confounded",
	"separated",
	"dissected",
	"submerged",
	"extracted",
	"zereod",
	"reset",
	"hidden",
	"concealed",
	"remade",
	"detected",
	"skolemized",
	"reinterpreted",
	"unfazed",
}

local function choice(list)
	return list[math.random(#list)]
end

while true do
	local x = math.random(0,99999)
	m.scroll(1)
	m.setCursorPos(1,H)
	m.write(("%5d bees have been %s in %s."):format(
		x, choice(verbs), choice(cities)
	)
	os.sleep(1)

end