,,,,,{ <!-- REDIGERA INTE DENNA PASSAGE -->
(display: "STARTUP")
<P><B>Välkommen till Globetrotter!</B></P>
<P>Det här spelet är en interaktiv berättelse där du som läsare/spelare påverkar hur handlingen utvecklas genom att fatta viktiga beslut vid olika förgreningar i berättelsen. Ett till synes enkelt beslut som att svara JA eller NEJ på en fråga kan potentiellt leda dig till väsentligt skilda slut på berättelsen — kanske till och med till ett oväntat hastigt sådant.</P>
<P>I spelet reser du runt om i världen och bekantar dig med fem olika resmål. Resan börjar och slutar i Sverige. Det finns dock en del hinder på vägen. Du har $startpengar kronor i reskassa att röra dig med och endast $månad månad ($starttid dagar) på dig att fullfölja resan. Om dina dagar eller pengar tar slut så slutar även spelet.</P>
<P>Globetrotter skapades inom ramen för ämnet <I>Svenska</I> under vårterminen 2018 på grundskolan <I>Vittra Brotorp i Sundbyberg</I>. Alla elever i årskurs nio på skolan fick i uppgift att programmera varsin interaktiv berättelse på temat globetrotter under handledning av pedagog <I>Tomas Jelf Werner</I> som även kodat själva "spelmotorn" (den grundmall som eleverna hade som utgångspunkt). Verktyget som användes var <I>Twine 2.2.1 (Harlowe)</I>. Besök <A HREF="http://twinery.org" TARGET="_blank">http://twinery.org</A> om du vill veta mer om Twine.</P>
<CENTER>[[Gå till din resplan->RESPLANEN]]</CENTER>
}{
<P>Här skriver du inledningen till din fiktiva reseberättelse. Allting börjar någonstans i Sverige.</P>
<CENTER>[[[Fortsätt->Sverige 2]]]<link|</CENTER>
}{ <!-- REDIGERA INTE DENNA PASSAGE -->
<CENTER><FONT FACE="serif" COLOR="#000066" SIZE="6"><B>G L O B E T R O T T E R</B></FONT>
(if: (passage:)'s tags contains "shorthead")[]
(else:)[(display: "SIDHUVUD2")]
</CENTER><HR noshade><BR>
}{ <!-- REDIGERA INTE DENNA PASSAGE -->
<BR><HR noshade><CENTER><FONT FACE="serif" COLOR="#003300" SIZE="2">Skapat av $elev under handledning av pedagog Tomas Jelf Werner</FONT></CENTER>
(if: (passage:)'s name is "SLUTSIDAN")[]
(else: )[
(if: $pengarkvar < 1)[(set: $pengarkvar to 0)(replace: ?link)[[[Din budget höll tyvärr inte->SLUTSIDAN]]]]
]
(if: (passage:)'s name is "SLUTSIDAN")[]
(else: )[
(if: $tidkvar < 1)[(set: $tidkvar to 0)(replace: ?link)[[[Din resplan höll tyvärr inte->SLUTSIDAN]]]]
]
(replace: ?tidkvar)[$tidkvar]
(replace: ?pengarkvar)[$pengarkvar]
(replace: ?land)[$land]
}{
<P>Nu ska spelaren resa till det första landet i resplanen.</P>
<CENTER>[[[Res till (print: $land1)->Resmål-Ett 1]]]<link|</CENTER>
}{
(set: $land to $land1) <!-- Rör ej -->
(set: $land1_tid_in to $tidkvar) <!-- Rör ej -->
(set: $land1_sek_in to $pengarkvar) <!-- Rör ej -->
<!-- Skriv din berättelse här nedanför; stycken mellan <P> och </P> -->
<P>Spelaren har anlänt till det första landet på resan.</P>
(set: $tidkvar to it - 2) <!-- Dra av dagar -->
(set: $pengarkvar to it - 1500) <!-- Dra av pengar -->
<CENTER>[[[Fortsätt->Resmål-Ett 2]]]<link|</CENTER>
}{
<P>Nu är det dags för den andra förgreningen i din berättelse. Oavsett hur din berättelse ser ut så ska läsaren här erbjudas två olika val. Respektive val leder till ett helt separat spår i din berättelse.</P>
<CENTER>[[[Alternativ A->Resmål-Två 3A]] — [[Alternativ B->Resmål-Två 3B]]]<link|</CENTER>
}{
<P>Nu är det dags för en förgrening i din berättelse. Oavsett hur din berättelse ser ut så ska läsaren här erbjudas två olika val. Respektive val leder till ett helt separat spår i din berättelse.</P>
<CENTER>[[[Alternativ A->Resmål-Ett 3A]] — [[Alternativ B->Resmål-Ett 3B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Två 4A]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Två 4B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Ett 4A]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Ett 4B]]]<link|</CENTER>
}{ <!-- REDIGERA INTE DENNA PASSAGE -->
(display: "VARIABLER")
(set: $land0 to "Sverige")
(set: $land to $land0)
(set: $tidkvar to $starttid)
(set: $pengarkvar to $startpengar)
(set: $land1_tid_in to 0)
(set: $land1_sek_in to 0)
(set: $land2_tid_in to 0)
(set: $land2_sek_in to 0)
(set: $land3_tid_in to 0)
(set: $land3_sek_in to 0)
(set: $land4_tid_in to 0)
(set: $land4_sek_in to 0)
(set: $land5_tid_in to 0)
(set: $land5_sek_in to 0)
(set: $land1_tid_ut to 0)
(set: $land1_sek_ut to 0)
(set: $land2_tid_ut to 0)
(set: $land2_sek_ut to 0)
(set: $land3_tid_ut to 0)
(set: $land3_sek_ut to 0)
(set: $land4_tid_ut to 0)
(set: $land4_sek_ut to 0)
(set: $land5_tid_ut to 0)
(set: $land5_sek_ut to 0)
(set: $årets_månader to (datamap: "Januari", 31, "Februari", 28, "Mars", 31, "April", 30, "Maj", 31, "Juni", 30, "Juli", 31, "Augusti", 31, "September", 30, "Oktober", 31, "November", 30,"December", 31, "januari", 31, "februari", 28, "mars", 31, "april", 30, "maj", 31, "juni", 30, "juli", 31, "augusti", 31, "september", 30, "oktober", 31, "november", 30,"december", 31))
(if: $årets_månader contains $månad)[(set: $starttid to $årets_månader's $månad)](else:)[(set: $månad to "Januari")(set: $starttid to $årets_månader's $månad)]
}{ <!-- REDIGERA INTE DENNA PASSAGE -->
<P><B>Du har nått din vägs ände!</B></P>
<TABLE WIDTH="50%" ALIGN="CENTER" CELLPADDING="3">
<TR BGCOLOR="#9999FF">
<TD><B>Resmål</B></TD><TD><B>Tidsåtgång</B></TD><TD><B>Utgifter</B></TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land1</TD><TD>(if: $land1_tid_ut < 1)[-](else:)[$land1_tid_ut dagar]<TD>(if: $land1_sek_ut < 1)[-](else:)[$land1_sek_ut kronor]</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land2</TD><TD>(if: $land2_tid_ut < 1)[-](else:)[$land2_tid_ut dagar]</TD><TD>(if: $land2_sek_ut < 1)[-](else:)[$land2_sek_ut kronor]</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land3</TD><TD>(if: $land3_tid_ut < 1)[-](else:)[$land3_tid_ut dagar]</TD><TD>(if: $land3_sek_ut < 1)[-](else:)[$land3_sek_ut kronor]</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land4</TD><TD>(if: $land4_tid_ut < 1)[-](else:)[$land4_tid_ut dagar]</TD><TD>(if: $land4_sek_ut < 1)[-](else:)[$land4_sek_ut kronor]</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land5</TD><TD>(if: $land5_tid_ut < 1)[-](else:)[$land5_tid_ut dagar]</TD><TD>(if: $land5_sek_ut < 1)[-](else:)[$land5_sek_ut kronor]</TD>
</TR>
</TABLE>
<BR>
<TABLE WIDTH="50%" ALIGN="CENTER" CELLPADDING="3">
<TR BGCOLOR="#9999FF">
<TD><B>Total restid</B></TD><TD><B>Total kostnad</B></TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>(if: $starttid - $tidkvar is 1)[1 dag](else:)[(print: $starttid-$tidkvar) dagar]</TD><TD>(print: $startpengar-$pengarkvar) kronor</TD>
</TR>
</TABLE>
<BR>
<P>Vägen du valde genom berättelsen är inte den enda. Börja gärna om från början och upptäck andra alternativa händelseförlopp genom att fatta andra beslut på vägen. Kanske kan du fullfölja hela resan snabbare eller billigare nästa gång?</P>
<CENTER>[[BÖRJA OM FRÅN BÖRJAN->STARTSIDAN]]</CENTER>
}{
(set: $land to $land2) <!-- Rör ej -->
(set: $land2_tid_in to $tidkvar) <!-- Rör ej -->
(set: $land2_sek_in to $pengarkvar) <!-- Rör ej -->
<!-- Skriv din berättelse här nedanför; stycken mellan <P> och </P> -->
<P>Här skriver du fortsättningen till din fiktiva reseberättelse.</P>
(set: $tidkvar to it - 1) <!-- Dra av dagar -->
(set: $pengarkvar to it - 2000) <!-- Dra av pengar -->
<CENTER>[[[Fortsätt->Resmål-Två 2]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Ett 5]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Ett 5]]]<link|</CENTER>
}{
<P>Spelaren har lämnat sidospåret i landet och ska strax bege sig till nästa land i resplanen.</P>
<CENTER>[[[Fortsätt->Resmål-Ett 6]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Två 5]]]<link|</CENTER>
}{
<P>Spelaren har lämnat sidospåret i landet och ska strax bege sig till nästa land i resplanen.</P>
<CENTER>[[[Fortsätt->Resmål-Två 6]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Två 5]]]<link|</CENTER>
}{
(set: $land to $land4) <!-- Rör ej -->
(set: $land4_tid_in to $tidkvar) <!-- Rör ej -->
(set: $land4_sek_in to $pengarkvar) <!-- Rör ej -->
<!-- Skriv din berättelse här nedanför; stycken mellan <P> och </P> -->
<P>Här skriver du fortsättningen till din fiktiva reseberättelse.</P>
(set: $tidkvar to it - 5) <!-- Dra av dagar -->
(set: $pengarkvar to it - 7000) <!-- Dra av pengar -->
<CENTER>[[[Fortsätt->Resmål-Fyra 2]]]<link|</CENTER>
}{
<P>Nu är det dags för den andra förgreningen i din berättelse. Oavsett hur din berättelse ser ut så ska läsaren här erbjudas två olika val. Respektive val leder till ett helt separat spår i din berättelse.</P>
<CENTER>[[[Alternativ A->Resmål-Fyra 3A]] — [[Alternativ B->Resmål-Fyra 3B]]]<link|</CENTER>
}{
(set: $land to $land3) <!-- Rör ej -->
(set: $land3_tid_in to $tidkvar) <!-- Rör ej -->
(set: $land3_sek_in to $pengarkvar) <!-- Rör ej -->
<!-- Skriv din berättelse här nedanför; stycken mellan <P> och </P> -->
<P>Här skriver du fortsättningen till din fiktiva reseberättelse.</P>
(set: $tidkvar to it - 3) <!-- Dra av dagar -->
(set: $pengarkvar to it - 2500) <!-- Dra av pengar -->
<CENTER>[[[Fortsätt->Resmål-Tre 2]]]<link|</CENTER>
}{
<P>Nu är det dags för den andra förgreningen i din berättelse. Oavsett hur din berättelse ser ut så ska läsaren här erbjudas två olika val. Respektive val leder till ett helt separat spår i din berättelse.</P>
<CENTER>[[[Alternativ A->Resmål-Tre 3A]] — [[Alternativ B->Resmål-Tre 3B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fyra 4A]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fyra 4B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Tre 4A]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Tre 4B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fyra 5]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fyra 5]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Tre 5]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Tre 5]]]<link|</CENTER>
}{
<P>Spelaren har lämnat sidospåret i landet och ska strax bege sig till nästa land i resplanen.</P>
<CENTER>[[[Fortsätt->Resmål-Fyra 6]]]<link|</CENTER>
}{
<P>Spelaren har lämnat sidospåret i landet och ska strax bege sig till nästa land i resplanen.</P>
<CENTER>[[[Fortsätt->Resmål-Tre 6]]]<link|</CENTER>
}{
<P>Nu ska spelaren resa till det andra landet i resplanen.</P>
<CENTER>[[[Res till (print: $land2)->Resmål-Två 1]]]<link|</CENTER>
(set: $land1_tid_ut to $land1_tid_in - $tidkvar) <!-- Rör ej -->
(set: $land1_sek_ut to $land1_sek_in - $pengarkvar) <!-- Rör ej -->
}{
<P>Nu ska spelaren resa till det femte landet i resplanen.</P>
<CENTER>[[[Res till (print: $land5)->Resmål-Fem 1]]]<link|</CENTER>
(set: $land4_tid_ut to $land4_tid_in - $tidkvar) <!-- Rör ej -->
(set: $land4_sek_ut to $land4_sek_in - $pengarkvar) <!-- Rör ej -->
}{
<P>Nu ska spelaren resa till det tredje landet i resplanen.</P>
<CENTER>[[[Res till (print: $land3)->Resmål-Tre 1]]]<link|</CENTER>
(set: $land2_tid_ut to $land2_tid_in - $tidkvar) <!-- Rör ej -->
(set: $land2_sek_ut to $land2_sek_in - $pengarkvar) <!-- Rör ej -->
}{
<P>Nu ska spelaren resa till det fjärde landet i resplanen.</P>
<CENTER>[[[Res till (print: $land4)->Resmål-Fyra 1]]]<link|</CENTER>
(set: $land3_tid_ut to $land3_tid_in - $tidkvar) <!-- Rör ej -->
(set: $land3_sek_ut to $land3_sek_in - $pengarkvar) <!-- Rör ej -->
}{
(set: $land to $land5) <!-- Rör ej -->
(set: $land5_tid_in to $tidkvar) <!-- Rör ej -->
(set: $land5_sek_in to $pengarkvar) <!-- Rör ej -->
<!-- Skriv din berättelse här nedanför; stycken mellan <P> och </P> -->
<P>Här skriver du fortsättningen till din fiktiva reseberättelse.</P>
(set: $tidkvar to it - 2) <!-- Dra av dagar -->
(set: $pengarkvar to it - 1000) <!-- Dra av pengar -->
<CENTER>[[[Fortsätt->Resmål-Fem 2]]]<link|</CENTER>
}{
<P>Nu är det dags för den andra förgreningen i din berättelse. Oavsett hur din berättelse ser ut så ska läsaren här erbjudas två olika val. Respektive val leder till ett helt separat spår i din berättelse.</P>
<CENTER>[[[Alternativ A->Resmål-Fem 3A]] — [[Alternativ B->Resmål-Fem 3B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fem 4A]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fem 4B]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår A i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fem 5]]]<link|</CENTER>
}{
<P>Spelaren följer nu sidospår B i landet.</P>
<CENTER>[[[Fortsätt->Resmål-Fem 5]]]<link|</CENTER>
}{
<P>Spelaren har lämnat sidospåret i landet och ska strax bege sig till nästa land i resplanen.</P>
<CENTER>[[[Fortsätt->Resmål-Fem 6]]]<link|</CENTER>
}{
<P>Nu ska spelaren äntligen återvända hem till Sverige.</P>
<CENTER>[[[Res till (print: $land0)->Sverige 3]]]<link|</CENTER>
(set: $land5_tid_ut to $land5_tid_in - $tidkvar) <!-- Rör ej -->
(set: $land5_sek_ut to $land5_sek_in - $pengarkvar) <!-- Rör ej -->
}{
(set: $land to $land0)
<!-- Skriv din berättelse här nedanför; stycken mellan <P> och </P> -->
<P>Här skriver du avslutningen till din fiktiva reseberättelse.</P>
<CENTER>[[[Fortsätt->SLUTSIDAN]]]<link|</CENTER>
}<!-- REDIGERA INTE DENNA PASSAGE --> <FONT FACE="serif" COLOR="#003300" SIZE="3"><BR><B>Tid kvar:</B> []<tidkvar| dagar — <B>Pengar kvar:</B> []<pengarkvar| kr<BR><B>Det är $månad och du befinner dig i []<land|</B></FONT>{
<!--
Här kan du redigera dina variabler samt lägga till fler om du vill.
-->
(set: $elev to "Förnamn Efternamn") <!-- Ditt fullständiga namn -->
(set: $land1 to "Danmark") <!-- Första resmålet -->
(set: $land2 to "Norge") <!-- Andra resmålet -->
(set: $land3 to "Finland") <!-- Tredje resmålet -->
(set: $land4 to "Island") <!-- Fjärde resmålet -->
(set: $land5 to "Grönland") <!-- Femte resmålet -->
(set: $månad to "Månad") <!-- Månaden då resan äger rum -->
(set: $startpengar to 20000) <!-- Spelarens budget för resan -->
<!-- Om texten i din passage inleds och avslutas med {} behandlas allt innehåll som om det är på samma rad följt av blanksteg istället för att innehållet radbryts. -->
}{ <!-- REDIGERA INTE DENNA PASSAGE -->
<P><B>Din resplan ser ut som följer:</B></P>
<TABLE WIDTH="50%" ALIGN="CENTER" CELLPADDING="3">
<TR BGCOLOR="#9999FF">
<TD><B>Avresa från</B></TD><TD><B>Destination</B></TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land0</TD><TD>$land1</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land1</TD><TD>$land2</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land2</TD><TD>$land3</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land3</TD><TD>$land4</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land4</TD><TD>$land5</TD>
</TR>
<TR BGCOLOR="#CCCCFF">
<TD>$land5</TD><TD>$land0</TD>
</TR>
</TABLE>
<BR>
<CENTER>[[Påbörja din resa->Sverige 1]]</CENTER>
}