'                       Welcome to Fag Quest-A-Roo
'                                    by
'                            Froware Software

'     Hit F5 to play:This game is freeware. Give it to anybody you want
'                    just DO NOT modify the programming.  The
'                    programmer assumes no responsibility for any loss
'                    or damage, stated or implied, due to the use,
'                    direct or indirect, of this software.  Man.

'   Look for these titles in the near future:    Great Adventure-a-roo
'                                                Storm Chase-a-roo
'                                                Bobby Jones' Baseball-a-roo
'                                                Gauntlet-a-roo 2

'      Check out our web site:http://pages.prodigy.com/viperx/brian.htm
'            Froware software is a division of Brian Q Programming

health% = 100
money% = 240
COLOR 14, 3
CLS
LOCATE 12, 23
PRINT "Fag Quest-A-Roo:Revenge of the Hederosexual"
LOCATE 18, 1
PRINT "Your mission:to seek and destroy faggots-don't get killed"
PRINT "If you earn 150 experience points you win!"
SLEEP

1 CLS
IF exper% < 20 THEN place$ = "Hick wanna be"
IF exper% > 20 AND exper% <= 40 THEN place$ = "Redneck in training"
IF exper% > 60 AND exper% <= 80 THEN place$ = "Almost a cool southerner"
IF exper% > 80 AND exper% <= 100 THEN place$ = "Basically a Confederate"
IF exper% > 100 THEN place$ = "Anti-Fag Master"
PRINT "You are a "; place$
PRINT "Health:"; health%
PRINT "Experience points:"; exper%
PRINT "You have this many dollars:"; money%
LOCATE 22, 31
PRINT "Hit the space bar to continue"
SLEEP

CLS
PRINT "Welcome to Fag Quest"
PRINT "1-Go down the street"
PRINT "2-Go to Bergen Catholic"
PRINT "3-Go to the Village"
PRINT "4-Go to the Doctor"
PRINT "5-Quit"
INPUT "Which one (1-5)"; pick%
IF pick% < 1 OR pick% > 5 THEN GOTO 1
IF pick% = 5 THEN END
IF pick% = 3 THEN GOTO 30
IF pick% = 2 THEN GOTO 20
IF pick% = 4 THEN GOTO 100
sal% = 35
fanny% = 40
hoey% = 45
2 CLS
PRINT "You are down the street"
PRINT "1-Sal"
PRINT "2-Danny Fanny"
PRINT "3-Hoey"
PRINT "4-Go to main menu"
PRINT "5-Quit"
INPUT "Which number (1-5)"; which%
IF which% < 1 OR which% > 5 THEN GOTO 2
IF which% = 2 THEN GOTO 4
IF which% = 3 THEN GOTO 5
IF which% = 1 THEN GOTO 3

3 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF sal% <= 0 THEN PRINT "You have defeated Sal and earned 3 experience pts!": exper% = exper% + 3: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Sal"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT sal%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 6
IF yhite% = 2 THEN yhit% = 8
IF yhite% = 3 THEN yhit% = 10

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 14
IF yfite% = 2 THEN ymit% = 16
IF yfite% = 3 THEN ymit% = 18

health% = health% - yhit%
sal% = sal% - ymit%
GOTO 3

4 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF fanny% <= 0 THEN PRINT "You have defeated Fanny and earned 5 experience pts!": exper% = exper% + 5: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Fanny"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT fanny%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 7
IF yhite% = 2 THEN yhit% = 9
IF yhite% = 3 THEN yhit% = 11

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 13
IF yfite% = 2 THEN ymit% = 15
IF yfite% = 3 THEN ymit% = 18

health% = health% - yhit%
fanny% = fanny% - ymit%
GOTO 4

5 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF hoey% <= 0 THEN PRINT "You have defeated Hoey and earned 6 experience pts!": exper% = exper% + 6: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Hoey"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT hoey%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 8
IF yhite% = 2 THEN yhit% = 9
IF yhite% = 3 THEN yhit% = 12

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 14
IF yfite% = 2 THEN ymit% = 16
IF yfite% = 3 THEN ymit% = 18

health% = health% - yhit%
hoey% = hoey% - ymit%
GOTO 5

20 CLS
kremen% = 45
oj% = 50
ralph% = 40
PRINT "You are at Bergen Catholic H.S."
PRINT "1-Ralph Malph"
PRINT "2-Kremen"
PRINT "3-Little O.J. Simpson"
PRINT "4-Go to main menu"
PRINT "5-Quit"
INPUT "Which number (1-5)"; which%
IF which% < 1 OR which% > 5 THEN GOTO 20
IF which% = 2 THEN GOTO 24
IF which% = 3 THEN GOTO 25
IF which% = 4 THEN GOTO 1
23 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF ralph% <= 0 THEN PRINT "You have defeated Ralph and earned 7 experience pts!": exper% = exper% + 7: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Ralph"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT ralph%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 9
IF yhite% = 2 THEN yhit% = 11
IF yhite% = 3 THEN yhit% = 12

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 14
IF yfite% = 2 THEN ymit% = 16
IF yfite% = 3 THEN ymit% = 18
IF exper% > 35 THEN ymit% = ymit% + 5
IF exper% > 70 THEN ymit% = ymit% + 10

health% = health% - yhit%
ralph% = ralph% - ymit%
GOTO 23

24 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF kremen% <= 0 THEN PRINT "You have defeated Kremen and earned 8 experience pts!": exper% = exper% + 8: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Kremen"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT kremen%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 9
IF yhite% = 2 THEN yhit% = 11
IF yhite% = 3 THEN yhit% = 12

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 15
IF yfite% = 2 THEN ymit% = 17
IF yfite% = 3 THEN ymit% = 18
IF exper% > 35 THEN ymit% = ymit% + 5
IF exper% > 70 THEN ymit% = ymit% + 10

health% = health% - yhit%
kremen% = kremen% - ymit%
GOTO 24

25 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF oj% <= 0 THEN PRINT "You have defeated OJ and earned 10 experience pts!": exper% = exper% + 10: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "O.J."
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT oj%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 13
IF yhite% = 2 THEN yhit% = 14
IF yhite% = 3 THEN yhit% = 16

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 14
IF yfite% = 2 THEN ymit% = 16
IF yfite% = 3 THEN ymit% = 18
IF exper% > 35 THEN ymit% = ymit% + 5
IF exper% > 70 THEN ymit% = ymit% + 8

health% = health% - yhit%
oj% = oj% - ymit%
GOTO 25

30 CLS
cop% = 80
hless% = 55
hanson% = 65
PRINT "You are down in Greenage Village"
PRINT "1-Homeless man"
PRINT "2-Middle Hanson brother"
PRINT "3-Rent-a-cop"
PRINT "4-Go to main menu"
PRINT "5-Quit"
INPUT "Which number (1-5)"; which%
IF which% < 1 OR which% > 5 THEN GOTO 30
IF which% = 2 THEN GOTO 34
IF which% = 3 THEN GOTO 35
IF which% = 4 THEN GOTO 1

33 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF hless% <= 0 THEN PRINT "You have defeated the Homeless Fag and earned 12 experience pts!": exper% = exper% + 12: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Homeless Guy"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT hless%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 15
IF yhite% = 2 THEN yhit% = 18
IF yhite% = 3 THEN yhit% = 21

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 13
IF yfite% = 2 THEN ymit% = 14
IF yfite% = 3 THEN ymit% = 15
IF exper% > 35 THEN ymit% = ymit% + 5
IF exper% > 70 THEN ymit% = ymit% + 10

health% = health% - yhit%
hless% = hless% - ymit%
GOTO 33

34 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF hanson% <= 0 THEN PRINT "You have defeated Hanson and earned 15 experience pts!": exper% = exper% + 15: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Hanson"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT hanson%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 19
IF yhite% = 2 THEN yhit% = 22
IF yhite% = 3 THEN yhit% = 24

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 14
IF yfite% = 2 THEN ymit% = 16
IF yfite% = 3 THEN ymit% = 18
IF exper% > 35 THEN ymit% = ymit% + 5
IF exper% > 70 THEN ymit% = ymit% + 10

health% = health% - yhit%
hanson% = hanson% - ymit%
GOTO 34

35 CLS
IF exper% > 149 THEN GOTO 120
IF health% <= 0 THEN PRINT "You have died!": END
IF cop% <= 0 THEN PRINT "You have defeated the Rent-a-Cop and earned 19 experience pts!": exper% = exper% + 19: SLEEP: GOTO 1
LOCATE 12, 30
PRINT "You"
LOCATE 12, 60
PRINT "Cop"
LOCATE 11, 29
PRINT health%
LOCATE 11, 59
PRINT cop%
SLEEP
yhite% = INT(RND * 3 + 1)
IF yhite% = 1 THEN yhit% = 21
IF yhite% = 2 THEN yhit% = 25
IF yhite% = 3 THEN yhit% = 26

yfite% = INT(RND * 3 + 1)
IF yfite% = 1 THEN ymit% = 14
IF yfite% = 2 THEN ymit% = 15
IF yfite% = 3 THEN ymit% = 16
IF exper% > 35 THEN ymit% = ymit% + 5
IF exper% > 70 THEN ymit% = ymit% + 10

health% = health% - yhit%
cop% = cop% - ymit%
GOTO 35


100 CLS
PRINT "The doctor will heal you 50 health points for 20$"
INPUT "Will you do it (y/n)"; def$
IF money% < 20 THEN PRINT "You don't have enough cash!"
IF LCASE$(def$) = "y" THEN PRINT "Good idea, dude!": money% = money% - 20: health% = health% + 50: GOTO 101
IF LCASE$(def$) = "n" THEN PRINT "It's ok, man.": GOTO 101
GOTO 100
101 SLEEP
GOTO 1

120 CLS
PRINT "You have beaten the game!  You have defeated enough fags in the world to"
PRINT "keep the world mostly straight!  Good work!"
PRINT "Final Money:"; money%
PRINT "Final Experience Points:"; exper%
PRINT "Final Health:"; health%
LOCATE 15, 5
PRINT "Thanks for playing!": END

'can you believe I typed all this junk!   and the game is simple right?
'if you think so or not e-mail me at Malph97@aol.com