/
random_books.dm
116 lines (99 loc) · 3.89 KB
/
random_books.dm
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
/obj/item/book/manual/random
icon_state = "random_book"
/obj/item/book/manual/random/Initialize(mapload)
..()
var/static/banned_books = list(/obj/item/book/manual/random, /obj/item/book/manual/nuclear, /obj/item/book/manual/wiki)
var/newtype = pick(subtypesof(/obj/item/book/manual) - banned_books)
new newtype(loc)
return INITIALIZE_HINT_QDEL
/obj/item/book/random
icon_state = "random_book"
/// The category of books to pick from when creating this book.
var/random_category = null
/// If this book has already been 'generated' yet.
var/random_loaded = FALSE
/obj/item/book/random/Initialize(mapload)
. = ..()
gen_random_icon_state()
/obj/item/book/random/attack_self()
if(!random_loaded)
create_random_books(1, loc, TRUE, random_category, src)
random_loaded = TRUE
return ..()
/obj/structure/bookcase/random
load_random_books = TRUE
books_to_load = 2
icon_state = "random_bookcase"
/obj/structure/bookcase/random/Initialize(mapload)
. = ..()
if(books_to_load && isnum(books_to_load))
books_to_load += pick(-1,-1,0,1,1)
update_appearance()
/proc/create_random_books(amount, location, fail_loud = FALSE, category = null, obj/item/book/existing_book)
. = list()
if(!isnum(amount) || amount<1)
return
if (!SSdbcore.Connect())
if(existing_book && (fail_loud || prob(5)))
var/error_text = "There once was a book from Nantucket<br>But the database failed us, so f*$! it.<br>I tried to be good to you<br>Now this is an I.O.U<br>If you're feeling entitled, well, stuff it!<br><br><font color='gray'>~</font>"
existing_book.book_data = new("Strange Book", "???", error_text)
return
if(prob(25))
category = null
var/datum/db_query/query_get_random_books = SSdbcore.NewQuery({"
SELECT title, author, content
FROM [format_table_name("library")]
WHERE isnull(deleted) AND (:category IS NULL OR category = :category)
ORDER BY rand() LIMIT :limit
"}, list("category" = category, "limit" = amount))
if(query_get_random_books.Execute())
while(query_get_random_books.NextRow())
var/list/book_deets = query_get_random_books.item
var/obj/item/book/to_randomize = existing_book ? existing_book : new(location)
to_randomize.book_data = new()
var/datum/book_info/data = to_randomize.book_data
data.set_title(book_deets[1], trusted = TRUE)
data.set_author(book_deets[2], trusted = TRUE)
data.set_content(book_deets[3], trusted = TRUE)
to_randomize.name = "Book: [to_randomize.book_data.title]"
if(!existing_book)
to_randomize.gen_random_icon_state()
qdel(query_get_random_books)
/obj/structure/bookcase/random/fiction
name = "bookcase (Fiction)"
random_category = "Fiction"
///have we spawned the chuuni granter
var/static/chuuni_book_spawned = FALSE
/obj/structure/bookcase/random/fiction/after_random_load()
if(!chuuni_book_spawned && is_station_level(z))
chuuni_book_spawned = TRUE
new /obj/item/book/granter/chuunibyou(src)
/obj/structure/bookcase/random/nonfiction
name = "bookcase (Non-Fiction)"
random_category = "Non-fiction"
/obj/structure/bookcase/random/religion
name = "bookcase (Religion)"
random_category = "Religion"
/obj/structure/bookcase/random/adult
name = "bookcase (Adult)"
random_category = "Adult"
/obj/structure/bookcase/random/reference
name = "bookcase (Reference)"
random_category = "Reference"
///Chance to spawn a random manual book
var/ref_book_prob = 20
/obj/structure/bookcase/random/reference/Initialize(mapload)
. = ..()
while(books_to_load > 0 && prob(ref_book_prob))
books_to_load--
new /obj/item/book/manual/random(src)
/obj/structure/bookcase/random/reference/wizard
desc = "It reeks of cheese..."
///Whether this shelf has spawned a cheese granter
var/static/cheese_granter_spawned = FALSE
/obj/structure/bookcase/random/reference/wizard/after_random_load()
if(cheese_granter_spawned)
return
cheese_granter_spawned = TRUE
new /obj/item/book/granter/action/spell/summon_cheese(src)
new /obj/item/book/manual/ancient_parchment(src)