#importonce

//===============================================================================
// InputYESNO
//
// Input Yes / No
//===============================================================================
inputYes:
    .byte 'Y'
inputNo:
    .byte 'N'
//===============================================================================
// titleScreen
//
// The Titlescreen
//===============================================================================
strVersion:
    .text "RC 2"
    .byte 0

strTitleScreen:
    .byte PET_BLACK
    .byte PET_CR,PET_CR

    .fill 8, PET_SPACE
    .text "Mafia Assembler Edition"
    .byte PET_CR,PET_CR

    .fill 8, PET_SPACE
    .fill 23,PET_LINE
    .byte PET_CR,PET_CR

    .fill 4, PET_SPACE
    .text "( Content rated: Elderly 80+ )"
    .byte PET_CR,PET_CR
    .fill 2, PET_SPACE
    .text "Copyright 1986 by Lascha Saffrenzen"
    .fill 6,PET_CR
    .fill 12, PET_SPACE
    .text "(Press any key)"

    .byte PET_BLACK, 0

//===============================================================================
// howManyScreen
//
// Wie viele Mitspieler
//===============================================================================
strHowManyScreen:
    .byte PET_CLEAR_SCREEN
    .byte PET_YELLOW
    .text "How many players (2-8) ? "
    .byte 0

strEnterName:
    .byte PET_CR
    .text "Your name, player "
    .byte 0

strCheckAllNames:
    .byte PET_CLEAR_SCREEN
    .byte PET_YELLOW
    .text "Today's players: "
    .byte PET_CR, PET_CR
    .byte 0
strIsThatCorrect:
    .text "Is that correct (Y/N)? "
    .byte 0
strGoodLuck:
    .byte PET_CR,PET_CR
    .text " Godspeed, suckers!"
    .byte PET_CR, PET_CR
    .text " (Press any key)"
    .byte 0

strWelcomePayment:
    .byte PET_CR
    .byte PET_CR
    .text " 60.000$ seed money? (Y/N) "
    .byte 0

//===============================================================================
// strGameModes
//
// Spielmodus
//===============================================================================
strGameModeChoice:
    .byte PET_CR, PET_CR
    .text " Please choose the game's goal!"
    .byte PET_CR, PET_CR
    .text " 1. The whole neighborhood"
    .byte PET_CR
    .text "    Own more than anyone else."
    .byte PET_CR,PET_CR
    .text " 2. My first million"
    .byte PET_CR
    .text "    Be the first to grub a million"
    .byte PET_CR,PET_CR
    .text " 3. Las Vegas:"
    .byte PET_CR
    .text "    One hotel and 100 slot machines."
    .byte PET_CR, PET_CR, 0
//===============================================================================
// General Purpose
//
// Wiederkehrende Texte
//===============================================================================
strYouHave:
    .text " You have "
    .byte 0
strHeHas:
    .text " has "
    .byte 0

strPerRound:
    .text " / round"
    .byte 0

strPressKey:
    .byte PET_CR
    .text " (Press any key)"
    .byte 0
strRound:
    .text " round"
    .byte 0
strRounds:
    .text " rounds"
    .byte 0

strTotal:
    .text "Total"
    .byte 0
strChoice:
    .text " Your choice ? "
    .byte 0
strBack:
    .byte PET_CR
    .text " 0. End round "
    .byte PET_CR,PET_CR,0

strSelectNothing:
    .byte PET_CR
    .text " 0. nothing "
    .byte PET_CR,PET_CR,0

strLine40:
    .fill 40,PET_LINE
    .byte PET_CR,0

strLine14:
    .fill 14,PET_LINE
    .byte PET_CR,0

strLine18:
    .fill 18,PET_LINE
    .byte 0
//===============================================================================
// Jail
//
// Gefängnisdinge
//===============================================================================
strJailEscape:
    .text " You managed to escape!"
    .byte PET_CR, 0

strJailProstitute:
    .text " Your received a message that"
    .byte PET_CR
    .text " one of your prostitutes went"
    .byte PET_CR
    .text " to another pimp."
    .byte PET_CR, PET_CR, PET_CR, 0

strJailAttorney:
    .text " Your attorney bailed you out."
    .byte PET_CR, 0

strJailAlmostFree:
    .text " You will be released this year."
    .byte PET_CR, 0

strJailWait1:
    .text " You have to do time for "
    .byte PET_CR
    .byte 0

strJailWait2:
    .text " in jail."
    .byte PET_CR, 0

//===============================================================================
// smallTheftMenu
//
// Kleine Diebstähle
//===============================================================================

strSmallTheftMenu1:
    .byte PET_CR, PET_CR
    .text " You can do the following:"
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR
    .text "   Rob a bank .................... 1"
    .byte PET_CR, PET_CR
    .text "   Bust a slotmachine ............ 2"
    .byte PET_CR, PET_CR
    .text "   Rob a bar  .................... 3"
    .byte PET_CR, PET_CR
    .text "   Scam a prostitute ............. 4"
    .byte PET_CR, PET_CR
    .byte 0
strSmallTheftMenu2:
    .text "   Rip off a pedestrian .......... 5"
    .byte PET_CR, PET_CR
    .text "   Find an honest job ............ 6"
    .byte PET_CR, PET_CR
    .text "   Nothing ....................... 7"
    .byte PET_CR, PET_CR
    .byte 0

//===============================================================================
// TheftMisfortune
// Pech beim Diebstal
//===============================================================================

strTheftMisfortune1:
    .text " Tough Luck"
    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune2:
    .text " A pedestrian raised an alarm."
    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune3:
    .text " The police became attentive."
    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune4:
    .text " A police patrol cought you by surprise."
    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune5:
    .text " You messed up badly."
    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune6:
    .text " Your mother snitched on you!"
    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune7:
    .text " Your rheumatism struck again."

    .byte PET_CR, PET_CR
    .byte 0
strTheftMisfortune8_1:
    .text " The mother of "
    .byte 0
strTheftMisfortune8_2:
    .text " snitched"
    .byte PET_CR
    .text " on you. "
    .byte PET_CR, PET_CR
    .byte 0

strTheftEscape:
    .text " You managed to escape though."
    .byte PET_CR
    .byte 0

strTheftJail1:
    .text " The police cought you."
    .byte PET_CR
    .text " You've been sentenced to "
    .byte PET_CR
    .text " "
    .byte 0
strTheftJail2:
    .text " of jail."
    .byte PET_CR
    .byte 0


//===============================================================================
// Kleine Diebstähle
//
//===============================================================================
// Bank
strTheftBankSuccess:
    .text " Your bank robbery was successful."
    .byte PET_CR
    .text " You looted "
    .byte 0

// Automaten
strTheftSlotMachineOwner:
    .text " The slotmachine's owner was "
    .byte 0

strTheftSlotMachineSuccess:
    .text " The slotmachine contained "
    .byte 0

// Bar
strTheftBarOwner:
    .text " The bar's owner was "
    .byte 0
strTheftBarSuccess:
    .text " The robbery brought you "
    .byte 0
strTheftBarFail:
    .text " You managed to get away, but"
    .byte PET_CR
    .text " without any loot. "
    .byte PET_CR, PET_CR , 0

// Strich
strTheftKerbOwner:
    .text " The prostitute's pimp was "
    .byte 0
strTheftKerbSuccess1:
    .text " Your performance was crummy "
    .byte PET_CR, PET_CR,0

strTheftKerbSuccess2:
    .text " The prostitute decided to look"
    .byte PET_CR
    .text " for a different job."
    .byte PET_CR, PET_CR
    .text " The day's takings of "
    .byte 0

strTheftKerbSuccess3:
    .byte PET_CR
    .text " are yours to keep."
    .byte PET_CR, 0

strTheftKerbFail:
    .text " Out of mercy "
    .byte PET_CR
    .text " they let you scram."
    .byte PET_CR, PET_CR , 0

// Passant
strTheftPedestrianPlayer1:
    .text " The pedestrian was "
    .byte 0
strTheftPedestrianPlayer2:
    .byte PET_CR
    .text " and had "
    .byte 0
strTheftPedestrianPlayer3:
    .text " in his purse."
    .byte PET_CR, 0

strTheftPedestrianSuccess1:
    .text " The pedestrian had "
    .byte 0
strTheftPedestrianSuccess2:
    .text " in his purse."
    .byte PET_CR, 0
strTheftPedestrianBodyguard:
    .text " A bodyguard was able to "
    .byte PET_CR
    .text " prevent the assault."
    .byte PET_CR, 0

// Ehrliche Arbeit
strTheftJobWait:
    .text " You are on the qui vive "
    .byte PET_CR
    .text " and hope for a potent employer"
    .byte PET_CR, 0

strTheftTooRich:
    .byte PET_CR
    .text " Oh come on..."
    .byte PET_CR, PET_CR
    .text " With this much income "
    .byte PET_CR
    .text " you won't dirty your hands."
    .byte PET_CR, 0

strTheftNotFound:
    .byte PET_CR
    .text " Unfortunately there was "
    .byte PET_CR
    .text " nobody to be found who cared "
    .byte PET_CR
    .text " to employ you."

    .byte PET_CR, 0

strTheftJobIntro1:
    .byte PET_CR
    .text " Joy and Happiness!"
    .byte PET_CR, PET_CR
    .text " For just "
    .byte 0
strTheftJobIntro2:
    .text "$ "
    .byte PET_CR
    .byte 0
strTheftJobIntro3:
    .text " is working for you as a"
    .byte PET_CR
    .byte 0

strTheftJob1:
    .text " backscratcher"
    .byte 0
strTheftJob2:
    .text " suppository"
    .byte 0
strTheftJob3:
    .text " pubic hair stylist"
    .byte 0
strTheftJob4:
    .text " air pump"
    .byte 0
strTheftJob5:
    .text " bookend"
    .byte 0
strTheftJob6:
    .text " tramp stamp"
    .byte 0
strTheftJob7:
    .text " chest hair toupet"
    .byte 0
strTheftJob8:
    .text " doorstopper"
    .byte 0

//===============================================================================
// Finanzen
//
//===============================================================================
strFinancesTitle:
    .fill 14, PET_SPACE
    .text "Finances"
    .byte PET_CR
    .fill 14, PET_SPACE
    .fill 8,PET_LINE
    .byte PET_CR, PET_CR, 0

strFinancesIncome:
    .text " Your income:"
    .byte PET_CR, PET_CR, 0
strFinancesCosts:
    .text " Your outcome:"
    .byte PET_CR, PET_CR, 0

strFinancesFinal:
    .byte PET_CR
    .text "Your new total:"
    .byte PET_CR, PET_CR, 0

// Einkommenspositionen
strFinancesSlotMachines:
    .text " Slotmachines"
    .byte 0
strFinancesProstitutes:
    .text " Prostitutes"
    .byte 0
strFinancesBars:
    .text " Bars"
    .byte 0
strFinancesBetting:
    .text " Betting offices"
    .byte 0
strFinancesGambling:
    .text " Arcades"
    .byte 0
strFinancesBrothels:
    .text " Brothels"
    .byte 0
strFinancesHotels:
    .text " Hotels"
    .byte 0
// Ausgaben
strFinancesGunfighters:
    .text " Gunfighters   "
    .byte 0
strFinancesBodyguards:
    .text " Bodyguards    "
    .byte 0
strFinancesGuards:
    .text " Nightwatchman "
    .byte 0
strFinancesInformants:
    .text " Informants    "
    .byte 0
strFinancesAttorneys:
    .text " Attorneys     "
    .byte 0
strFinancesPolice:
    .text " Policemen     "
    .byte 0
strFinancesInspectors:
    .text " Inspectors    "
    .byte 0
strFinancesJudges:
    .text " Judges        "
    .byte 0
strFinancesStateAttorneys:
    .text " StateAttorneys"
    .byte 0
strFinancesMajors:
    .text " Majors        "
    .byte 0

//===============================================================================
// shoppingMenu
//
// Gangsterbedarf
//===============================================================================

strShopTitle:
    .byte PET_CR, PET_CR
    .text " The purchase prices are: "
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR,0
strShopSlotMachines:
    .text " 1. Slotmachines (three) ...... "
    .byte 0
strShopProstitutes:
    .text " 2. Prostitute (one) .......... "
    .byte 0
strShopBars:
    .text " 3. Bar ....................... "
    .byte 0
strShopBetting:
    .text " 4. Gambling office .......... "
    .byte 0
strShopGambling:
    .text " 5. Arcade ................... "
    .byte 0
strShopBrothels:
    .text " 6. Brothel ................. "
    .byte 0
strShopHotels:
    .text " 7. Grandhotel ............. "
    .byte 0

//===============================================================================
// strPropertyOverview
//
// Sie beherrschen die Gegend
//===============================================================================
strPropertyOverview1:
    .text " percent are to be owned."
    .byte PET_CR, PET_CR, 0

strPropertyOverview2:
    .byte PET_CR
    .text " You now own "
    .byte 0

strPropertyOverview3:
    .text " percent"
    .byte PET_CR
    .text " of the neighborhood."
    .byte PET_CR,0

strPropertyWin:
    .byte PET_CR
    .text " Therefore you win !!!"
    .byte PET_CR, PET_CR
    .byte 0

strGameModeMillionAlmost:
    .byte PET_CR
    .text " You already have over 750.000 $"
    .byte PET_CR
    .text " Only this amount is left: "
    .byte 0

strGameModeMillionWin:
    .byte PET_CR
    .text " You made a million first!"
    .byte PET_CR,0

strGameModeVegasAlmost:
    .byte PET_CR
    .text " One hotel is already yours."
    .byte PET_CR
    .text " There are only missing "
    .byte 0

strGameModeVegasWin:
    .byte PET_CR
    .text " The hotel and all slotmachines "
    .byte PET_CR
    .text " are all on the spot."
    .byte PET_CR,0

//===============================================================================
// strDept
//
// Sie beherrschen die Gegend
//===============================================================================
strDeptInfo1:
    .byte PET_CR, PET_CR
    .text " You are in debt!"
    .byte PET_CR, 0
strDeptInfo2:
    .byte PET_CR, PET_CR
    .text " You have"
    .byte 0
strDeptInfo3:
    .text " rounds left,"
    .byte PET_CR
    .text " to settle all debts."
    .byte PET_CR, PET_CR, PET_CR, 0

strDeptPawn1:
    .text "          Today is due date!"
    .byte PET_CR
    .fill 10, PET_SPACE
    .fill 19,PET_LINE
    .byte PET_CR,PET_CR,0

strDeptFired:
    .byte PET_CR
    .text " Your personnel has been sacked,"
    .byte PET_CR
    .text " outstanding debts have been cancelled."
    .byte PET_CR, PET_CR, 0

strDeptPawn2:
    .text " Following positions have been"
    .byte PET_CR
    .text " pawned:"
    .byte PET_CR, PET_CR,0

//===============================================================================
// strMainMenu
//
// Hauptmenü
//===============================================================================

strMainMenuTitle:
    .byte PET_CR
    .text " These are your choices: "
    .byte PET_CR,PET_CR
    .fill 40,PET_LINE
    .byte PET_CR
    .text "   1. Small thievery"
    .byte PET_CR, PET_CR
    .text "   2. Investments"
    .byte PET_CR, PET_CR
    .text "   3. Recruting"
    .byte PET_CR, PET_CR
    .text "   4. Bribery"
    .byte PET_CR, PET_CR
    .text "   5. Gang war"
    .byte PET_CR, PET_CR
    .text "   6. Money transfer"
    .byte PET_CR, PET_CR
    .text "   7. Possessions"
    .byte PET_CR, PET_CR,PET_CR
    .text " Your choice? "
    .byte PET_CR, PET_CR
    .byte 0

//===============================================================================
// strRecruiting
//
// Rekrutierungen
//===============================================================================
strRecruitingTitle:
    .byte PET_CR, PET_CR
    .text " You can hire these guys: "
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR,0
strRecruitingFireAll:
    .text " Fire everyone"
    .byte 0

//===============================================================================
// strBribery
//
// Bestechungen
//===============================================================================
strBriberyTitle:
    .byte PET_CR, PET_CR
    .text " Who do you want to bribe? "
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR,0

strBriberyComputer1:
    .text " Computer"
    .byte 0
strBriberyComputer2:
    .text " If you don't put your soldering iron"
    .byte PET_CR
    .text " away, I'm calling the cops!"
    .byte PET_CR, 0
//===============================================================================
// strOverviewTitle
//
// Besitzverhältnisse
//===============================================================================
strOverviewTitle:
    .byte PET_CR
    .text " Posessions"
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR,0

//===============================================================================
// strTransferTitle
//
// Geld überweisen
//===============================================================================
strTransferTitle:
    .byte PET_CR
    .text " Money transfer"
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR,0

strTransferWho:
    .text " Who will be the recipient? "
    .byte PET_CR
    .byte 0

strTransferAccountant:
    .text " The recipient is "
    .byte 0

strTransferAmount:
    .text " Amount $ "
    .byte 0

strTransferImpossible:
    .text " Are you joking?! "
    .byte PET_CR
    .byte 0

strTransferNotEnough:
    .text " You don't have enough money. "
    .byte PET_CR
    .byte 0

strTransferDone:
    .text " The money has been transferred. "
    .byte PET_CR
    .byte 0

//===============================================================================
// strDisaster
//
// Schicksalschläge
//===============================================================================
strDisasterProstitute1:
    .text " of your prostitutes became pregnant. "
    .byte PET_CR, 0
strDisasterProstitute2:
    .text " of your prostitutes got antiquated. "
    .byte PET_CR, 0
strDisasterProstitute3:
    .text "You provide financial support of "
    .byte 0
strDisasterSlotMachines:
    .text " of your slotmachines got antiquated. "
    .byte 0
strDisasterHadTo:
    .text " "
    .byte 0
strDisasterYours:
    .text " of your"
    .byte 0
strDisasterCloseDown:
    .byte PET_CR
    .text " had to be shut down."
    .byte PET_CR, 0
strDisasterReason1:
    .text " Because of sanitary reasons "
    .byte PET_CR,0
strDisasterReason2:
    .text " Due to danger of collapse "
    .byte PET_CR,0
strDisasterReason3:
    .text " Due to repeated fiscal fraud"
    .byte PET_CR,0
strDisasterReason4:
    .text " Because of an action group "
    .byte PET_CR,0
strDisasterReason5:
    .text " Out of fairness towards your co-players"
    .byte PET_CR,0
strDisasterJail1:
    .byte PET_CR
    .text " You were sentenced to "
    .byte 0
strDisasterJail2:
    .text " rounds of jail."
    .byte PET_CR,0

//===============================================================================
// strActions
//
// Aktionen Aufträge und so weiter
//===============================================================================

strGangwarTitle1:
    .byte PET_CR
    .text " Gang war"
    .byte PET_CR
    .fill 40,PET_LINE
    .byte 0
strGangwarTitle2:
    .byte PET_CR
    .text " Who do you want to mess up?"
    .byte PET_CR, PET_CR,0
strGangwarTitle3:
    .byte PET_CR
    .text " The fight begins"
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR
    .byte 0
strGangwarCancel:
    .text " 0. bail out."
    .byte PET_CR,0
strGangwarImpossible:
    .byte PET_CR
    .text " You punch yourself in the face"
    .byte PET_CR
    .text " and keep it that way."
    .byte PET_CR,0
strGangwarMissing:
    .byte PET_CR
    .text " You don't have "
    .byte PET_CR
    .text " the right mobsters for that."
    .byte PET_CR,0
strGangwarSummary1:
    .byte PET_CR
    .text " You want to mess up "
    .byte 0
strGangwarSummary2:
    .byte PET_CR
    .text " badly."
    .byte 0

strGangwarAttackersAmount:
    .byte PET_CR
    .text " 9 mobsters fit in your van."
    .byte 0

strGangwarAttackersBonus:
    .byte PET_CR
    .text " Because of your outstanding links"
    .byte PET_CR
    .text " reinforcements have been sent."
    .byte 0

strGangwarDefendersAmount:
    .byte PET_CR
    .text " 9 watchmen made it in time. "

    .byte 0

strGangwarDefendersBonus:
    .byte PET_CR
    .text " Your enemy has been warned "
    .byte PET_CR
    .text " and gets support."
    .byte 0
strGangwarCasualties:
    .text "Casualties:"
    .byte PET_CR,0
strGangwarBurialCost:
    .text "Burial costs:"
    .byte PET_CR,0

strGangwarWinner1:
    .byte PET_CR, PET_CR
    .text " The family of "
    .byte 0
strGangwarWinner2:
    .byte PET_CR
    .text " won the fight"
    .byte 0

strGangwarLoose:
    .byte PET_CR, PET_CR
    .text " Casualties "
    .byte 0

strGangwarDebt:
    .byte PET_CR
    .text " You are in debt!" 
    .byte PET_CR
    .text " No war without wages."
    .byte PET_CR,0

strInformantTitle:
    .byte PET_CR, PET_CR
    .text " Your informant has a clue for you"
    .byte PET_CR
    .fill 40,PET_LINE
    .byte PET_CR, PET_CR,0

strInformantProperty:
    .text " Hey Buster, I have a great deal"
    .byte PET_CR
    .text " on this real estate: "
    .byte PET_CR, PET_CR, 0

strInformantBar:
    .text " A sleazy Bar"
    .byte 0
strInformantBetting:
    .text " A shady Betting Office"
    .byte 0
strInformantGambling:
    .text " A shabby Arcade"
    .byte 0
strInformantBrothel:
    .text " A rancid Brothel"
    .byte 0
strInformantHotel:
    .text " A ruinous Grandhotel"
    .byte 0

strInformantForJust:
    .byte PET_CR,PET_CR,PET_CR
    .text " for just "
    .byte 0

strInformantDeal:
    .byte PET_CR,PET_CR
    .text " Accept the deal? (Y/N) "
    .byte 0

strInformantYes:
    .byte PET_CR, PET_CR
    .text " My contact will be pleased."
    .byte PET_CR, PET_CR, 0

strInformantNo:
    .byte PET_CR, PET_CR
    .text " Well then get lost. "
    .byte PET_CR, PET_CR, 0

strInformantDept:
    .text " You bankaccount might not be."
    .byte PET_CR, PET_CR, 0