Thank you for you support! I checked the page names but that didn't solve the problem.
Here is the code (language is finnish. sorry):
<!--Saved by Quest 5.4.4840.17608-->
<asl version="540">
<include ref="GamebookCore.aslx" />
<game name="antti game">
<gameid>7ab97099-0586-4634-a527-bf29d1206605</gameid>
<version>1.0</version>
<firstpublished>2013</firstpublished>
</game>
<object name="alku">
<inherit name="scripttext" />
<description>Heräät sängystä yksiössäsi. Työpöydällä on tietokone. Seinällä on kartta. Tiskialtaassa on tiskaamattomia tiskejä.</description>
<options type="stringdictionary">
<item>
<key>kone käyntiin</key>
<value>Käynnistät tietokoneen</value>
</item>
<item>
<key>Tiskaaminen</key>
<value>Alat tiskaamaan</value>
</item>
</options>
<script type="script">
if (HasSeenPage(Revi kartta palasiksi)) {
RemovePageLink (alku, kartan katsominen)
}
else {
AddPageLink (alku, kartan katsominen, "Katso karttaa")
}
</script>
<object name="player">
<inherit name="defaultplayer" />
</object>
</object>
<object name="kone käyntiin">
<description>Kone käynnistyy ja työpöytä avautuu eteesi.</description>
<options type="stringdictionary">
<item>
<key>Avaa sähköposti</key>
<value>Avaa sähköposti</value>
</item>
<item>
<key>Pelaa tekstiseikkailupeliä</key>
<value>Pelaa tekstiseikkailupeliä</value>
</item>
</options>
</object>
<object name="kartan katsominen">
<description>Kartassa näkyy Virtain kaupunki ja ympäröivää metsää.</description>
<options type="stringdictionary">
<item>
<key>Sulje silmät ja tökkää karttaa sormella sokkona</key>
<value>Sulje silmät ja tökkää karttaa sormella sokkona</value>
</item>
<item>
<key>Revi kartta palasiksi</key>
<value>Revi kartta palasiksi</value>
</item>
<item>
<key>Mene sängylle istumaan</key>
<value>Mene sängylle istumaan</value>
</item>
</options>
</object>
<object name="Tiskaaminen">
<options type="stringdictionary">
<item>
<key>Tiskaa lisää 1</key>
<value>Tiskaa lisää</value>
</item>
<item>
<key>Avaa jääkaappi</key>
<value>Avaa jääkaappi</value>
</item>
<item>
<key>kone käyntiin</key>
<value>Käynnistä tietokone</value>
</item>
<item>
<key>kartan katsominen</key>
<value>Katso karttaa</value>
</item>
</options>
<description>Otat käteesi likaisen lautasen ja jynssäät sitä tiskiharjalla.</description>
</object>
<object name="Tiskaa lisää 1">
<options type="stringdictionary">
<item>
<key>Tiskaa lisää 2</key>
<value>Tiskaa lisää</value>
</item>
<item>
<key>Avaa jääkaappi</key>
<value>Avaa jääkaappi</value>
</item>
</options>
<description>Otat käteesi haarukan ja jynssäät sitä tiskiharjalla.</description>
</object>
<object name="Avaa jääkaappi">
<options type="stringdictionary">
<item>
<key>Juo appelsiinimehua</key>
<value>Juo appelsiinimehua</value>
</item>
</options>
<description>Jääkaapissa on appelsiinimehua.</description>
</object>
<object name="Tiskaa lisää 2">
<description>Otat käteesi lasin ja jynssäät sitä tiskiharjalla.</description>
<options type="stringdictionary">
<item>
<key>Tiskaa lisää 3</key>
<value>Tiskaa lisää</value>
</item>
<item>
<key>Avaa jääkaappi tiskit tehty</key>
<value>Avaa jääkaappi</value>
</item>
</options>
</object>
<object name="Juo appelsiinimehua">
<options type="stringdictionary">
<item>
<key>Juo likaisesta lasista</key>
<value>Juo likaisesta lasista</value>
</item>
<item>
<key>Tiskaa lisää 2</key>
<value>Tiskaa lisää</value>
</item>
<item>
<key>Sika</key>
<value>Juo suoraan purkista</value>
</item>
</options>
<description>Sinulla ei ole yhtään puhdasta lasia</description>
</object>
<object name="Juo likaisesta lasista">
<description>Tulet huonovointiseksi. Joudut menemään takaisin makuuasentoon sänkyysi.</description>
<options type="stringdictionary">
<item>
<key>alku</key>
<value>Nukahdat ja heräät sängystäsi.</value>
</item>
</options>
</object>
<object name="Tiskaa lisää 3">
<inherit name="scripttext" />
<options type="stringdictionary">
<item>
<key>alku</key>
<value>Mene nukkumaan</value>
</item>
</options>
<description>Tiskaat ja tiskaat, kunnes on jo ilta.</description>
<script type="script">
IncreaseCounter ("boring")
</script>
</object>
<object name="Avaa jääkaappi tiskit tehty">
<options type="stringdictionary">
<item>
<key>Juo appelsiinimehua tiskit tehty</key>
<value>Juo appelsiinimehua</value>
</item>
<item>
<key>Avaa jääkaappi tiskit tehty</key>
<value>Laita mehu takaisin jääkaappiin</value>
</item>
</options>
<description>Jääkaapissa on appelsiinimehua. Otat purkin käteesi.</description>
</object>
<object name="Juo appelsiinimehua tiskit tehty" />
<object name="Laita mehu takaisin jääkaappiin">
<description>Mehu on taas jääkaapissa</description>
<options type="stringdictionary">
<item>
<key>Tiskaa lisää 1</key>
<value>Mene tiskaamaan</value>
</item>
<item>
<key>kartan katsominen</key>
<value>Katso karttaa</value>
</item>
</options>
</object>
<object name="Sika">
<inherit name="scripttext" />
<description>Sika!</description>
<options type="stringdictionary">
<item>
<key>kone käyntiin</key>
<value>Mene käynnistämään tietokone</value>
</item>
<item>
<key>kartan katsominen</key>
<value>Katso karttaa</value>
</item>
</options>
<script type="script">
IncreaseCounter ("piggy")
</script>
</object>
<object name="Avaa sähköposti">
<options type="stringdictionary">
<item>
<key>Olet voittanut miljoonan</key>
<value>Olet voittanut 1 000 000 euroa!!</value>
</item>
<item>
<key>Seuraa lähialueesi naisista</key>
<value>Seuraa lähialueesi naisista</value>
</item>
<item>
<key>Ajattelin muistuttaa vielä</key>
<value>Ajattelin muistuttaa vielä</value>
</item>
</options>
<description>Sähköpostissa on kolme viestiä. Ehdit lukea vain yhden niistä. Valitse haluamasi viesti otsikon perusteella.</description>
</object>
<object name="Pelaa tekstiseikkailupeliä">
<description>Alat pelaamaan kiehtovaa tekstiseikkailua.</description>
<options type="stringdictionary">
<item>
<key>alku</key>
<value>Tekstiseikkailun alkuun</value>
</item>
</options>
</object>
<object name="Olet voittanut miljoonan">
<options type="stringdictionary">
<item>
<key>Klikkaa jackpotlinkkiä</key>
<value>Klikkaa linkkiä</value>
</item>
<item>
<key>Laita viesti roskapostikansioosi</key>
<value>Laita viesti roskapostikansioosi</value>
</item>
<item>
<key>Vedä tietokoneen töpseli irti seinästä</key>
<value>Vedä tietokoneen töpseli irti seinästä</value>
</item>
</options>
<description><![CDATA[Viestissä lukee:<br/>Onneksi olkoon, olet voittanut eurojackpotin päävoiton, 1 000 000 euroa! Lunasta voittosi klikkaamalla alla olevaa linkkiä!]]></description>
</object>
<object name="Seuraa lähialueesi naisista" />
<object name="Ajattelin muistuttaa vielä" />
<object name="Klikkaa jackpotlinkkiä" />
<object name="Laita viesti roskapostikansioosi" />
<object name="Vedä tietokoneen töpseli irti seinästä">
<options type="stringdictionary">
<item>
<key>Avaa jääkaappi</key>
<value>Avaa jääkaappi</value>
</item>
<item>
<key>alku</key>
<value>Mene nukkumaan.</value>
</item>
<item>
<key>kartan katsominen</key>
<value>Katso karttaa.</value>
</item>
</options>
<description>Tietokoneesi pimenee.</description>
</object>
<object name="Sulje silmät ja tökkää karttaa sormella sokkona">
<options type="stringdictionary">
<item>
<key>Lähde kohti metsää</key>
<value>Lähde kohti metsää</value>
</item>
<item>
<key>Mene sängylle istumaan</key>
<value>Mene sängylle istumaan</value>
</item>
</options>
<description>Sormesi pysähtyy osoittamaan Pukkivuoren takana olevaa metsää.</description>
</object>
<object name="Revi kartta palasiksi">
<options type="stringdictionary">
<item>
<key>Mene sängylle istumaan</key>
<value>Mene sängylle istumaan</value>
</item>
</options>
<description>Revit kartan palasiksi. Palaset putoavat lattialle.</description>
</object>
<object name="Mene sängylle istumaan">
<description>Istut sängyllä. </description>
<options type="stringdictionary">
<item>
<key>Katso sängyn alle</key>
<value>Katso sängyn alle</value>
</item>
<item>
<key>alku</key>
<value>Ala nukkumaan</value>
</item>
</options>
</object>
<object name="Lähde kohti metsää" />
<object name="Katso sängyn alle">
<options type="stringdictionary" />
<description><![CDATA[Sängyn alla marssii muurahaisia.<br/><br/>{if Revi kartta palasiksi.visited:{page:Heitä revityt kartan palaset muurahaisille:Heitä revityt kartan palat muurahaisille}}<br/>{page:Tapa muurahaiset:Tapa muurahaiset}]]></description>
</object>
<object name="Heitä revityt kartan palaset muurahaisille" />
<object name="Tapa muurahaiset">
<inherit name="scripttext" />
<description>Hakkaat muurahaiset mössöksi kengällä</description>
<script type="script">
IncreaseCounter ("piggy")
</script>
<options type="stringdictionary">
<item>
<key>Mene sängylle istumaan</key>
<value>Mene sängylle istumaan</value>
</item>
<item>
<key>Mieti</key>
<value>Mieti</value>
</item>
</options>
</object>
<object name="Mieti">
<inherit name="scripttext" />
<description><![CDATA[Mitä haluat miettiä?<br/><br/>]]></description>
<script type="script"><![CDATA[
if (GetInt(game, "piggy") > 1) {
AddPageLink (Mieti, Mitä ilkeää ja kuvottavaa voisit seuraavaksi tehdä, "Mitä ilkeää ja kuvottavaa voisit seuraavaksi tehdä")
}
else {
AddPageLink (Mieti, Mitä jännittävää voisit seuraavaksi tehdä, "Mitä jännittävää voisit seuraavaksi tehdä")
}
]]></script>
</object>
<object name="Mitä ilkeää ja kuvottavaa voisit seuraavaksi tehdä" />
<object name="Mitä jännittävää voisit seuraavaksi tehdä" />
</asl>