2019-03-17 14:40:57 +02:00
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
< html >
< head >
< title > 3/tm2< / title >
< meta http-equiv = "Content-Type" content = "text/html; charset=utf-8" >
< meta http-equiv = "Content-Language" content = "en-gb" >
< link href = "inweb.css" rel = "stylesheet" rev = "stylesheet" type = "text/css" >
< / head >
< body >
<!-- Weave of '3/ts' generated by 7 -->
< ul class = "crumbs" > < li > < a href = "../webs.html" > ★ < / a > < / li > < li > < a href = "index.html" > if< / a > < / li > < li > < a href = "index.html#3" > Chapter 3: Space and Time< / a > < / li > < li > < b > The Score< / b > < / li > < / ul > < p class = "purpose" > A plugin to support the maximum score variable.< / p >
< ul class = "toc" > < li > < a href = "#SP1" > § 1. Definitions< / a > < / li > < li > < a href = "#SP3" > § 3. Initialisation< / a > < / li > < li > < a href = "#SP4" > § 4. The maximum score and rankings table< / a > < / li > < / ul > < hr class = "tocbar" >
< p class = "inwebparagraph" > < a id = "SP1" > < / a > < b > § 1. Definitions. < / b > < / p >
< p class = "inwebparagraph" > < a id = "SP2" > < / a > < b > § 2. < / b > For many years this was a defined I6 constant, but then people sent in bug
reports asking why it wouldn't change in play.
< / p >
< pre class = "display" >
< span class = "identifier" > nonlocal_variable< / span > < span class = "plain" > *< / span > < span class = "identifier" > max_score_VAR< / span > < span class = "plain" > = < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ;< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "inwebparagraph" > < a id = "SP3" > < / a > < b > § 3. Initialisation. < / b > < / p >
< pre class = "display" >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > PL::Score::start< / span > < span class = "plain" > (< / span > < span class = "reserved" > void< / span > < span class = "plain" > ) {< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function PL::Score::start appears nowhere else.< / p >
< p class = "inwebparagraph" > < a id = "SP4" > < / a > < b > § 4. The maximum score and rankings table. < / b > A special rule is that if a table is called "Rankings" and contains a column
of numbers followed by a column of text, then it is used by the run-time
scoring system. In retrospect, Inform really shouldn't support this at the
compiler level (not that it does much), and in any case it's a very old-school
idea of IF. Still, it does little harm.
< / p >
< pre class = "display" >
< span class = "plain" > < < / span > < span class = "identifier" > rankings< / span > < span class = "plain" > -< / span > < span class = "identifier" > table< / span > < span class = "plain" > -< / span > < span class = "identifier" > name< / span > < span class = "plain" > > ::=< / span >
< span class = "identifier" > rankings< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "inwebparagraph" > < a id = "SP5" > < / a > < b > § 5. < / b > This can only happen if we declare it somehow in I6 code, which
we do with the constant < code class = "display" > < span class = "extract" > RANKING_TABLE< / span > < / code > . We also set the < code class = "display" > < span class = "extract" > MAX_SCORE< / span > < / code > variable
equal to the number in the bottom row of the table, which is assumed to be the
score corresponding to successful completion and the highest rank.
< / p >
< pre class = "display" >
< span class = "reserved" > void< / span > < span class = "plain" > < / span > < span class = "functiontext" > PL::Score::compile_max_score< / span > < span class = "plain" > (< / span > < span class = "reserved" > void< / span > < span class = "plain" > ) {< / span >
< span class = "identifier" > table< / span > < span class = "plain" > *< / span > < span class = "identifier" > t< / span > < span class = "plain" > ;< / span >
< span class = "identifier" > LOOP_OVER< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > , < / span > < span class = "identifier" > table< / span > < span class = "plain" > ) {< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< < / span > < span class = "identifier" > rankings< / span > < span class = "plain" > -< / span > < span class = "identifier" > table< / span > < span class = "plain" > -< / span > < span class = "identifier" > name< / span > < span class = "plain" > > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > -> < / span > < span class = "identifier" > table_name_text< / span > < span class = "plain" > )) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > Tables::get_no_columns< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > ) > = 2) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > Kinds::Compare::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > Tables::kind_of_ith_column< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > , 0), < / span > < span class = "identifier" > K_number< / span > < span class = "plain" > )) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > Kinds::Compare::eq< / span > < span class = "plain" > (< / span > < span class = "identifier" > Tables::kind_of_ith_column< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > , 1), < / span > < span class = "identifier" > K_text< / span > < span class = "plain" > ))) {< / span >
2019-04-12 16:47:00 +03:00
< span class = "identifier" > inter_name< / span > < span class = "plain" > *< / span > < span class = "identifier" > iname< / span > < span class = "plain" > = < / span > < span class = "identifier" > Hierarchy::find< / span > < span class = "plain" > (< / span > < span class = "identifier" > RANKING_TABLE_HL< / span > < span class = "plain" > );< / span >
2019-04-12 03:47:23 +03:00
< span class = "identifier" > Emit::named_iname_constant< / span > < span class = "plain" > (< / span > < span class = "identifier" > iname< / span > < span class = "plain" > , < / span > < span class = "identifier" > K_value< / span > < span class = "plain" > , < / span > < span class = "identifier" > Tables::identifier< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > ));< / span >
2019-03-17 14:40:57 +02:00
< span class = "identifier" > parse_node< / span > < span class = "plain" > *< / span > < span class = "identifier" > PN< / span > < span class = "plain" > = < / span > < span class = "identifier" > Tables::cells_in_ith_column< / span > < span class = "plain" > (< / span > < span class = "identifier" > t< / span > < span class = "plain" > , 0);< / span >
< span class = "reserved" > while< / span > < span class = "plain" > ((< / span > < span class = "identifier" > PN< / span > < span class = "plain" > != < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > PN< / span > < span class = "plain" > -< / span > < span class = "element" > > next< / span > < span class = "plain" > != < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > )) < / span > < span class = "identifier" > PN< / span > < span class = "plain" > = < / span > < span class = "identifier" > PN< / span > < span class = "plain" > -< / span > < span class = "element" > > next< / span > < span class = "plain" > ;< / span >
< span class = "reserved" > if< / span > < span class = "plain" > ((< / span > < span class = "identifier" > PN< / span > < span class = "plain" > != < / span > < span class = "identifier" > NULL< / span > < span class = "plain" > ) & & (< / span > < span class = "identifier" > max_score_VAR< / span > < span class = "plain" > ) & & < / span >
< span class = "plain" > (< / span > < span class = "identifier" > NonlocalVariables::has_initial_value_set< / span > < span class = "plain" > (< / span > < span class = "identifier" > max_score_VAR< / span > < span class = "plain" > ) == < / span > < span class = "identifier" > FALSE< / span > < span class = "plain" > ))< / span >
< span class = "identifier" > Assertions::PropertyKnowledge::initialise_global_variable< / span > < span class = "plain" > (< / span >
< span class = "identifier" > max_score_VAR< / span > < span class = "plain" > , < / span > < span class = "identifier" > ParseTree::get_evaluation< / span > < span class = "plain" > (< / span > < span class = "identifier" > PN< / span > < span class = "plain" > ));< / span >
< span class = "reserved" > break< / span > < span class = "plain" > ;< / span >
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
2019-04-12 16:47:00 +03:00
< span class = "identifier" > inter_name< / span > < span class = "plain" > *< / span > < span class = "identifier" > iname< / span > < span class = "plain" > = < / span > < span class = "identifier" > Hierarchy::find< / span > < span class = "plain" > (< / span > < span class = "identifier" > INITIAL_MAX_SCORE_HL< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "reserved" > if< / span > < span class = "plain" > (< / span > < span class = "identifier" > NonlocalVariables::has_initial_value_set< / span > < span class = "plain" > (< / span > < span class = "identifier" > max_score_VAR< / span > < span class = "plain" > )) {< / span >
< span class = "identifier" > inter_t< / span > < span class = "plain" > < / span > < span class = "identifier" > v1< / span > < span class = "plain" > = 0, < / span > < span class = "identifier" > v2< / span > < span class = "plain" > = 0;< / span >
2019-04-19 16:36:05 +03:00
< span class = "identifier" > NonlocalVariables::seek_initial_value< / span > < span class = "plain" > (< / span > < span class = "identifier" > iname< / span > < span class = "plain" > , & < / span > < span class = "identifier" > v1< / span > < span class = "plain" > , & < / span > < span class = "identifier" > v2< / span > < span class = "plain" > , < / span > < span class = "identifier" > max_score_VAR< / span > < span class = "plain" > );< / span >
2019-04-09 18:09:53 +03:00
< span class = "identifier" > Emit::named_generic_constant< / span > < span class = "plain" > (< / span > < span class = "identifier" > iname< / span > < span class = "plain" > , < / span > < span class = "identifier" > v1< / span > < span class = "plain" > , < / span > < span class = "identifier" > v2< / span > < span class = "plain" > );< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > } < / span > < span class = "reserved" > else< / span > < span class = "plain" > {< / span >
2019-04-09 18:09:53 +03:00
< span class = "identifier" > Emit::named_numeric_constant< / span > < span class = "plain" > (< / span > < span class = "identifier" > iname< / span > < span class = "plain" > , 0);< / span >
2019-03-17 14:40:57 +02:00
< span class = "plain" > }< / span >
< span class = "plain" > }< / span >
< / pre >
< p class = "inwebparagraph" > < / p >
< p class = "endnote" > The function PL::Score::compile_max_score appears nowhere else.< / p >
< hr class = "tocbar" >
< ul class = "toc" > < li > < a href = "3-tm2.html" > Back to 'Temporal Map'< / a > < / li > < li > < i > (This section ends Chapter 3: Space and Time.)< / i > < / li > < / ul > < hr class = "tocbar" >
2019-04-22 17:42:10 +03:00
<!-- End of weave -->
2019-03-17 14:40:57 +02:00
< / body >
< / html >