Skip to content

Instantly share code, notes, and snippets.

@jmanikan

jmanikan/replgame_init.rb

Last active August 29, 2015 14:24
Show Gist options
  • Save jmanikan/e77ddaa6f53e4bbf1682 to your computer and use it in GitHub Desktop.
Save jmanikan/e77ddaa6f53e4bbf1682 to your computer and use it in GitHub Desktop.
Download ZIP
Weekend REPL Game Project - Final Code
Raw
replgame_init.rb
require './replgame_mod_v2.rb'
include Constantinople
game_intro
game_play
Raw
replgame_mod_v3.rb
module Constantinople
# Global variables for battle engines
# The battle engine methods had to be nested in their respective sections so
# the randomizer will throw up a different number each time
$luck_factor = 0.20
$theodosian_walls = 15_000
$ottoman_army = 200_000
$eastern_roman_army = 15_000
$city_pop = 50_000
$western_reinforcements
$wall_damage
def game_intro # Introduces the game background
puts <<-END
Welcome to ROMA ETERNA!
Will you see Nova Roma remain in Christian hands up to present or allow
history to take its course and it becomes today's Istanbul?
The year is 1453, and centuries-old Constantinople, capital of the
Eastern Roman Empire, grandest of all cities, Mistress of the East,
and guardian of Europe and Christendom for a thousand years, is but a shadow
of its former glory, and is being besieged by a powerful Turkish army,
hundreds-of-thousands strong.
By this time, what remains of the realm that once ruled most of the known
world has been reduced to a small sliver of land surrounding the immediate
environs of the city.
There are no more Roman legions - those armies that conquered powerful
empires and defended vast borders that kept the empire and its citizens
prosperous and secure.
They exist only in lore and legend.
Your objective, as either Roman Emperor Constantine XI or
Ottoman Sultan Memet II, is to ensure its survival or absolute conquest.
Your orders will be carried out by your most trusted advisors:
Strategoi Solomon of Delos and Agha Izmir of Aleppo, respectively.
HOW TO PLAY: Just enter letter in parentheses of your choice! GOOD LUCK!
Begin!
Choose side: play as (R)oman or (O)ttoman?
END
end
def game_play # Game proper
case gets.chomp.downcase
when 'r' # Player has chosen to be Roman
sleep(3)
puts <<-END
Strategoi Solomon: My lord Constantine, the Turks are upon us,
and on you lies the destiny of our proud Roman race!
What is your command?
(N)egotiate, (f)ight, or (s)urrender the city?
END
case gets.chomp.downcase
when 'n' # Roman decides to negotiate
sleep(3)
puts <<-END
Sending ambassador Nicopherus to the enemy camp. We should hear from
him shortly, that is, if he isn't beheaded sooner.
My lord, reports say Turkish demands are in. I am sending for their
representatives, and here they are!
(P)ay a large tribute in gold, submit as a (v)assal to Memet II, or
(c)onclude a treaty of friendship with him and give the hand of your
eldest daughter, the Princess Theodora Porphyrogenita, in marriage
to the Sultan's son and heir.
END
case gets.chomp.downcase
when 'p' # Roman will pay tribute
sleep(3)
puts <<-END
How much of the treasury do we give? Enter a number:
(do not underestimate what gold will do to change people's minds).
END
gold_amount = gets.to_i # Sets condition based on input from player
if gold_amount < 1_000_000
sleep(3)
puts <<-END
You see?! I told you so - the Sultan deemed your offer an insult
and has ordered his army to begin its assault! Your short-sightedness
has brought closer our doom!
You are a disgrace! I myself will go out to lead the defense,
and if through a miracle, we manage to win, I hope your
Imperial Bodyguards have had the sense to evacuate
you and your family from this place!
END
def constantinople_attack # Battle engine
$western_reinforcements = rand(50_000..75_000)
if $western_reinforcements > 60_000
sleep(3)
puts <<-END
It is a good thing that reinforcements from the West are here! They are
forming up to join our attack!
END
else
sleep(3)
puts <<-END
The West did send reinforcements. Let us hope they
will be enough. We need all the help we can get.
END
end
roman_attack = rand((150_000)..($ottoman_army)) - ($eastern_roman_army + $western_reinforcements)
# Calculates battle results with randomizer for strengths of opposing armies due to
#reinforcements and casualties, etc., and based on theory of 3 attackers vs. 1 defender
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
if roman_attack > rand(90_000..110_000)
sleep(3)
puts <<-END
Praise God for this miracle! We have defeated the Turks!
They were broken on our walls and are fleeing in disarray!
The gates have opened and our cavalry are in pursuit of
survivors, and a detachment is right now searching for
the Sultan and members of his court.
The city is delivered from conquest!
GAME OVER. ROMA ETERNA!
END
else
sleep(3)
puts <<-END
DISASTER! Our army has been defeated! The Turks will surely
breach our walls now and we have no more defenders left to man them!
Make ready to flee, my lord! There is a ship currently at harbor that is
waiting to take you to Italy!
From there, you may seek help from The Pope in Rome to call for a
crusade to retake our city!
Go now, for there is no time left!
GAME OVER. YOU LOSE!
END
end
end
sleep(5)
constantinople_attack() # Calls on battle engine to decide outcome
else
sleep(3)
puts <<-END
Wise choice, Basileus. Because of your foresight, the Asiatic hordes
have lifted the siege and are now breaking camp.
History will show that you will use this time wisely to
rebuild Constantinople's empire, army and morale!
Praise God that no more need die today.
Congratulations!
GAME OVER. YOU WIN! ROMA ETERNA!
END
end
when 'v' # Roman will submit as a vassal
sleep(3)
puts <<-END
God help us! Constantinople never before has submitted to a
foreign ruler! The Sultan expects you to send your army to
fight for him whenever he calls. I am ashamed to call you Emperor!
There is a large body of men approaching the palace.
Guards! Secure this place.
END
def coup_d_etat # Calculates chances of being deposed by unhappy Romans due to cowardice
rand((0.1)..(0.25))
end
overthrow = coup_d_etat # What happens to you next
to_percent = overthrow * 100
sleep(5)
puts "The chance of a palace coup is: #{to_percent.floor}%!"
if overthrow > 0.2
sleep(3)
puts <<-END
You have been deposed by your Imperial bodyguards, The Varangians!
They will never bow to a foreign despot! You are about to be
blinded and stripped of the Imperial regalia.
GAME OVER. YOU LOSE!
END
else
sleep(3)
puts <<-END
That mob is your people wanting refuge within the safest
place in the city when the Turks enter! Do you want to open
the armories for a last-ditch defense, (y) or (n)?
END
final_defense = gets.chomp.downcase
if final_defense === "y"
citizen_army = ($city_pop * rand(0.0..0.25)) + $eastern_roman_army
# Checks to see if can recruit from city_pop to add to eastern_roman_army and bolster city defense
if citizen_army > $ottoman_army / rand(6..12)
# Checks to see if enough troops have been raised to stand a chance at
# successfully repelling invading ottoman_army
sleep(3)
puts <<-END
A new levy has been successfully raised and it is assembling
in the main square, my lord Constantine. It numbers in the thousands!
The city may yet have hope!
Go out and lead them to victory!
END
def constantinople_attack # Battle engine
$western_reinforcements = rand(50_000..75_000)
if $western_reinforcements > 60_000
sleep(3)
puts <<-END
Reinforcements from the West are here! They are forming up to join
our attack!"
END
else
sleep(3)
puts <<-END
The West did send reinforcements. Let us hope they will be enough.
END
end
roman_attack = rand((150_000)..($ottoman_army)) - ($eastern_roman_army + $western_reinforcements)
# Calculates battle results with randomizer for strengths of opposing armies due to reinforcements
# and casualties, etc., and based on theory of 3 attackers vs. 1 defender
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
if roman_attack > rand(90_000..110_000)
sleep(3)
puts <<-END
Praise God, my lord Constantine! We have defeated the Turks! They were
broken on the field and are fleeing in disarray!
Our cavalry are in pursuit and a detachment is right now searching for
the Sultan and members of his court.
You have delivered our city from conquest! You will be known to
history forever!
GAME OVER. YOU WIN! ROMA ETERNA!
END
else
sleep(3)
puts <<-END
DISASTER! Our army has been defeated! The Turks will surely breach our walls
now and we have no more defenders left to man them!
Make haste to the harbor where a ship is waiting to take you to Italy,
there to ask The Pope for help in launcing a crusade!
Go now and with God!
GAME OVER. YOU LOSE!
END
end
end
sleep(5)
constantinople_attack() # Calls on battle engine to decide outcome
else
sleep(3)
puts <<-END
Alas! All is lost. Our citizens do not even care to fight for their city
anymore! The recruitment effort has barely enrolled a thousand souls! That
is not enough to hold the main square!
Cowards, all of them! What are their lives worth if instead of enlisting
to defend their homes, they just wait for the Turks to come and kill
them and take all they ever had?!
There is no more hope!
You, my lord, need to hurry to the harbor. There lay in anchor is a ship
waiting to take you to Italy to plead for help from The Pope, that he
may launch a crusade!
Go now!
GAME OVER. YOU LOSE!
END
end
elsif final_defense === "n"
sleep(3)
puts <<-END
DISASTER!!
You do not have the will to fight??
You do not deserve to wear the purple of Rome and are a disgrace
to your namesake!
Reports are in that general Belisarius is sailing from Trebizond
with relief and is intent on deposing you!
I would not want to be you for all the gold in the world nor
here when the general arrives and annihilates the armies of Memet!
Stand aside, my lord, and I will lead our defense while we
wait for relief!
Guards!
Take the Emperor to his quarters and see to it that
he is not to be disturbed. Admit no one, and I mean nobody
is allowed to see him - not even the Empress herself!
Go!
GAME OVER. YOU LOSE!
END
end
end
when 'c' # Roman will conclude a treaty of friendship <-- least risky course
# of action and solves the "Byzantine General's Problem"
sleep(3)
puts <<-END
I think for now that is the wisest course of action. For more than
fifteen centuries, we Romans have been masters of our destiny.
We can bear this state of affairs for now.
The Sultan is most pleased by your decision and awaits the
Princess Theodora Porphyrogenita in his camp and is proud to
call you brother! Let our two realms coexist peacefully
side-by side for all time!
My lord, The Turks are pulling down their siege towers and
are breaking camp. Well done!
History will show that you will use this time wisely to rebuild
Constantinople's empire, army and morale!
GAME OVER. YOU WIN! ROMA ETERNA!
END
else # Roman default
sleep(3)
puts <<-END
What kind of choice is that? These are desperate times, my lord.
The fate of the city rests on your decision!
It cannot survive on indecision or incompetence.
GAME OVER. YOU LOSE!
END
end
when 'f' # Roman has decided to fight
sleep(3)
puts <<-END
Very good, my lord, and we give battle at once! Sound the trumpets!
We may no longer have the troops to sally forth to meet and overwhelm
the enemy on the field, but we will make sure they never breach our walls!
I will see that all gates are barred shut and all towers and
ramparts are manned.
We have more than enough provisions to last us years, and the
West will surely send help!
They cannot afford not to! If Constantinople falls, Europe will fall!
END
def constantinople_attack # Battle engine
$western_reinforcements = rand(50_000..75_000)
if $western_reinforcements > 60_000
sleep(3)
puts <<-END
Large reinforcements from the West are here! They are
forming up to join the attack!
END
else
sleep(3)
puts <<-END
The West did send some reinforcements. Let us hope they
are enough.
END
end
roman_attack = rand((150_000)..($ottoman_army)) - ($eastern_roman_army + $western_reinforcements)
# Calculates battle results with randomizer for strengths of opposing armies due
# to reinforcements and casualties, etc., and based on theory of 3 attackers vs. 1 defender
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
if roman_attack > rand(90_000..110_000)
sleep(3)
puts <<-END
Praise God, my lord Constantine! We have defeated the Turks!
They were broken on the field and are fleeing in disarray!
Our cavalry are in pursuit and a squadron is right now searching
for the Sultan and members of his court.
You have delivered our city from conquest! You will be be known
to history forever!
GAME OVER. YOU WIN! ROMA ETERNA!
END
else
sleep(3)
puts <<-END
DISASTER!
Our army has been defeated! The Turks will surely breach
our walls now and we have no more defenders left to man them!
I pray the invaders to be merciful, though I doubt it.
Make ready to flee through the catacombs!
Go! Quickly! There is a ship by the harbor waiting to take you to Italy!
Farewell, my Emperor!
GAME OVER. YOU LOSE!
END
end
end
sleep(5)
constantinople_attack() # Calls on the attack
when 's' # Roman will surrender the city
sleep(3)
puts <<-END
DISASTER!!
You do not have the will to fight?? You do not deserve to wear the
purple of Rome and are a disgrace to your namesake!
Reports are in that general Belisarius is sailing from Trebizond
with relief and is intent on deposing you!
I would not want to be you for all the gold in the world nor here
when the general arrives and annihilates the armies of Memet!
Stand aside, my lord, and I will lead our defense while we wait for relief!
Guards, take the Emperor to his quarters and see to it that he is not
to be disturbed. Admit no one, and I mean nobody is allowed to see him
- not even the Empress herself!
Go!
GAME OVER. YOU LOSE!
END
else # Roman default
sleep(3)
puts <<-END
What kind of choice is that? These are desperate times, my lord.
The fate of the city rests on your decision!
It cannot survive on indecision or incompetence.
GAME OVER. YOU LOSE!
END
end
when 'o' # Player has chosen to be Ottoman
sleep(3)
puts <<-END
Agha Izmir: My Sultan Memet, Sire! We are finally besieging the
greatest city in the world, and God-willing, it will soon belong to you!
What would you have us do?
(E)ntreat with the Emperor Constantine and have him submit to your
authority, (d)emand ranson, (a)ssault the Theodosian Walls?
END
case gets.chomp.downcase
when 'e' # Ottoman will entreat with Roman
sleep(3)
puts <<-END
Very well. Their representative, Count Nicopherus and his retinue are
just outside the camp. I will tell the guards to admit them.
The Roman ambassador is here, Sire. While I do not necessarily agree
with it, diplomacy seems to be the order of the day.
I know Nicopherus quite well. He and I grew up together in his father's
estate near Adrianople when I was a hostage for my own father's
good behavior. I was well-treated and released after academy training
years later.
One can say I learned statecraft at his father's knee.
It is quite ironic to meet him again after all this time in vastly
different circumstances.
While crafty and shrewd, he is also very honorable.
I just pray the Romans have the good sense to accept our offer
- that we will withdraw from their former European territories if
they promise to abandon Asia Minor and Africa province.
Do we begin? (Y)es or (n)o?
END
case gets.chomp.downcase
when 'y'
never_on_tuesday = Time.now.strftime("%A") # Constantinople was conquered
# on a Tuesday and is the unluckiest day of the week in that part of the world
if never_on_tuesday === "Tuesday"
charm = 0
else charm = rand(0..50)
end
roman_pride = rand(0..51) # When charm is 0, it becomes necessary to give Rome, i.e.
# if you play this game on a Tuesday, the engine gives an already disadvantaged
# side a one percent delta to effect a win
sleep(5)
msg = 'NEGOTIATIONS IN PROGRESS! NEGOTIATIONS IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
negotiation_proper = charm + roman_pride
if negotiation_proper > rand(45..55)
sleep(3)
puts <<-END
Sultan!
They have agreed to everything we proposed!
We will hand over territory up to the Danube in the north, where the Bulgars
are, and near the Italian border to the west, and then the Euxine Sea
in the east.
We will also guarantee their sovereignty over the Hellespont
and the Bosporus. Leave it in their hands to deny them to Western armies
on their way east!
In return, they on the other hand relinquish claim and
control over Anatolia, Palestina, Aegyptus, and Africa.
Congratulations!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
They said "NO" to everything! It beggars belief!
That is not my friend, Nicopherus' logic. It must be Constantine's!
Why in God's name refuse such a generous offer?
Constantinople is not what it once was! There are no more Augustii
on the throne!
The last of the true Romans died with Justinian nearly a thousand years ago!
I should have guessed this was a waste of time!
It is a pity Nicopherus allowed himself to be used by Constantine this way.
I knew this was nothing but a delaying tactic on their part.
Guards!
Escort my dear friend the Count, but the hold members of his retinue and
behead them. That will teach them to play games when their very
survival is at stake!
We must attack at once!
END
def ottoman_attack # Battle engine
$western_reinforcements = rand(50_000..75_000)
if $western_reinforcements > 60_000
sleep(3)
puts <<-END
Sire! Scouts bring word that reinforcements from Europe have just landed.
They are bolstering city defenses as we speak!
END
else
sleep(3)
puts <<-END
It seems as if reinforcements from the West have arrived, but reports
indicate their numbers are not what Constantine had been promised. Ha!
END
end
ottoman_army_attack = rand((150_000)..($ottoman_army)) - ($eastern_roman_army + $western_reinforcements)
# Calculates battle results with randomizer for strengths of opposing armies due to reinforcements
# and casualties, etc., and based on theory of 3 attackers vs. 1 defender
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
10.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
if ottoman_army_attack > rand(90_000..110_000)
sleep(3)
puts <<-END
Praise God, Sultan! We have taken the city! The remnants of
heir army are fleeing through their tunnels.
Janissaries are attempting to storm the Imperial Palace,
and we should eliminate all further resistance in a day or two.
Then, we can let the customary three-day looting begin!
Congratulations, Memet II, Conqueror of The Roman Empire!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
DISASTER!
Our assault has been has been repelled! It must surely
be those reinforcements.
Curse the Romans! We should order all surviving troops
to regroup and withdraw to safety in the west. We still have sizeable
formations encamped there to dissuade Constantine from ordering
a counterattack!
We will bring down this city once and for all, but perhaps now is
not yet the time.
GAME OVER. YOU LOSE!
END
end
end
sleep(5)
ottoman_attack()
end
when 'n'
sleep(3)
puts <<-END
Sultan, we must not resort to tricks and should show to be more honorable
than these infidels.
If you do not have any intentions of negotiating with their representatives,
let us release them and begin our assault at once!
Should we attack now? (Y)
END
case gets.chomp.downcase
when 'y'
sleep(3)
puts <<-END
Excellent. Count Nicopherus and his party have left and orders are
now going out to our commanders.
The assault should commence at any moment.
END
def ottoman_attack # Battle engine
$western_reinforcements = rand(50_000..75_000)
if $western_reinforcements > 60_000
sleep(3)
puts <<-END
Sire! Scouts bring word that reinforcements from Europe have just landed.
They are bolstering city defenses as we speak!"
END
else
sleep(3)
puts <<-END
It seems as if reinforcements from the West have arrived, but reports
indicate their numbers are not what Constantine had been promised. Ha!"
END
end
ottoman_army_attack = rand((150_000)..($ottoman_army)) - ($eastern_roman_army + $western_reinforcements)
# Calculates battle results with randomizer for strengths of opposing armies due to reinforcements
# and casualties, etc., and based on theory of 3 attackers vs. 1 defender
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
if ottoman_army_attack > rand(90_000..110_000)
sleep(3)
puts <<-END
Praise God, Sultan! We have taken the city! The remnants of
their army are fleeing through their tunnels.
Janissaries are attempting to storm the Imperial Palace,
and we should eliminate all further resistance in a day or two.
Then, we can let the customary three-day looting begin!
Congratulations, Memet II, Conqueror of The Roman Empire!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
DISASTER!
Our assault has been has been repelled! It must surely be
those reinforcements.
Curse the Romans! We should order all surviving troops to regroup
and withdraw to safety in the west. We still have sizeable formations
there to dissuade Constantine from any notion of a counterattack.
We will bring down this city once and for all, but perhaps
now is not yet the time.
GAME OVER. YOU LOSE!
END
end
end
sleep(5)
ottoman_attack()
else
end
end
when 'd' # Ottoman will demand ransom
sleep(3)
puts <<-END
Tell his Imperial Majesty, that the price of peace is we will accept no less
than 1,000,000 lbs. of minted bullion, and he has a fortnight to reply.
Let us await what they say.
END
roman_gold = rand(500_000..1_500_000) # Generate random amount Romans
# are willing to pay after demand is made
sleep(5)
puts "Sultan, the Romans have sent" + " #{roman_gold} " + "pounds."
if roman_gold < 1_000_000
sleep(5)
puts <<-END
Those misers! They insult us not with that amount but with their
arrogance to offer it. We attack at once!
Do we deploy artillery, Sire? (Y)es or (n)o?
END
deploy_cannon = gets.chomp.downcase
if deploy_cannon === "y"
sleep(3)
puts <<-END
Yes! Move the cannon into position and shoot at will!
Let us see if that bronze is worth its weight in gold!
We paid a small fortune for them and they had better work.
END
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
cannon_shot = rand(1..10_000) # Attempts to break down walls
$wall_damage = $theodosian_walls - cannon_shot - ($luck_factor * cannon_shot)
if $wall_damage > 10_000
sleep(3)
puts <<-END
Praise God, Sultan! A huge section has collapsed and the breach
is wide enough for hundreds of our troops to pour through
at once!
We have taken the city! The remnants of their army are fleeing
through their tunnels.
That Viennese cannon-maker has delivered. We must have him forge
us some more.
Janissaries are attempting to storm the Imperial Palace,
and we should eliminate all further resistance in a day or two.
Then, we can let the customary three-day looting begin!
Congratulations, Memet II, Conqueror of The Roman Empire!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
These cannon are useless! Get the sappers!
Yes, Sire. Tunneling has commenced! Theodosius' walls are
not just stout, they are deep, and it will take time to burrow
underneath them and make sure we have packed enough powder to
bring down a section.
END
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
10.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
sappers_progress = rand(1..6_500) # Attempts to break down walls with
# different chance percentage because sappers are inherently a weaker value attack than artillery
wall_damage_sappers = $theodosian_walls - sappers_progress - ($luck_factor * sappers_progress)
if wall_damage_sappers > 7_500
sleep(3)
puts <<-END
Praise God, Sultan! The sappers have managed to
undermine and bring down a large section of walls in
a lightly-defended area!
The breach is large enough that hundreds of our troops
can pour through at once!
We have taken the city! The remnants of their army are fleeing
through their tunnels.
Janissaries are attempting to storm the Imperial Palace, and
we should eliminate all further resistance in a day or two.
Then, we can let the customary three-day looting begin!
Congratulations, Memet II, Conqueror of The Roman Empire!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
DISASTER!
Our assault has been has been repelled! How could this be?
Curse the Romans! We should order all surviving troops to
regroup and withdraw to safety in the south. I have placed sizeable
formations there to guard against any landings from Europe, and joining
what strength we still have will dissuade Constantine from ordering
a counterattack.
We will bring down this city once and for all, but perhaps
now is not yet the time.
And behead that useless Viennese cannon-maker when you
find him!
GAME OVER. YOU LOSE!
END
end
end
elsif deploy_cannon === "n"
sleep(3)
puts <<-END
Very well. Siege towers are on their way! We have more than two score
and the Romans simply don't have enough men to bring them all down!
Come to the pavillion and let us observe!
END
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
10.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
siege_towers = rand(1..8_500) # Attempts to bring down walls with different
# chance percentage - attack value is near median between artillery & sappers
wall_damage_siege = $theodosian_walls - siege_towers - ($luck_factor * siege_towers)
if wall_damage_siege > 7_500
sleep(3)
puts <<-END
Praise God, Sultan! Our men are over the walls!
As I predicted, hey did not have enough to bring down many of our towers
and their defenders have been displaced near the gates where they where
strongest!
We have taken the city! The remnants of their army are fleeing
through the tunnels.
Janissaries are attempting to storm the Imperial Palace, and
we should eliminate all further resistance in a day or two.
Then, we can let the customary three-day looting begin!
Congratulations, Memet II, Conqueror of The Roman Empire!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
DISASTER!
Our assault has been has been repelled! How could this be?
Curse the Romans! We should order all surviving troops to
regroup and withdraw to safety in the north. We still have sizeable
formations there to dissuade Constantine from ordering a counterattack.
The Bulgars will welcome us. There is no love lost between them and
the Romans.
We will bring down this city once and for all, but perhaps
now is not yet the time.
GAME OVER. YOU LOSE!
END
end
end
else
sleep(3)
puts <<-END
Ah! He is wise, that Constantine, much like his ancestors.
He must have sent us the entire contents of his treasury.
What will he have now to rebuild?!
In the meantime, we will use that gold to expand our fleet and block off
the city's access to the sea. Give them their relief for ten years
and we will come back.
Put out the word to lift the siege and break camp at once!
God be praised that no one must perish today.
And send my brother, the Emperor Constantine, a nice gift of thanks.
GAME OVER. YOU WIN!
END
end
when 'a' # Ottoman will order an assault
sleep(3)
puts <<-END
God be praised! Our troops have been waiting for this day for so long!
We have come so far and very soon, the greatest city in the world
shall be ours!
We go at once!
Signal all commands to make ready their assault according to plan!
END
def ottoman_attack # Battle engine
$western_reinforcements = rand(50_000..75_000)
if $western_reinforcements > 60_000
sleep(3)
puts <<-END
Sire! Scouts bring word that reinforcements from Europe have just landed.
They are bolstering city defenses as we speak!
END
else
sleep(3)
puts <<-END
It seems as if reinforcements from the West have arrived, but reports
indicate their numbers are not what Constantine had been promised. Ha!
END
end
ottoman_army_attack = rand((150_000)..($ottoman_army)) - ($eastern_roman_army + $western_reinforcements)
# Calculates battle results with randomizer for strengths of opposing armies due to
# reinforcements and casualties, etc., and based on theory of 3 attackers vs. 1 defender
sleep(5)
msg = 'BATTLE IN PROGRESS! BATTLE IN PROGRESS!'
15.times do
print "\r#{ msg }"
sleep 0.5
print "\r#{ ' ' * msg.size }" # Flashes what is taking place.
sleep 0.5
end
if ottoman_army_attack > rand(90_000..100_000)
sleep(3)
puts <<-END
Praise God, Sultan! We have taken the city! The remnants of their
army are fleeing through their tunnels.
Janissaries are attempting to storm the Imperial Palace, and
we should eliminate all further resistance in a day or two.
Then, we can let the customary three-day looting begin!
Congratulations, Memet II, Conqueror of The Roman Empire!
GAME OVER. YOU WIN!
END
else
sleep(3)
puts <<-END
DISASTER!
Our assault has been has been repelled! It must surely be those
reinforcements.
Curse the Romans! We should order all surviving troops to regroup
and withdraw to safety in the west. We still have sizeable formations
there to dissuade Constantine from ordering a counterattack.
We will bring down this city once and for all, but perhaps
now is not yet the time.
GAME OVER. YOU LOSE!
END
end
end
sleep(5)
ottoman_attack() # Calls on battle engine
else # Ottoman default
sleep(3)
puts <<-END
Sire, I do not understand your command. There is not a moment to lose.
We have the greatest prize in the world right before us.
GAME OVER. YOU LOSE!
END
end
else # Player default
sleep(3)
puts <<-END
Invalid choice. Again, please.
END
game_play # Loops to beginning of game
end
end
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment