1
0
Fork 0
mirror of https://github.com/ganelson/inform.git synced 2024-07-05 16:44:21 +03:00
inform7/indoc/Chapter 4/Codename Lacuna.w

27 lines
787 B
OpenEdge ABL
Raw Normal View History

2019-02-05 02:44:07 +02:00
[Lacuna::] Codename Lacuna.
The "lacuna" style of navigational gadgets, a plain text style with
no navigational features at all.
@h Creation.
2019-02-05 02:44:07 +02:00
=
navigation_design *Lacuna::create(void) {
2019-02-17 16:08:19 +02:00
navigation_design *ND = Nav::new(I"lacuna", FALSE, TRUE);
METHOD_ADD(ND, RENDER_CHAPTER_TITLE_MTID, Lacuna::lacuna_chapter_title);
METHOD_ADD(ND, RENDER_SECTION_TITLE_MTID, Lacuna::lacuna_section_title);
return ND;
2019-02-05 02:44:07 +02:00
}
@h Top.
At the front end of a section, before any of its text.
2019-02-05 02:44:07 +02:00
=
void Lacuna::lacuna_chapter_title(navigation_design *self, text_stream *OUT, volume *V, chapter *C) {
WRITE("%S\n\n", C->chapter_full_title);
2019-02-05 02:44:07 +02:00
}
void Lacuna::lacuna_section_title(navigation_design *self, text_stream *OUT, volume *V, chapter *C, section *S) {
WRITE("\n%c%S\n\n", SECTION_SYMBOL, S->title);
2019-02-05 02:44:07 +02:00
}