require("funktioner.pl"); skriv("Hej, jag är en maffiaboss!\n"); skriv("för att komma med i maffian så måste du svara på några frågor .\n"); skriv("Svara bara ja, nej eller kanske.\n\n"); $svar = fraga("knarkar du? "); if($svar eq "ja") { skriv("bra, för här kan du inte undgå att få kokain! "); } elsif($svar eq "nej") { skriv("Men du såg ju ut som att du skulle passa in här!\n"); } elsif($svar eq "kanske") { skriv("Du tar bara ibland alltså... Rätt bra för en nybörjare!\n"); } $svar = fraga("Okej, har något vapen?\n "); if($svar eq "ja") { skriv("Bra... hoppas du har ammo också!\n"); } elsif($svar eq "nej") { skriv("Din tönt, skaffa ett, och kom till baka senare! !\n"); avsluta(); } elsif($svar eq "kanske") { skriv("\Vet du inte om du har ett vapen?Det var inte bra...Det är faktist en människas bästa vän!\n"); } $svar = fraga("\har du dödat någon?n\ "); if($svar eq "ja") { skriv("bra att du har erfarenhet!\n"); } elsif($svar eq "nej") { skriv("Ähh läg av... döda nån i rummet!\n"); } elsif($svar eq "kanske") { skriv("minnesförluster... jag hatar dem.\n"); $svar = fraga("Vill du döda mig?"); if($svar eq "ja") { skriv("Döda honom han är en förädare!\n"); avsluta(); } } skriv("det är fullt i maffian för tillfället...Döda en i gänget så finns det en plats ledig"); avsluta();