X-Git-Url: https://jxself.org/git/?p=super-star-trek.git;a=blobdiff_plain;f=src%2Fsst.py;h=14a1f27429c2885fd9174a7a6aa8ba10cd30f72a;hp=a032cb7499fc9543ad0bcf6d93fc5cca6ed467b2;hb=6059a6d14ea95686e2dad1f6251580ee9951e2f1;hpb=76b6127e9fc107e3eb757b1f6764b9f4c960e066 diff --git a/src/sst.py b/src/sst.py index a032cb7..14a1f27 100644 --- a/src/sst.py +++ b/src/sst.py @@ -1,3 +1,4 @@ +#!/usr/bin/env python """ sst.py =-- Super Star Trek in Python @@ -5,10 +6,177 @@ This code is a Python translation of a C translation of a FORTRAN original. The FORTRANness still shows in many ways, notably the use of 1-origin index an a lot of parallel arrays where a more modern language would use structures or objects. + +Dave Matuszek says: + +SRSCAN, MOVE, PHASERS, CALL, STATUS, IMPULSE, PHOTONS, ABANDON, +LRSCAN, WARP, SHIELDS, DESTRUCT, CHART, REST, DOCK, QUIT, and DAMAGE +were in the original non-"super" version of UT FORTRAN Star Trek. + +Tholians were not in the original. Dave is dubious about their merits. +(They are now controlled by OPTION_THOLIAN and turned off if the game +type is "plain".) + +Planets and dilithium crystals were not in the original. Dave is OK +with this idea. (It's now controlled by OPTION_PLANETS and turned +off if the game type is "plain".) + +Dave says the bit about the Galileo getting turned into a +McDonald's is "consistant with our original vision". (This has been +left permanently enabled, as it can only happen if OPTION_PLANETS +is on.) + +Dave also says the Space Thingy should not be preserved across saved +games, so you can't prove to others that you've seen it. He says it +shouldn't fire back, either. It should do nothing except scream and +disappear when hit by photon torpedos. It's OK that it may move +when attacked, but it didn't in the original. (Whether the Thingy +can fire back is now controlled by OPTION_THINGY and turned off if the +game type is "plain" or "almy". The no-save behavior has been restored.) + +The Faerie Queen, black holes, and time warping were in the original. + +Here are Tom Almy's changes: + +In early 1997, I got the bright idea to look for references to +"Super Star Trek" on the World Wide Web. There weren't many hits, +but there was one that came up with 1979 Fortran sources! This +version had a few additional features that mine didn't have, +however mine had some feature it didn't have. So I merged its +features that I liked. I also took a peek at the DECUS version (a +port, less sources, to the PDP-10), and some other variations. + +1, Compared to the original UT version, I've changed the "help" command to +"call" and the "terminate" command to "quit" to better match +user expectations. The DECUS version apparently made those changes +as well as changing "freeze" to "save". However I like "freeze". +(Both "freeze" and "save" work in SST2K.) + +2. The experimental deathray originally had only a 5% chance of +success, but could be used repeatedly. I guess after a couple +years of use, it was less "experimental" because the 1979 +version had a 70% success rate. However it was prone to breaking +after use. I upgraded the deathray, but kept the original set of +failure modes (great humor!). (Now controlled by OPTION_DEATHRAY +and turned off if game type is "plain".) + +3. The 1979 version also mentions srscan and lrscan working when +docked (using the starbase's scanners), so I made some changes here +to do this (and indicating that fact to the player), and then realized +the base would have a subspace radio as well -- doing a Chart when docked +updates the star chart, and all radio reports will be heard. The Dock +command will also give a report if a base is under attack. + +4. Tholian Web from the 1979 version. (Now controlled by +OPTION_THOLIAN and turned off if game type is "plain".) + +5. Enemies can ram the Enterprise. (Now controlled by OPTION_RAMMING +and turned off if game type is "plain".) + +6. Regular Klingons and Romulans can move in Expert and Emeritus games. +This code could use improvement. (Now controlled by OPTION_MVBADDY +and turned off if game type is "plain".) + +7. The deep-space probe feature from the DECUS version. (Now controlled +by OPTION_PROBE and turned off if game type is "plain"). + +8. 'emexit' command from the 1979 version. + +9. Bugfix: Klingon commander movements are no longer reported if long-range +sensors are damaged. + +10. Bugfix: Better base positioning at startup (more spread out). +That made sense to add because most people abort games with +bad base placement. + +In June 2002, I fixed two known bugs and a documentation typo. +In June 2004 I fixed a number of bugs involving: 1) parsing invalid +numbers, 2) manual phasers when SR scan is damaged and commander is +present, 3) time warping into the future, 4) hang when moving +klingons in crowded quadrants. (These fixes are in SST2K.) + +Here are Stas Sergeev's changes: + +1. The Space Thingy can be shoved, if you ram it, and can fire back if +fired upon. (Now controlled by OPTION_THINGY and turned off if game +type is "plain" or "almy".) + +2. When you are docked, base covers you with an almost invincible shield. +(A commander can still ram you, or a Romulan can destroy the base, +or a SCom can even succeed with direct attack IIRC, but this rarely +happens.) (Now controlled by OPTION_BASE and turned off if game +type is "plain" or "almy".) + +3. Ramming a black hole is no longer instant death. There is a +chance you might get timewarped instead. (Now controlled by +OPTION_BLKHOLE and turned off if game type is "plain" or "almy".) + +4. The Tholian can be hit with phasers. + +5. SCom can't escape from you if no more enemies remain +(without this, chasing SCom can take an eternity). + +6. Probe target you enter is now the destination quadrant. Before I don't +remember what it was, but it was something I had difficulty using. + +7. Secret password is now autogenerated. + +8. "Plaque" is adjusted for A4 paper :-) + +9. Phasers now tells you how much energy needed, but only if the computer +is alive. + +10. Planets are auto-scanned when you enter the quadrant. + +11. Mining or using crystals in presense of enemy now yields an attack. +There are other minor adjustments to what yields an attack +and what does not. + +12. "freeze" command reverts to "save", most people will understand this +better anyway. (SST2K recognizes both.) + +13. Screen-oriented interface, with sensor scans always up. (SST2K +supports both screen-oriented and TTY modes.) + +Eric Raymond's changes: + +Mainly, I translated this C code out of FORTRAN into C -- created #defines +for a lot of magic numbers and refactored the heck out of it. + +1. "sos" and "call" becomes "mayday", "freeze" and "save" are both good. + +2. Status report now indicates when dilithium crystals are on board. + +3. Per Dave Matuszek's remarks, Thingy state is never saved across games. + +4. Added game option selection so you can play a close (but not bug-for- +bug identical) approximation of older versions. + +5. Half the quadrants now have inhabited planets, from which one +cannot mine dilithium (there will still be the same additional number +of dilithium-bearing planets). Torpedoing an inhabited world is *bad*. +There is BSD-Trek-like logic for Klingons to attack and enslave +inhabited worlds, producing more ships (only is skill is 'good' or +better). (Controlled by OPTION_WORLDS and turned off if game +type is "plain" or "almy".) + +6. User input is now logged so we can do regression testing. + +7. More BSD-Trek features: You can now lose if your entire crew +dies in battle. When abandoning ship in a game with inhabited +worlds enabled, they must have one in the quadrant to beam down +to; otherwise they die in space and this counts heavily against +your score. Docking at a starbase replenishes your crew. + +8. Still more BSD-Trek: we now have a weighted damage table. +Also, the nav subsystem (enabling automatic course +setting) can be damaged separately from the main computer (which +handles weapons targeting, ETA calculation, and self-destruct). """ -import os, sys, math, curses, time, atexit, readline +import os, sys, math, curses, time, atexit, readline, cPickle, random, getopt -SSTDOC = "/usr/share/doc/sst/sst.doc" +SSTDOC = "/usr/share/doc/sst/sst.doc" +DOC_NAME = "sst.doc" # Stub to be replaced def _(str): return str @@ -19,6 +187,7 @@ NINHAB = (GALSIZE * GALSIZE / 2) MAXUNINHAB = 10 PLNETMAX = (NINHAB + MAXUNINHAB) QUADSIZE = 10 +BASEMIN = 2 BASEMAX = (GALSIZE * GALSIZE / 12) MAXKLGAME = 127 MAXKLQUAD = 9 @@ -54,8 +223,12 @@ IHMATER0 = '-', IHMATER1 = 'o', IHMATER2 = '0' +IHEOL = '\n' +IHREAL = 0.0 +IHALPHA = " " + class coord: - def __init(self, x=None, y=None): + def __init__(self, x=None, y=None): self.x = x self.y = y def invalidate(self): @@ -63,7 +236,7 @@ class coord: def is_valid(self): return self.x != None and self.y != None def __eq__(self, other): - return self.x == other.y and self.x == other.y + return other != None and self.x == other.y and self.x == other.y def __add__(self, other): return coord(self.x+self.x, self.y+self.y) def __sub__(self, other): @@ -75,21 +248,22 @@ class coord: def __hash__(self): return hash((x, y)) def __str__(self): - return "%d - %d" % (self.x, self.y) + return "%s - %s" % (self.x, self.y) class planet: - def __init(self): + def __init__(self): self.name = None # string-valued if inhabited self.w = coord() # quadrant located self.pclass = None # could be ""M", "N", "O", or "destroyed" - self.crystals = None # could be "mined", "present", "absent" - self.known = None # could be "unknown", "known", "shuttle_down" + self.crystals = "absent"# could be "mined", "present", "absent" + self.known = "unknown" # could be "unknown", "known", "shuttle_down" + self.inhabited = False # is it inhabites? def __str__(self): return self.name NOPLANET = None class quadrant: - def __init(self): + def __init__(self): self.stars = None self.planet = None self.starbase = None @@ -100,30 +274,37 @@ class quadrant: self.status = None # Could be "secure", "distressed", "enslaved" class page: - def __init(self): + def __init__(self): self.stars = None self.starbase = None self.klingons = None +def fill2d(size, fillfun): + "Fill an empty list in 2D." + lst = [] + for i in range(size+1): + lst.append([]) + for j in range(size+1): + lst[i][j] = fillfun(i, j) + return lst + class snapshot: - def __init(self): + def __init__(self): self.snap = False # snapshot taken - self.crew = None # crew complement - self.remkl = None # remaining klingons - self.remcom = None # remaining commanders - self.nscrem = None # remaining super commanders - self.rembase = None # remaining bases - self.starkl = None # destroyed stars - self.basekl = None # destroyed bases - self.nromrem = None # Romulans remaining - self.nplankl = None # destroyed uninhabited planets - self.nworldkl = None # destroyed inhabited planets + self.crew = 0 # crew complement + self.remkl = 0 # remaining klingons + self.remcom = 0 # remaining commanders + self.nscrem = 0 # remaining super commanders + self.rembase = 0 # remaining bases + self.starkl = 0 # destroyed stars + self.basekl = 0 # destroyed bases + self.nromrem = 0 # Romulans remaining + self.nplankl = 0 # destroyed uninhabited planets + self.nworldkl = 0 # destroyed inhabited planets self.planets = [] # Planet information - for i in range(PLNETMAX): - self.planets.append(planet()) - self.date = None # stardate - self.remres = None # remaining resources - self.remtime = None # remaining time + self.date = 0.0 # stardate + self.remres = 0 # remaining resources + self.remtime = 0 # remaining time self.baseq = [] # Base quadrant coordinates for i in range(BASEMAX+1): self.baseq.append(coord()) @@ -131,16 +312,10 @@ class snapshot: for i in range(QUADSIZE+1): self.kcmdr.append(coord()) self.kscmdr = coord() # Supercommander quadrant coordinates - self.galaxy = [] # The Galaxy (subscript 0 not used) - for i in range(GALSIZE+1): - self.chart.append([]) - for j in range(GALSIZE+1): - self.galaxy[i].append(quadrant()) - self.chart = [] # the starchart (subscript 0 not used) - for i in range(GALSIZE+1): - self.chart.append([]) - for j in range(GALSIZE+1): - self.chart[i].append(page()) + # the galaxy (subscript 0 not used) + self.galaxy = fill2d(GALSIZE, lambda i, j: quadrant()) + # the starchart (subscript 0 not used) + self.chart = fill2d(GALSIZE, lambda i, j: page()) class event: def __init__(self): @@ -192,6 +367,7 @@ SKILL_EXPERT = 4 SKILL_EMERITUS = 5 def damaged(dev): return (game.damage[dev] != 0.0) +def communicating(): return not damaged(DRADIO) or game.condition=="docked" # Define future events FSPY = 0 # Spy event happens always (no future[] entry) @@ -218,18 +394,18 @@ def findevent(evtype): return game.future[evtype] class gamestate: def __init__(self): self.options = None # Game options - self.state = None # A snapshot structure - self.snapsht = None # Last snapshot taken for time-travel purposes - self.quad = [[IHDOT * (QUADSIZE+1)] * (QUADSIZE+1)] # contents of our quadrant - self.kpower = [[0 * (QUADSIZE+1)] * (QUADSIZE+1)] # enemy energy levels - self.kdist = [[0 * (QUADSIZE+1)] * (QUADSIZE+1)] # enemy distances - self.kavgd = [[0 * (QUADSIZE+1)] * (QUADSIZE+1)] # average distances - self.damage = [0] * NDEVICES # damage encountered - self.future = [0.0] * NEVENTS # future events + self.state = snapshot() # A snapshot structure + self.snapsht = snapshot() # Last snapshot taken for time-travel purposes + self.quad = fill2d(QUADSIZE, lambda i, j: IHDOT) # contents of our quadrant + self.kpower = fill2d(QUADSIZE, lambda i, j: 0.0) # enemy energy levels + self.kdist = fill2d(QUADSIZE, lambda i, j: 0.0) # enemy distances + self.kavgd = fill2d(QUADSIZE, lambda i, j: 0.0) # average distances + self.damage = [0.0] * NDEVICES # damage encountered + self.future = [] # future events for i in range(NEVENTS): self.future.append(event()) self.passwd = None; # Self Destruct password - self.ks = [[None * (QUADSIZE+1)] * (QUADSIZE+1)] # enemy sector locations + self.ks = [[0 * (QUADSIZE+1)] * (QUADSIZE+1)] # enemy sector locations self.quadrant = None # where we are in the large self.sector = None # where we are in the small self.tholian = None # coordinates of Tholian @@ -397,10 +573,10 @@ def tryexit(look, ienm, loccom, irun): # avoid intruding on another commander's territory if ienm == IHC: for n in range(1, game.state.remcom+1): - if same(game.state.kcmdr[n],iq): + if game.state.kcmdr[n] == iq: return False # refuse to leave if currently attacking starbase - if same(game.battle, game.quadrant): + if game.battle == game.quadrant: return False # don't leave if over 1000 units of energy if game.kpower[loccom] > 1000.0: @@ -434,7 +610,7 @@ def tryexit(look, ienm, loccom, irun): game.state.kscmdr=iq else: for n in range(1, game.state.remcom+1): - if same(game.state.kcmdr[n], game.quadrant): + if game.state.kcmdr[n] == game.quadrant: game.state.kcmdr[n]=iq break game.comhere = False @@ -517,12 +693,12 @@ def movebaddy(com, loccom, ienm): forces += 1000.0 motion = 0 if forces <= 1000.0 and game.condition != "docked": # Typical situation - motion = ((forces+200.0*Rand())/150.0) - 5.0 + motion = ((forces+200.0*random.random())/150.0) - 5.0 else: if forces > 1000.0: # Very strong -- move in for kill - motion = (1.0-square(Rand()))*dist1 + 1.0 + motion = (1.0-square(random.random()))*dist1 + 1.0 if game.condition=="docked" and (game.options & OPTION_BASE): # protected by base -- back off ! - motion -= game.skill*(2.0-square(Rand())) + motion -= game.skill*(2.0-square(random.random())) if idebug: proutn("=== MOTION = %d, FORCES = %1.2f, " % (motion, forces)) # don't move if no motion @@ -626,7 +802,7 @@ def movebaddy(com, loccom, ienm): # Put commander in place within same quadrant game.quad[com.x][com.y] = IHDOT game.quad[next.x][next.y] = ienm - if not same(next, com): + if next != com: # it moved game.ks[loccom] = next game.kdist[loccom] = game.kavgd[loccom] = distance(game.sector, next) @@ -670,14 +846,14 @@ def moveklings(): def movescom(iq, avoid): # commander movement helper - if same(iq, game.quadrant) or not VALID_QUADRANT(iq.x, iq.y) or \ + if iq == game.quadrant or not VALID_QUADRANT(iq.x, iq.y) or \ game.state.galaxy[iq.x][iq.y].supernova or \ game.state.galaxy[iq.x][iq.y].klingons > MAXKLQUAD-1: return 1 if avoid: # Avoid quadrants with bases if we want to avoid Enterprise for i in range(1, game.state.rembase+1): - if same(game.state.baseq[i], iq): + if game.state.baseq[i] == iq: return True if game.justin and not game.iscate: return True @@ -707,12 +883,12 @@ def movescom(iq, avoid): sortklings() # check for a helpful planet for i in range(game.inplan): - if same(game.state.planets[i].w, game.state.kscmdr) and \ - game.state.planets[i].crystals == present: + if game.state.planets[i].w == game.state.kscmdr and \ + game.state.planets[i].crystals == "present": # destroy the planet - game.state.planets[i].pclass = destroyed + game.state.planets[i].pclass = "destroyed" game.state.galaxy[game.state.kscmdr.x][game.state.kscmdr.y].planet = NOPLANET - if not damaged(DRADIO) or game.condition == docked: + if communicating(): announce() prout(_("Lt. Uhura- \"Captain, Starfleet Intelligence reports")) proutn(_(" a planet in Quadrant %s has been destroyed") % game.state.kscmdr) @@ -753,14 +929,14 @@ def supercommander(): for i2 in range(1, game.state.rembase+1): i = basetbl[i2][0]; # bug in original had it not finding nearest ibq = game.state.baseq[i] - if same(ibq, game.quadrant) or same(ibq, game.battle) or \ + if ibq == game.quadrant or ibq == game.battle or \ game.state.galaxy[ibq.x][ibq.y].supernova or \ game.state.galaxy[ibq.x][ibq.y].klingons > MAXKLQUAD-1: continue # if there is a commander, and no other base is appropriate, # we will take the one with the commander for j in range(1, game.state.remcom+1): - if same(ibq, game.state.kcmdr[j]) and ifindit!= 2: + if ibq == game.state.kcmdr[j] and ifindit!= 2: ifindit = 2 iwhichb = i break @@ -806,16 +982,16 @@ def supercommander(): else: for i in range(1, game.state.rembase+1): ibq = game.state.baseq[i] - if same(ibq, game.state.kscmdr) and same(game.state.kscmdr, game.battle): + if ibq == game.state.kscmdr and game.state.kscmdr == game.battle: # attack the base if avoid: return; # no, don't attack base! game.iseenit = False game.isatb = 1 - schedule(FSCDBAS, 1.0 +2.0*Rand()) + schedule(FSCDBAS, 1.0 +2.0*random.random()) if is_scheduled(FCDBAS): postpone(FSCDBAS, scheduled(FCDBAS)-game.state.date) - if damaged(DRADIO) and game.condition != docked: + if not communicating(): return; # no warning game.iseenit = True announce() @@ -834,8 +1010,8 @@ def supercommander(): return # Check for intelligence report if not idebug and \ - (Rand() > 0.2 or \ - (damaged(DRADIO) and game.condition != docked) or \ + (random.random() > 0.2 or \ + (not communicating()) or \ not game.state.galaxy[game.state.kscmdr.x][game.state.kscmdr.y].charted): return announce() @@ -976,7 +1152,7 @@ def doshield(shraise): chew() proutn(_("Energy to transfer to shields- ")) chew() - if aaitem==0: + if aaitem == 0: return if aaitem > game.energy: prout(_("Insufficient ship energy.")) @@ -1027,7 +1203,7 @@ def randdevice(): # # This is one place where OPTION_PLAIN does not restore the # original behavior, which was equiprobable damage across - # all devices. If we wanted that, we'd return NDEVICES*Rand() + # all devices. If we wanted that, we'd return NDEVICES*random.random() # and have done with it. Also, in the original game, DNAVYS # and DCOMPTR were the same device. # @@ -1055,7 +1231,7 @@ def randdevice(): 10, # DDRAY: death ray 1.0% 30, # DDSP: deep-space probes 3.0% ) - idx = Rand() * 1000.0 # weights must sum to 1000 + idx = random.random() * 1000.0 # weights must sum to 1000 sum = 0 for (i, w) in enumerate(weights): sum += w @@ -1084,7 +1260,7 @@ def ram(ibumpd, ienm, w): proutn("***") crmshp() prout(_(" heavily damaged.")) - icas = 10.0+20.0*Rand() + icas = 10.0+20.0*random.random() prout(_("***Sickbay reports %d casualties"), icas) game.casual += icas game.state.crew -= icas @@ -1093,12 +1269,12 @@ def ram(ibumpd, ienm, w): # which was silly. Instead, pick up to half the devices at # random according to our weighting table, # - ncrits = Rand() * (NDEVICES/2) + ncrits = random.randrange(NDEVICES/2) for m in range(ncrits): dev = randdevice() if game.damage[dev] < 0: continue - extradm = (10.0*hardness*Rand()+1.0)*game.damfac + extradm = (10.0*hardness*random.random()+1.0)*game.damfac # Damage for at least time of travel! game.damage[dev] += game.optime + extradm game.shldup = False @@ -1150,13 +1326,13 @@ def torpedo(course, r, incoming, i, n): proutn(_("Torpedo hits ")) crmshp() prout(".") - hit = 700.0 + 100.0*Rand() - \ + hit = 700.0 + 100.0*random.random() - \ 1000.0 * distance(w, incoming) * math.fabs(math.sin(bullseye-angle)) newcnd(); # we're blown out of dock # We may be displaced. if game.landed or game.condition=="docked": return hit # Cheat if on a planet - ang = angle + 2.5*(Rand()-0.5) + ang = angle + 2.5*(random.random()-0.5) temp = math.fabs(math.sin(ang)) if math.fabs(math.cos(ang)) > temp: temp = math.fabs(math.cos(ang)) @@ -1176,7 +1352,7 @@ def torpedo(course, r, incoming, i, n): crmshp() shoved = True elif iquad in (IHC, IHS): # Hit a commander - if Rand() <= 0.05: + if random.random() <= 0.05: crmena(True, iquad, sector, w) prout(_(" uses anti-photon device;")) prout(_(" torpedo neutralized.")) @@ -1184,10 +1360,10 @@ def torpedo(course, r, incoming, i, n): elif iquad in (IHR, IHK): # Hit a regular enemy # find the enemy for ll in range(1, game.nenhere+1): - if same(w, game.ks[ll]): + if w == game.ks[ll]: break kp = math.fabs(game.kpower[ll]) - h1 = 700.0 + 100.0*Rand() - \ + h1 = 700.0 + 100.0*random.random() - \ 1000.0 * distance(w, incoming) * math.fabs(math.sin(bullseye-angle)) h1 = math.fabs(h1) if kp < h1: @@ -1201,7 +1377,7 @@ def torpedo(course, r, incoming, i, n): return None crmena(True, iquad, "sector", w) # If enemy damaged but not destroyed, try to displace - ang = angle + 2.5*(Rand()-0.5) + ang = angle + 2.5*(random.random()-0.5) temp = math.fabs(math.sin(ang)) if math.fabs(math.cos(ang)) > temp: temp = math.fabs(math.cos(ang)) @@ -1228,7 +1404,7 @@ def torpedo(course, r, incoming, i, n): skip(1) prout(_("***STARBASE DESTROYED..")) for ll in range(1, game.state.rembase+1): - if same(game.state.baseq[ll], game.quadrant): + if game.state.baseq[ll] == game.quadrant: game.state.baseq[ll]=game.state.baseq[game.state.rembase] break game.quad[w.x][w.y]=IHDOT @@ -1268,14 +1444,14 @@ def torpedo(course, r, incoming, i, n): prout(_("Celebratory rallies are being held on the Klingon homeworld.")) return None elif iquad == IHSTAR: # Hit a star - if Rand() > 0.10: + if random.random() > 0.10: nova(w) return None crmena(True, IHSTAR, sector, w) prout(_(" unaffected by photon blast.")) return None elif iquad == IHQUEST: # Hit a thingy - if not (game.options & OPTION_THINGY) or Rand()>0.7: + if not (game.options & OPTION_THINGY) or random.random()>0.7: skip(1) prouts(_("AAAAIIIIEEEEEEEEAAAAAAAAUUUUUGGGGGHHHHHHHHHHHH!!!")) skip(1) @@ -1304,7 +1480,7 @@ def torpedo(course, r, incoming, i, n): prout(_("***Torpedo absorbed by Tholian web.")) return None elif iquad == IHT: # Hit a Tholian - h1 = 700.0 + 100.0*Rand() - \ + h1 = 700.0 + 100.0*random.random() - \ 1000.0 * distance(w, incoming) * math.fabs(math.sin(bullseye-angle)) h1 = math.fabs(h1) if h1 >= 600: @@ -1314,7 +1490,7 @@ def torpedo(course, r, incoming, i, n): return None skip(1) crmena(True, IHT, sector, w) - if Rand() > 0.05: + if random.random() > 0.05: prout(_(" survives photon blast.")) return None prout(_(" disappears.")) @@ -1348,10 +1524,10 @@ def fry(hit): # critical-hit resolution ktr=1 # a critical hit occured - if hit < (275.0-25.0*game.skill)*(1.0+0.5*Rand()): + if hit < (275.0-25.0*game.skill)*(1.0+0.5*random.random()): return - ncrit = 1.0 + hit/(500.0+100.0*Rand()) + ncrit = 1.0 + hit/(500.0+100.0*random.random()) proutn(_("***CRITICAL HIT--")) # Select devices and cause damage cdam = [] @@ -1362,7 +1538,7 @@ def fry(hit): if not (game.damage[j]<0.0 or (j==DSHUTTL and game.iscraft != "onship")): break cdam.append(j) - extradm = (hit*game.damfac)/(ncrit*(75.0+25.0*Rand())) + extradm = (hit*game.damfac)/(ncrit*(75.0+25.0*random.random())) game.damage[j] += extradm if loop1 > 0: for loop2 in range(loop1): @@ -1415,7 +1591,7 @@ def attack(torps_ok): # set up partial hits if attack happens during shield status change pfac = 1.0/game.inshld if game.shldchg: - chgfac = 0.25+0.5*Rand() + chgfac = 0.25+0.5*random.random() skip(1) @@ -1427,7 +1603,7 @@ def attack(torps_ok): if game.kpower[loop] < 0: continue; # too weak to attack # compute hit strength and diminish shield power - r = Rand() + r = random.random() # Increase chance of photon torpedos if docked or enemy energy low if game.condition == "docked": r *= 0.25 @@ -1448,7 +1624,7 @@ def attack(torps_ok): if game.condition == "docked": continue; # Don't waste the effort! attempt = True; # Attempt to attack - dustfac = 0.8+0.05*Rand() + dustfac = 0.8+0.05*random.random() hit = game.kpower[loop]*math.pow(dustfac,game.kavgd[loop]) game.kpower[loop] *= 0.75 else: # Enemy uses photon torpedo @@ -1460,7 +1636,7 @@ def attack(torps_ok): crmena(False, iquad, where, jay) attempt = True prout(" ") - r = (Rand()+Rand())*0.5 -0.5 + r = (random.random()+random.random())*0.5 -0.5 r += 0.002*game.kpower[loop]*r hit = torpedo(course, r, jay, 1, 1) if (game.state.remkl + game.state.remcom + game.state.nscrem)==0: @@ -1530,7 +1706,7 @@ def attack(torps_ok): prout(_("%d%%, torpedoes left %d") % (percent, game.torps)) # Check if anyone was hurt if hitmax >= 200 or hittot >= 500: - icas= hittot*Rand()*0.015 + icas= hittot*random.random()*0.015 if icas >= 2: skip(1) prout(_("Mc Coy- \"Sickbay to bridge. We suffered %d casualties") % icas) @@ -1568,7 +1744,7 @@ def deadkl(w, type, mv): if type == IHC: game.comhere = False for i in range(1, game.state.remcom+1): - if same(game.state.kcmdr[i], game.quadrant): + if game.state.kcmdr[i] == game.quadrant: break game.state.kcmdr[i] = game.state.kcmdr[game.state.remcom] game.state.kcmdr[game.state.remcom].x = 0 @@ -1596,10 +1772,10 @@ def deadkl(w, type, mv): return game.recompute() # Remove enemy ship from arrays describing local conditions - if is_scheduled(FCDBAS) and same(game.battle, game.quadrant) and type==IHC: + if is_scheduled(FCDBAS) and game.battle == game.quadrant and type==IHC: unschedule(FCDBAS) for i in range(1, game.nenhere+1): - if same(game.ks[i], w): + if game.ks[i] == w: break game.nenhere -= 1 if i <= game.nenhere: @@ -1712,10 +1888,10 @@ def photon(): for i in range(1, n+1): if game.condition != "docked": game.torps -= 1 - r = (Rand()+Rand())*0.5 -0.5 + r = (random.random()+random.random())*0.5 -0.5 if math.fabs(r) >= 0.47: # misfire! - r = (Rand()+1.2) * r + r = (random.random()+1.2) * r if n>1: prouts(_("***TORPEDO NUMBER %d MISFIRES") % i) else: @@ -1723,9 +1899,9 @@ def photon(): skip(1) if i < n: prout(_(" Remainder of burst aborted.")) - if Rand() <= 0.2: + if random.random() <= 0.2: prout(_("***Photon tubes damaged by misfire.")) - game.damage[DPHOTON] = game.damfac*(1.0+2.0*Rand()) + game.damage[DPHOTON] = game.damfac*(1.0+2.0*random.random()) break if game.shldup or game.condition == "docked": r *= 1.0 + 0.0001*game.shield @@ -1739,15 +1915,15 @@ def overheat(rpow): # check for phasers overheating if rpow > 1500: chekbrn = (rpow-1500.)*0.00038 - if Rand() <= chekbrn: + if random.random() <= chekbrn: prout(_("Weapons officer Sulu- \"Phasers overheated, sir.\"")) - game.damage[DPHASER] = game.damfac*(1.0 + Rand()) * (1.0+chekbrn) + game.damage[DPHASER] = game.damfac*(1.0 + random.random()) * (1.0+chekbrn) def checkshctrl(rpow): # check shield control skip(1) - if Rand() < 0.998: + if random.random() < 0.998: prout(_("Shields lowered.")) return False # Something bad has happened @@ -1765,7 +1941,7 @@ def checkshctrl(rpow): prouts(_("Sulu- \"Captain! Shield malfunction! Phaser fire contained!\"")) skip(2) prout(_("Lt. Uhura- \"Sir, all decks reporting damage.\"")) - icas = hit*Rand()*0.012 + icas = hit*random.random()*0.012 skip(1) fry(0.8*hit) if icas: @@ -1789,7 +1965,7 @@ def hittem(doublehits): wham = hits[k] if wham==0: continue - dustfac = 0.9 + 0.01*Rand() + dustfac = 0.9 + 0.01*random.random() hit = wham*math.pow(dustfac,game.kdist[kk]) kpini = game.kpower[kk] kp = math.fabs(kpini) @@ -1820,8 +1996,8 @@ def hittem(doublehits): return kk -= 1; # don't do the increment else: # decide whether or not to emasculate klingon - if kpow > 0 and Rand() >= 0.9 and \ - kpow <= ((0.4 + 0.4*Rand())*kpini): + if kpow > 0 and random.random() >= 0.9 and \ + kpow <= ((0.4 + 0.4*random.random())*kpini): prout(_("***Mr. Spock- \"Captain, the vessel at Sector %s"), w) prout(_(" has just lost its firepower.\"")) game.kpower[kk] = -kpow @@ -1917,7 +2093,7 @@ def phasers(): chew() if not kz: for i in range(1, game.nenhere+1): - irec += math.fabs(game.kpower[i])/(PHASEFAC*math.pow(0.90,game.kdist[i]))*(1.01+0.05*Rand()) + 1.0 + irec += math.fabs(game.kpower[i])/(PHASEFAC*math.pow(0.90,game.kdist[i]))*(1.01+0.05*random.random()) + 1.0 kz=1 proutn(_("%d units required. ") % irec) chew() @@ -1954,7 +2130,7 @@ def phasers(): if powrem <= 0: continue hits[i] = math.fabs(game.kpower[i])/(PHASEFAC*math.pow(0.90,game.kdist[i])) - over = (0.01 + 0.05*Rand())*hits[i] + over = (0.01 + 0.05*random.random())*hits[i] temp = powrem powrem -= hits[i] + over if powrem <= 0 and temp < hits[i]: @@ -2009,7 +2185,7 @@ def phasers(): if key == IHEOL: chew() if itarg and k > kz: - irec=(abs(game.kpower[k])/(PHASEFAC*math.pow(0.9,game.kdist[k]))) * (1.01+0.05*Rand()) + 1.0 + irec=(abs(game.kpower[k])/(PHASEFAC*math.pow(0.9,game.kdist[k]))) * (1.01+0.05*random.random()) + 1.0 kz = k proutn("(") if not damaged(DCOMPTR): @@ -2065,7 +2241,7 @@ def phasers(): if ifast: skip(1) if no == 0: - if Rand() >= 0.99: + if random.random() >= 0.99: prout(_("Sulu- \"Sir, the high-speed shield control has malfunctioned . . .")) prouts(_(" CLICK CLICK POP . . .")) prout(_(" No response, sir!")) @@ -2099,7 +2275,7 @@ def scheduled(evtype): return game.future[evtype].date def schedule(evtype, offset): - # schedule an event of specified type + # schedule an event of specified type game.future[evtype].date = game.state.date + offset return game.future[evtype] @@ -2146,7 +2322,7 @@ def events(): # Check to see if shuttle is aboard if game.iscraft == "offship": skip(1) - if Rand() > 0.5: + if random.random() > 0.5: prout(_("Galileo, left on the planet surface, is captured")) prout(_("by aliens and made into a flying McDonald's.")) game.damage[DSHUTTL] = -10 @@ -2159,10 +2335,8 @@ def events(): game.quadrant = game.state.kcmdr[i] game.sector = randplace(QUADSIZE) crmshp() - proutn(_(" is pulled to ")) - proutn(cramlc(quadrant, game.quadrant)) - proutn(", ") - prout(cramlc(sector, game.sector)) + prout(_(" is pulled to Quadrant %s, Sector %s") \ + % (game.quadrant, game.sector)) if game.resting: prout(_("(Remainder of rest/repair period cancelled.)")) game.resting = False @@ -2185,22 +2359,19 @@ def events(): # Code merges here for any commander destroying base # Not perfect, but will have to do # Handle case where base is in same quadrant as starship - if same(game.battle, game.quadrant): + if game.battle == game.quadrant: game.state.chart[game.battle.x][game.battle.y].starbase = False game.quad[game.base.x][game.base.y] = IHDOT game.base.x=game.base.y=0 newcnd() skip(1) prout(_("Spock- \"Captain, I believe the starbase has been destroyed.\"")) - elif game.state.rembase != 1 and \ - (not damaged(DRADIO) or game.condition == "docked"): + elif game.state.rembase != 1 and communicating(): # Get word via subspace radio announce() skip(1) prout(_("Lt. Uhura- \"Captain, Starfleet Command reports that")) - proutn(_(" the starbase in ")) - proutn(cramlc(quadrant, game.battle)) - prout(_(" has been destroyed by")) + proutn(_(" the starbase in Quadrant %s has been destroyed by") % game.battle) if game.isatb == 2: prout(_("the Klingon Super-Commander")) else: @@ -2209,7 +2380,7 @@ def events(): # Remove Starbase from galaxy game.state.galaxy[game.battle.x][game.battle.y].starbase = False for i in range(1, game.state.rembase+1): - if same(game.state.baseq[i], game.battle): + if game.state.baseq[i] == game.battle: game.state.baseq[i] = game.state.baseq[game.state.rembase] game.state.rembase -= 1 if game.isatb == 2: @@ -2323,7 +2494,7 @@ def events(): if game.state.remcom == 0: unschedule(FTBEAM) continue - i = Rand()*game.state.remcom+1.0 + i = random.random()*game.state.remcom+1.0 yank = square(game.state.kcmdr[i].x-game.quadrant.x) + square(game.state.kcmdr[i].y-game.quadrant.y) if istract or game.condition == "docked" or yank == 0: # Drats! Have to reschedule @@ -2345,9 +2516,9 @@ def events(): i = 0 for j in range(1, game.state.rembase+1): for k in range(1, game.state.remcom+1): - if same(game.state.baseq[j], game.state.kcmdr[k]) and \ - not same(game.state.baseq[j], game.quadrant) and \ - not same(game.state.baseq[j], game.state.kscmdr): + if game.state.baseq[j] == game.state.kcmdr[k] and \ + not game.state.baseq[j] == game.quadrant and \ + not game.state.baseq[j] == game.state.kscmdr: i = 1 if i == 1: continue @@ -2358,12 +2529,12 @@ def events(): continue # commander + starbase combination found -- launch attack game.battle = game.state.baseq[j] - schedule(FCDBAS, 1.0+3.0*Rand()) + schedule(FCDBAS, 1.0+3.0*random.random()) if game.isatb: # extra time if SC already attacking postpone(FCDBAS, scheduled(FSCDBAS)-game.state.date) game.future[FBATTAK].date = game.future[FCDBAS].date + expran(0.3*game.intime) game.iseenit = False - if damaged(DRADIO) and game.condition != "docked": + if not communicating(): continue # No warning :-( game.iseenit = True announce() @@ -2387,7 +2558,7 @@ def events(): unschedule(FCDBAS) # find the lucky pair for i in range(1, game.state.remcom+1): - if same(game.state.kcmdr[i], game.battle): + if game.state.kcmdr[i] == game.battle: break if i > game.state.remcom or game.state.rembase == 0 or \ not game.state.galaxy[game.battle.x][game.battle.y].starbase: @@ -2412,7 +2583,7 @@ def events(): if not VALID_QUADRANT(i, j) or \ game.state.galaxy[game.probec.x][game.probec.y].supernova: # Left galaxy or ran into supernova - if not damaged(DRADIO) or game.condition == "docked": + if comunicating(): announce() skip(1) proutn(_("Lt. Uhura- \"The deep space probe ")) @@ -2423,15 +2594,13 @@ def events(): prout(".\"") unschedule(FDSPROB) continue - if not damaged(DRADIO) or game.condition == "docked": + if not communicating(): announce() skip(1) - proutn(_("Lt. Uhura- \"The deep space probe is now in ")) - proutn(cramlc(quadrant, game.probec)) - prout(".\"") + proutn(_("Lt. Uhura- \"The deep space probe is now in Quadrant %s.\"") % game.probec) pdest = game.state.galaxy[game.probec.x][game.probec.y] # Update star chart if Radio is working or have access to radio - if not damaged(DRADIO) or game.condition == "docked": + if communicating(): chp = game.state.chart[game.probec.x][game.probec.y] chp.klingons = pdest.klingons chp.starbase = pdest.starbase @@ -2454,8 +2623,8 @@ def events(): # supernova'ed, and which has some Klingons in it w = randplace(GALSIZE) q = game.state.galaxy[w.x][w.y] - if not (same(game.quadrant, w) or q.planet == NOPLANET or \ - game.state.planets[q.planet].inhabited == UNINHABITED or \ + if not (game.quadrant == w or q.planet == NOPLANET or \ + not game.state.planets[q.planet].inhabited or \ q.supernova or q.status!=secure or q.klingons<=0): break else: @@ -2469,7 +2638,7 @@ def events(): q.status = distressed # tell the captain about it if we can - if not damaged(DRADIO) or game.condition == "docked": + if communicating(): prout(_("Uhura- Captain, %s in Quadrant %s reports it is under attack") \ % (q.planet, `w`)) prout(_("by a Klingon invasion fleet.")) @@ -2489,7 +2658,7 @@ def events(): ev2.quadrant = ev.quadrant # report the disaster if we can - if not damaged(DRADIO) or game.condition == "docked": + if communicating(): prout(_("Uhura- We've lost contact with starsystem %s") % \ q.planet) prout(_("in Quadrant %s.\n") % ev.quadrant) @@ -2526,14 +2695,14 @@ def events(): # deliver the child game.state.remkl += 1 q.klingons += 1 - if same(game.quadrant, w): - newkling(++game.klhere) - + if game.quadrant == w: + game.klhere += 1 + newkling(game.klhere) # recompute time left game.recompute() # report the disaster if we can - if not damaged(DRADIO) or game.condition == "docked": - if same(game.quadrant, w): + if communicating(): + if game.quadrant == w: prout(_("Spock- sensors indicate the Klingons have")) prout(_("launched a warship from %s.") % q.planet) else: @@ -2573,7 +2742,7 @@ def wait(): return temp = game.optime = delay if game.nenhere: - rtime = 1.0 + Rand() + rtime = 1.0 + random.random() if rtime < temp: temp = rtime game.optime = temp @@ -2607,7 +2776,7 @@ def nova(nov): course = (0.0, 10.5, 12.0, 1.5, 9.0, 0.0, 3.0, 7.5, 6.0, 4.5) newc = coord(); scratch = coord() - if Rand() < 0.05: + if random.random() < 0.05: # Wow! We've supernova'ed supernova(False, nov) return @@ -2640,7 +2809,7 @@ def nova(nov): if iquad in (IHDOT, IHQUEST, IHBLANK, IHT, IHWEB): break elif iquad == IHSTAR: # Affect another star - if Rand() < 0.05: + if random.random() < 0.05: # This star supernovas scratch = supernova(False) return @@ -2667,7 +2836,7 @@ def nova(nov): elif iquad == IHB: # Destroy base game.state.galaxy[game.quadrant.x][game.quadrant.y].starbase = False for i in range(1, game.state.rembase+1): - if same(game.state.baseq[i], game.quadrant): + if game.state.baseq[i] == game.quadrant: break game.state.baseq[i] = game.state.baseq[game.state.rembase] game.state.rembase -= 1 @@ -2688,7 +2857,7 @@ def nova(nov): game.shield = 0.0 game.shldup = False prout(_("***Shields knocked out.")) - game.damage[DSHIELD] += 0.005*game.damfac*Rand()*diff + game.damage[DSHIELD] += 0.005*game.damfac*random.random()*diff else: game.energy -= 2000.0 if game.energy <= 0: @@ -2702,7 +2871,7 @@ def nova(nov): deadkl(scratch,iquad, scratch) elif iquad in (IHC,IHS,IHR): # Damage/destroy big enemies for ll in range(1, game.nenhere+1): - if same(game.ks[ll], scratch): + if game.ks[ll] == scratch: break game.kpower[ll] -= 800.0 # If firepower is lost, die if game.kpower[ll] <= 0.0: @@ -2727,8 +2896,7 @@ def nova(nov): # can't move into something else skip(1) break - proutn(_(", buffeted to ")) - proutn(cramlc(sector, newc)) + proutn(_(", buffeted to Sector %s") % newc) game.quad[scratch.x][scratch.y] = IHDOT game.quad[newc.x][newc.y] = iquad game.ks[ll] = newc @@ -2774,7 +2942,7 @@ def supernova(induced, w=None): stars += game.state.galaxy[nq.x][nq.y].stars if stars == 0: return # nothing to supernova exists - num = Rand()*stars + 1 + num = random.random()*stars + 1 for nq.x in range(1, GALSIZE+1): for nq.y in range(1, GALSIZE+1): num -= game.state.galaxy[nq.x][nq.y].stars @@ -2787,16 +2955,16 @@ def supernova(induced, w=None): if ja() == True: nq = game.quadrant - if not same(nq, game.quadrant) or game.justin: + if not nq == game.quadrant or game.justin: # it isn't here, or we just entered (treat as enroute) - if not damaged(DRADIO) or game.condition == "docked": + if communicating(): skip(1) prout(_("Message from Starfleet Command Stardate %.2f") % game.state.date) prout(_(" Supernova in Quadrant %s; caution advised.") % nq) else: ns = coord() # we are in the quadrant! - num = Rand()* game.state.galaxy[nq.x][nq.y].stars + 1 + num = random.random()* game.state.galaxy[nq.x][nq.y].stars + 1 for ns.x in range(1, QUADSIZE+1): for ns.y in range(1, QUADSIZE+1): if game.quad[ns.x][ns.y]==IHSTAR: @@ -2820,7 +2988,7 @@ def supernova(induced, w=None): # destroy any Klingons in supernovaed quadrant kldead = game.state.galaxy[nq.x][nq.y].klingons game.state.galaxy[nq.x][nq.y].klingons = 0 - if same(nq, game.state.kscmdr): + if nq == game.state.kscmdr: # did in the Supercommander! game.state.nscrem = game.state.kscmdr.x = game.state.kscmdr.y = game.isatb = 0 game.iscate = False @@ -2829,7 +2997,7 @@ def supernova(induced, w=None): if game.state.remcom: maxloop = game.state.remcom for l in range(1, maxloop+1): - if same(game.state.kcmdr[l], nq): + if game.state.kcmdr[l] == nq: game.state.kcmdr[l] = game.state.kcmdr[game.state.remcom] invalidate(game.state.kcmdr[game.state.remcom]) game.state.remcom -= 1 @@ -2844,14 +3012,14 @@ def supernova(induced, w=None): game.state.nromrem -= nrmdead # Destroy planets for loop in range(game.inplan): - if same(game.state.planets[loop].w, nq): + if game.state.planets[loop].w == nq: game.state.planets[loop].pclass = destroyed npdead += 1 # Destroy any base in supernovaed quadrant if game.state.rembase: maxloop = game.state.rembase for loop in range(1, maxloop+1): - if same(game.state.baseq[loop], nq): + if game.state.baseq[loop] == nq: game.state.baseq[loop] = game.state.baseq[game.state.rembase] invalidate(game.state.baseq[game.state.rembase]) game.state.rembase -= 1 @@ -2862,10 +3030,10 @@ def supernova(induced, w=None): game.state.basekl += game.state.galaxy[nq.x][nq.y].starbase game.state.nplankl += npdead # mark supernova in galaxy and in star chart - if same(game.quadrant, nq) or not damaged(DRADIO) or game.condition == "docked": + if game.quadrant == nq or communicating(): game.state.galaxy[nq.x][nq.y].supernova = True # If supernova destroys last Klingons give special message - if (game.state.remkl + game.state.remcom + game.state.nscrem)==0 and not same(nq, game.quadrant): + if (game.state.remkl + game.state.remcom + game.state.nscrem)==0 and not nq == game.quadrant: skip(2) if not induced: prout(_("Lucky you!")) @@ -2914,7 +3082,7 @@ def selfdestruct(): prouts(" 3"); skip(1) prouts(" 2"); skip(1) prouts(" 1"); skip(1) - if Rand() < 0.15: + if random.random() < 0.15: prouts(_("GOODBYE-CRUEL-WORLD")) skip(1) kaboom() @@ -3146,10 +3314,10 @@ def finish(ifin): if (game.state.remkl + game.state.remcom + game.state.nscrem) != 0: goodies = game.state.remres/game.inresor baddies = (game.state.remkl + 2.0*game.state.remcom)/(game.inkling+2.0*game.incom) - if goodies/baddies >= 1.0+0.5*Rand(): + if goodies/baddies >= 1.0+0.5*random.random(): prout(_("As a result of your actions, a treaty with the Klingon")) prout(_("Empire has been signed. The terms of the treaty are")) - if goodies/baddies >= 3.0+Rand(): + if goodies/baddies >= 3.0+random.random(): prout(_("favorable to the Federation.")) skip(1) prout(_("Congratulations!")) @@ -3256,7 +3424,7 @@ def plaque(): skip(2) while True: proutn(_("File or device name for your plaque: ")) - cgetline(winner, sizeof(winner)) + winner = cgetline() try: fp = open(winner, "w") break @@ -3264,7 +3432,7 @@ def plaque(): prout(_("Invalid name.")) proutn(_("Enter name to go on plaque (up to 30 characters): ")) - cgetline(winner, sizeof(winner)) + winner = cgetline() # The 38 below must be 64 for 132-column paper nskip = 38 - len(winner)/2 @@ -3314,6 +3482,7 @@ def plaque(): rows = linecount = 0 # for paging stdscr = None +replayfp = None fullscreen_window = None srscan_window = None report_window = None @@ -3321,6 +3490,7 @@ status_window = None lrscan_window = None message_window = None prompt_window = None +curwnd = None def outro(): "wrap up, either normally or due to signal" @@ -3331,12 +3501,12 @@ def outro(): #resetterm() #echo() curses.endwin() - stdout.write('\n') + sys.stdout.write('\n') if logfp: logfp.close() def iostart(): - global stdscr + global stdscr, rows #setlocale(LC_ALL, "") #bindtextdomain(PACKAGE, LOCALEDIR) #textdomain(PACKAGE) @@ -3409,16 +3579,16 @@ def pause_game(): setwnd(message_window) else: global linecount - stdout.write('\n') + sys.stdout.write('\n') proutn(prompt) raw_input() for j in range(0, rows): - stdout.write('\n') + sys.stdout.write('\n') linecount = 0 def skip(i): "Skip i lines. Pause game if this would cause a scrolling event." - while dummy in range(i): + for dummy in range(i): if game.options & OPTION_CURSES: (y, x) = curwnd.getyx() (my, mx) = curwnd.getmaxyx() @@ -3430,10 +3600,10 @@ def skip(i): else: global linecount linecount += 1 - if linecount >= rows: + if rows and linecount >= rows: pause_game() else: - stdout.write('\n') + sys.stdout.write('\n') def proutn(line): "Utter a line with no following line feed." @@ -3441,7 +3611,8 @@ def proutn(line): curwnd.addstr(line) curwnd.refresh() else: - stdout.write(line) + sys.stdout.write(line) + sys.stdout.flush() def prout(line): proutn(line) @@ -3458,7 +3629,7 @@ def prouts(line): sys.stdout.flush() curses.delay_output(300) -def cgetline(line, max): +def cgetline(): "Get a line of input." if game.options & OPTION_CURSES: line = curwnd.getstr() + "\n" @@ -3467,12 +3638,14 @@ def cgetline(line, max): if replayfp and not replayfp.closed: line = replayfp.readline() else: - sys.stdin.readline() + line = raw_input() if logfp: logfp.write(line) + return line def setwnd(wnd): - "Change windows -- OK for this to be a no-op in tty mode." + "Change windows -- OK for this to be a no-op in tty mode." + global curwnd if game.options & OPTION_CURSES: curwnd = wnd curses.curs_set(wnd == fullscreen_window or wnd == message_window or wnd == prompt_window) @@ -3805,7 +3978,7 @@ def imove(novapush): if game.damage[m]>0: n += 1 probf=math.pow(1.4,(game.energy+game.shield)/5000.0-1.0)*math.pow(1.3,1.0/(n+1)-1.0) - if (game.options & OPTION_BLKHOLE) and Rand()>probf: + if (game.options & OPTION_BLKHOLE) and random.random()>probf: timwrp() else: finish(FHOLE) @@ -4130,11 +4303,11 @@ def warp(timewarp): if game.warpfac > 6.0: # Decide if engine damage will occur prob = game.dist*(6.0-game.warpfac)*(6.0-game.warpfac)/66.666666666 - if prob > Rand(): + if prob > random.random(): blooey = True - game.dist = Rand()*game.dist + game.dist = random.random()*game.dist # Decide if time warp will occur - if 0.5*game.dist*math.pow(7.0,game.warpfac-10.0) > Rand(): + if 0.5*game.dist*math.pow(7.0,game.warpfac-10.0) > random.random(): twarp = True if idebug and game.warpfac==10 and not twarp: blooey = False @@ -4180,7 +4353,7 @@ def warp(timewarp): if twarp: timwrp() if blooey: - game.damage[DWARPEN] = game.damfac*(3.0*Rand()+1.0) + game.damage[DWARPEN] = game.damfac*(3.0*random.random()+1.0) skip(1) prout(_("Engineering to bridge--")) prout(_(" Scott here. The warp engines are damaged.")) @@ -4243,7 +4416,7 @@ def atover(igrab): prout(_("But with the shields up it's hopeless.")) finish(FPNOVA) prouts(_("His desperate attempt to rescue you . . .")) - if Rand() <= 0.5: + if random.random() <= 0.5: prout(_("fails.")) finish(FPNOVA) return @@ -4251,7 +4424,7 @@ def atover(igrab): if game.imine: game.imine = False proutn(_("The crystals mined were ")) - if Rand() <= 0.25: + if random.random() <= 0.25: prout(_("lost.")) else: prout(_("saved.")) @@ -4288,16 +4461,16 @@ def atover(igrab): prout(_("Warp engines damaged.")) finish(FSNOVAED) return - game.warpfac = 6.0+2.0*Rand() + game.warpfac = 6.0+2.0*random.random() game.wfacsq = game.warpfac * game.warpfac prout(_("Warp factor set to %d") % int(game.warpfac)) power = 0.75*game.energy game.dist = power/(game.warpfac*game.warpfac*game.warpfac*(game.shldup+1)) - distreq = 1.4142+Rand() + distreq = 1.4142+random.random() if distreq < game.dist: game.dist = distreq game.optime = 10.0*game.dist/game.wfacsq - game.direc = 12.0*Rand() # How dumb! + game.direc = 12.0*random.random() # How dumb! game.justin = False game.inorbit = False warp(True) @@ -4318,7 +4491,7 @@ def atover(igrab): def timwrp(): # let's do the time warp again prout(_("***TIME WARP ENTERED.")) - if game.state.snap and Rand() < 0.5: + if game.state.snap and random.random() < 0.5: # Go back in time prout(_("You are traveling backwards in time %d stardates.") % int(game.state.date-game.snapsht.date)) @@ -4359,7 +4532,7 @@ def timwrp(): prout(_("Spock has reconstructed a correct star chart from memory")) else: # Go forward in time - game.optime = -0.5*game.intime*math.log(Rand()) + game.optime = -0.5*game.intime*math.log(random.random()) prout(_("You are traveling forward in time %d stardates.") % int(game.optime)) # cheat to make sure no tractor beams occur during time warp postpone(FTBEAM, game.optime) @@ -4494,8 +4667,8 @@ def mayday(): prout(_(" dematerializes.")) game.sector.x=0 for m in range(1, 5+1): - ix = game.base.x+3.0*Rand()-1 - iy = game.base.y+3.0*Rand()-1 + ix = game.base.x+3.0*random.random()-1 + iy = game.base.y+3.0*random.random()-1 if VALID_SECTOR(ix,iy) and game.quad[ix][iy]==IHDOT: # found one -- finish up game.sector.x=ix @@ -4516,7 +4689,7 @@ def mayday(): game.quad[ix][iy]=(IHMATER0,IHMATER1,IHMATER2)[m-1] textcolor(RED) warble() - if Rand() > probf: + if random.random() > probf: break prout(_("fails.")) curses.delay_output(500) @@ -4609,9 +4782,9 @@ def abandon(): game.nprobes = 0 # No probes prout(_("You are captured by Klingons and released to")) prout(_("the Federation in a prisoner-of-war exchange.")) - nb = Rand()*game.state.rembase+1 + nb = random.random()*game.state.rembase+1 # Set up quadrant and position FQ adjacient to base - if not same(game.quadrant, game.state.baseq[nb]): + if not game.quadrant == game.state.baseq[nb]: game.quadrant = game.state.baseq[nb] game.sector.x = game.sector.y = 5 newqad(True) @@ -4619,8 +4792,8 @@ def abandon(): # position next to base by trial and error game.quad[game.sector.x][game.sector.y] = IHDOT for l in range(1, QUADSIZE+1): - game.sector.x = 3.0*Rand() - 1.0 + game.base.x - game.sector.y = 3.0*Rand() - 1.0 + game.base.y + game.sector.x = 3.0*random.random() - 1.0 + game.base.x + game.sector.y = 3.0*random.random() - 1.0 + game.base.y if VALID_SECTOR(game.sector.x, game.sector.y) and \ game.quad[game.sector.x][game.sector.y] == IHDOT: break @@ -4674,12 +4847,12 @@ def survey(): if game.state.planets[i].pclass == destroyed: continue if (game.state.planets[i].known != "unknown" \ - and game.state.planets[i].inhabited == UNINHABITED) \ + and not game.state.planets[i].inhabited) \ or idebug: iknow = True if idebug and game.state.planets[i].known=="unknown": proutn("(Unknown) ") - proutn(cramlc(quadrant, game.state.planets[i].w)) + proutn(_("Quadrant %s") % game.state.planets[i].w) proutn(_(" class ")) proutn(game.state.planets[i].pclass) proutn(" ") @@ -4706,12 +4879,12 @@ def orbit(): prout(_(" not adjacent to planet.")) skip(1) return - game.optime = 0.02+0.03*Rand() + game.optime = 0.02+0.03*random.random() prout(_("Helmsman Sulu- \"Entering standard orbit, Sir.\"")) newcnd() if consumeTime(): return - game.height = (1400.0+7200.0*Rand()) + game.height = (1400.0+7200.0*random.random()) prout(_("Sulu- \"Entered orbit at altitude %.2f kilometers.\"") % game.height) game.inorbit = True game.ididit = True @@ -4813,7 +4986,7 @@ def beam(): skip(1) prouts("WWHOOOIIIIIRRRRREEEE.E.E. . . . . . .") skip(2) - if Rand() > 0.98: + if random.random() > 0.98: prouts("BOOOIIIOOOIIOOOOIIIOIING . . .") skip(2) prout(_("Scotty- \"Oh my God! I've lost them.\"")) @@ -4854,7 +5027,7 @@ def mine(): skip(1) prout(_("there's no reason to mine more at this time.")) return - game.optime = (0.1+0.2*Rand())*game.state.planets[game.iplnet].pclass + game.optime = (0.1+0.2*random.random())*game.state.planets[game.iplnet].pclass if consumeTime(): return prout(_("Mining operation complete.")) @@ -4889,7 +5062,7 @@ def usecrystals(): skip(1) prouts(_("Scotty- \"Keep your fingers crossed, Sir!\"")) skip(1) - if Rand() <= game.cryprob: + if random.random() <= game.cryprob: prouts(_(" \"Activating now! - - No good! It's***")) skip(2) prouts(_("***RED ALERT! RED A*L********************************")) @@ -4899,7 +5072,7 @@ def usecrystals(): skip(1) kaboom() return - game.energy += 5000.0*(1.0 + 0.9*Rand()) + game.energy += 5000.0*(1.0 + 0.9*random.random()) prouts(_(" \"Activating now! - - ")) prout(_("The instruments")) prout(_(" are going crazy, but I think it's")) @@ -5011,7 +5184,7 @@ def shuttle(): def deathray(): # use the big zapper - r = Rand() + r = random.random() game.ididit = False skip(1) @@ -5057,13 +5230,13 @@ def deathray(): finish(FWON) if (game.options & OPTION_PLAIN) == 0: prout(_("Spock- \"Captain, I believe the `Experimental Death Ray'")) - if Rand() <= 0.05: + if random.random() <= 0.05: prout(_(" is still operational.\"")) else: prout(_(" has been rendered nonfunctional.\"")) game.damage[DDRAY] = 39.95 return - r = Rand() # Pick failure method + r = random.random() # Pick failure method if r <= .30: prouts(_("Sulu- \"Captain! It's working!\"")) skip(1) @@ -5112,3 +5285,1729 @@ def deathray(): prout(_(" in Engineering, we can't move for 'em, Captain.\"")) finish(FTRIBBLE) return + +# Code from reports.c begins here + +def attackreport(curt): + # report status of bases under attack + if not curt: + if is_scheduled(FCDBAS): + prout(_("Starbase in Quadrant %s is currently under Commander attack.") % game.battle) + prout(_("It can hold out until Stardate %d.") % int(scheduled(FCDBAS))) + elif game.isatb == 1: + prout(_("Starbase in Quadrant %s is under Super-commander attack.") % game.state.kscmdr) + prout(_("It can hold out until Stardate %d.") % int(scheduled(FSCDBAS))) + else: + prout(_("No Starbase is currently under attack.")) + else: + if is_scheduled(FCDBAS): + proutn(_("Base in %s attacked by C. Alive until %.1f") % (game.battle, scheduled(FCDBAS))) + if game.isatb: + proutn(_("Base in %s attacked by S. Alive until %.1f") % (game.state.kscmdr, scheduled(FSCDBAS))) + clreol() + +def report(): + # report on general game status + chew() + s1 = "" and game.thawed and _("thawed ") + s2 = {1:"short", 2:"medium", 4:"long"}[game.length] + s3 = (None, _("novice"). _("fair"), + _("good"), _("expert"), _("emeritus"))[game.skill] + prout(_("You %s a %s%s %s game.") % ((_("were playing"), _("are playing"))[game.alldone], s1, s2, s3)) + if game.skill>SKILL_GOOD and game.thawed and not game.alldone: + prout(_("No plaque is allowed.")) + if game.tourn: + prout(_("This is tournament game %d.") % game.tourn) + prout(_("Your secret password is \"%s\"") % game.passwd) + proutn(_("%d of %d Klingons have been killed") % (((game.inkling + game.incom + game.inscom) - (game.state.remkl + game.state.remcom + game.state.nscrem)), + (game.inkling + game.incom + game.inscom))) + if game.incom - game.state.remcom: + prout(_(", including %d Commander%s.") % (game.incom - game.state.remcom, (_("s"), "")[(game.incom - game.state.remcom)==1])) + elif game.inkling - game.state.remkl + (game.inscom - game.state.nscrem) > 0: + prout(_(", but no Commanders.")) + else: + prout(".") + if game.skill > SKILL_FAIR: + prout(_("The Super Commander has %sbeen destroyed.") % ("", _("not "))[game.state.nscrem]) + if game.state.rembase != game.inbase: + proutn(_("There ")) + if game.inbase-game.state.rembase==1: + proutn(_("has been 1 base")) + else: + proutn(_("have been %d bases") % (game.inbase-game.state.rembase)) + prout(_(" destroyed, %d remaining.") % game.state.rembase) + else: + prout(_("There are %d bases.") % game.inbase) + if communicating() or game.iseenit: + # Don't report this if not seen and + # either the radio is dead or not at base! + attackreport(False) + game.iseenit = True + if game.casual: + prout(_("%d casualt%s suffered so far.") % (game.casual, ("y", "ies")[game.casual!=1])) + if game.nhelp: + prout(_("There were %d call%s for help.") % (game.nhelp, ("" , _("s"))[game.nhelp!=1])) + if game.ship == IHE: + proutn(_("You have ")) + if game.nprobes: + proutn("%d" % (game.nprobes)) + else: + proutn(_("no")) + proutn(_(" deep space probe")) + if game.nprobes!=1: + proutn(_("s")) + prout(".") + if communicating() and is_scheduled(FDSPROB): + if game.isarmed: + proutn(_("An armed deep space probe is in ")) + else: + proutn(_("A deep space probe is in ")) + prout("Quadrant %s." % game.probec) + if game.icrystl: + if game.cryprob <= .05: + prout(_("Dilithium crystals aboard ship... not yet used.")) + else: + i=0 + ai = 0.05 + while game.cryprob > ai: + ai *= 2.0 + i += 1 + prout(_("Dilithium crystals have been used %d time%s.") % \ + (i, (_("s"), "")[i==1])) + skip(1) + +def lrscan(): + # long-range sensor scan + if damaged(DLRSENS): + # Now allow base's sensors if docked + if game.condition != "docked": + prout(_("LONG-RANGE SENSORS DAMAGED.")) + return + prout(_("Starbase's long-range scan")) + else: + prout(_("Long-range scan")) + for x in range(game.quadrant.x-1, game.quadrant.x+2): + proutn(" ") + for y in range(game.quadrant.y-1, game.quadrant.y+2): + if not VALID_QUADRANT(x, y): + proutn(" -1") + else: + if not damaged(DRADIO): + game.state.galaxy[x][y].charted = True + game.state.chart[x][y].klingons = game.state.galaxy[x][y].klingons + game.state.chart[x][y].starbase = game.state.galaxy[x][y].starbase + game.state.chart[x][y].stars = game.state.galaxy[x][y].stars + if game.state.galaxy[x][y].supernova: + proutn(" ***") + else: + proutn(" %3d" % (game.state.chart[x][y].klingons*100 + game.state.chart[x][y].starbase * 10 + game.state.chart[x][y].stars)) + prout(" ") + +def damagereport(): + # damage report + jdam = False + chew() + + for i in range(NDEVICES): + if damaged(i): + if not jdam: + prout(_("\tDEVICE\t\t\t-REPAIR TIMES-")) + prout(_("\t\t\tIN FLIGHT\t\tDOCKED")) + jdam = True + prout(" %-26s\t%8.2f\t\t%8.2f" % (device[i], + game.damage[i]+0.05, + game.docfac*game.damage[i]+0.005)) + if not jdam: + prout(_("All devices functional.")) + +def rechart(): + # update the chart in the Enterprise's computer from galaxy data + game.lastchart = game.state.date + for i in range(1, GALSIZE+1): + for j in range(1, GALSIZE+1): + if game.state.galaxy[i][j].charted: + game.state.chart[i][j].klingons = game.state.galaxy[i][j].klingons + game.state.chart[i][j].starbase = game.state.galaxy[i][j].starbase + game.state.chart[i][j].stars = game.state.galaxy[i][j].stars + +def chart(): + # display the star chart + chew() + if not damaged(DRADIO): + rechart() + if game.lastchart < game.state.date and game.condition == "docked": + prout(_("Spock- \"I revised the Star Chart from the starbase's records.\"")) + rechart() + + prout(_(" STAR CHART FOR THE KNOWN GALAXY")) + if game.state.date > game.lastchart: + prout(_("(Last surveillance update %d stardates ago).") % ((int)(game.state.date-game.lastchart))) + prout(" 1 2 3 4 5 6 7 8") + for i in range(1, GALSIZE+1): + proutn("%d |" % (i)) + for j in range(1, GALSIZE+1): + if (game.options & OPTION_SHOWME) and i == game.quadrant.x and j == game.quadrant.y: + proutn("<") + else: + proutn(" ") + if game.state.galaxy[i][j].supernova: + strcpy(buf, "***") + elif not game.state.galaxy[i][j].charted and game.state.galaxy[i][j].starbase: + strcpy(buf, ".1.") + elif game.state.galaxy[i][j].charted: + sprintf(buf, "%3d" % (game.state.chart[i][j].klingons*100 + game.state.chart[i][j].starbase * 10 + game.state.chart[i][j].stars)) + else: + strcpy(buf, "...") + proutn(buf) + if (game.options & OPTION_SHOWME) and i == game.quadrant.x and j == game.quadrant.y: + proutn(">") + else: + proutn(" ") + proutn(" |") + if i0: + dam += 1 + prstat(_("Condition"), _("%s, %i DAMAGES") % (game.condition.upper(), dam)) + elif not req or req == 3: + prstat(_("Position"), "%s , %s" % (game.quadrant, game.sector)) + elif not req or req == 4: + if damaged(DLIFSUP): + if game.condition == "docked": + sprintf(s, _("DAMAGED, Base provides")) + else: + sprintf(s, _("DAMAGED, reserves=%4.2f") % game.lsupres) + else: + sprintf(s, _("ACTIVE")) + prstat(_("Life Support"), s) + elif not req or req == 5: + prstat(_("Warp Factor"), "%.1f" % (game.warpfac)) + elif not req or req == 6: + extra = "" + if game.icrystl and (game.options & OPTION_SHOWME): + extra = _(" (have crystals)") + prstat(_("Energy"), "%.2f%s" % game.energy, extra) + elif not req or req == 7: + prstat(_("Torpedoes"), "%d" % (game.torps)) + elif not req or req == 8: + if damaged(DSHIELD): + strcpy(s, _("DAMAGED,")) + elif game.shldup: + strcpy(s, _("UP,")) + else: + strcpy(s, _("DOWN,")) + data = _(" %d%% %.1f units") \ + % (int((100.0*game.shield)/game.inshld + 0.5), game.shield) + prstat(_("Shields"), s) + elif not req or req == 9: + prstat(_("Klingons Left"), "%d" \ + % (game.state.remkl + game.state.remcom + game.state.nscrem)) + elif not req or req == 10: + if game.options & OPTION_WORLDS: + plnet = game.state.galaxy[game.quadrant.x][game.quadrant.y].planet + if plnet != NOPLANET and game.state.planets[plnet].inhabited: + prstat(_("Major system"), plnet.name) + else: + prout(_("Sector is uninhabited")) + elif not req or req == 11: + attackreport(not req) + +def request(): + requests = ("da","co","po","ls","wa","en","to","sh","kl","sy", "ti") + while scan() == IHEOL: + proutn(_("Information desired? ")) + chew() + if citem in requests: + status(requests.index(citem)) + else: + prout(_("UNRECOGNIZED REQUEST. Legal requests are:")) + prout((" date, condition, position, lsupport, warpfactor,")) + prout((" energy, torpedoes, shields, klingons, system, time.")) + +def srscan(): + # short-range scan + goodScan=True + if damaged(DSRSENS): + # Allow base's sensors if docked + if game.condition != "docked": + prout(_(" S.R. SENSORS DAMAGED!")) + goodScan=False + else: + prout(_(" [Using Base's sensors]")) + else: + prout(_(" Short-range scan")) + if goodScan and not damaged(DRADIO): + game.state.chart[game.quadrant.x][game.quadrant.y].klingons = game.state.galaxy[game.quadrant.x][game.quadrant.y].klingons + game.state.chart[game.quadrant.x][game.quadrant.y].starbase = game.state.galaxy[game.quadrant.x][game.quadrant.y].starbase + game.state.chart[game.quadrant.x][game.quadrant.y].stars = game.state.galaxy[game.quadrant.x][game.quadrant.y].stars + game.state.galaxy[game.quadrant.x][game.quadrant.y].charted = True + prout(" 1 2 3 4 5 6 7 8 9 10") + if game.condition != "docked": + newcnd() + for i in range(1, QUADSIZE+1): + proutn("%2d " % (i)) + for j in range(1, QUADSIZE+1): + sectscan(goodScan, i, j) + skip(1) + + +def eta(): + # use computer to get estimated time of arrival for a warp jump + w1 = coord(); w2 = coord() + prompt = False + if damaged(DCOMPTR): + prout(_("COMPUTER DAMAGED, USE A POCKET CALCULATOR.")) + skip(1) + return + if scan() != IHREAL: + prompt = True + chew() + proutn(_("Destination quadrant and/or sector? ")) + if scan()!=IHREAL: + huh() + return + w1.y = aaitem +0.5 + if scan() != IHREAL: + huh() + return + w1.x = aaitem + 0.5 + if scan() == IHREAL: + w2.y = aaitem + 0.5 + if scan() != IHREAL: + huh() + return + w2.x = aaitem + 0.5 + else: + if game.quadrant.y>w1.x: + w2.x = 1 + else: + w2.x=QUADSIZE + if game.quadrant.x>w1.y: + w2.y = 1 + else: + w2.y=QUADSIZE + + if not VALID_QUADRANT(w1.x, w1.y) or not VALID_SECTOR(w2.x, w2.y): + huh() + return + game.dist = math.sqrt(square(w1.y-game.quadrant.y+0.1*(w2.y-game.sector.y))+ + square(w1.x-game.quadrant.x+0.1*(w2.x-game.sector.x))) + wfl = False + + if prompt: + prout(_("Answer \"no\" if you don't know the value:")) + while True: + chew() + proutn(_("Time or arrival date? ")) + if scan()==IHREAL: + ttime = aaitem + if ttime > game.state.date: + ttime -= game.state.date # Actually a star date + twarp=(math.floor(math.sqrt((10.0*game.dist)/ttime)*10.0)+1.0)/10.0 + if ttime <= 1e-10 or twarp > 10: + prout(_("We'll never make it, sir.")) + chew() + return + if twarp < 1.0: + twarp = 1.0 + break + chew() + proutn(_("Warp factor? ")) + if scan()== IHREAL: + wfl = True + twarp = aaitem + if twarp<1.0 or twarp > 10.0: + huh() + return + break + prout(_("Captain, certainly you can give me one of these.")) + while True: + chew() + ttime = (10.0*game.dist)/square(twarp) + tpower = game.dist*twarp*twarp*twarp*(game.shldup+1) + if tpower >= game.energy: + prout(_("Insufficient energy, sir.")) + if not game.shldup or tpower > game.energy*2.0: + if not wfl: + return + proutn(_("New warp factor to try? ")) + if scan() == IHREAL: + wfl = True + twarp = aaitem + if twarp<1.0 or twarp > 10.0: + huh() + return + continue + else: + chew() + skip(1) + return + prout(_("But if you lower your shields,")) + proutn(_("remaining")) + tpower /= 2 + else: + proutn(_("Remaining")) + prout(_(" energy will be %.2f.") % (game.energy-tpower)) + if wfl: + prout(_("And we will arrive at stardate %.2f.") % (game.state.date+ttime)) + elif twarp==1.0: + prout(_("Any warp speed is adequate.")) + else: + prout(_("Minimum warp needed is %.2f,") % (twarp)) + prout(_("and we will arrive at stardate %.2f.") % (game.state.date+ttime)) + if game.state.remtime < ttime: + prout(_("Unfortunately, the Federation will be destroyed by then.")) + if twarp > 6.0: + prout(_("You'll be taking risks at that speed, Captain")) + if (game.isatb==1 and game.state.kscmdr == w1 and \ + scheduled(FSCDBAS)< ttime+game.state.date) or \ + (scheduled(FCDBAS) 10.0: + huh() + return + else: + chew() + skip(1) + return + + +#ifdef BSD_BUG_FOR_BUG +# A visual scan is made in a particular direction of three sectors +# in the general direction specified. This takes time, and +# Klingons can attack you, so it should be done only when sensors +# are out. Code swiped from BSD-Trek. Not presently used, as we +# automatically display all adjacent sectors on the short-range +# scan even when short-range sensors are out. + +# This struct[] has the delta x, delta y for particular directions + +visdelta = ( + (-1,-1), + (-1, 0), + (-1, 1), + (0, 1), + (1, 1), + (1, 0), + (1, -1), + (0, -1), + (-1,-1), + (-1, 0), + (-1, 1), +) + +def visual(): + v = coord() + if scan() != IHREAL: + chew() + proutn(_("Direction? ")) + if scan()!=IHREAL: + huh() + return + if aaitem < 0.0 or aaitem > 360.0: + return + co = (aaitem + 22) / 45 + v = visdelta[co] + ix = game.sector.x + v.x + iy = game.sector.y + v.y + if ix < 0 or ix >= QUADSIZE or iy < 0 or iy >= QUADSIZE: + co = '?' + else: + co = game.quad[ix][iy] + printf("%d,%d %c " % (ix, iy, co)) + v += 1 + ix = game.sector.x + v.x + iy = game.sector.y + v.y + if ix < 0 or ix >= QUADSIZE or iy < 0 or iy >= QUADSIZE: + co = '?' + else: + co = game.quad[ix][iy] + printf("%c " % (co)) + v += 1 + ix = game.sector.x + v.x + iy = game.sector.y + v.y + if ix < 0 or ix >= QUADSIZE or iy < 0 or iy >= QUADSIZE: + co = '?' + else: + co = game.quad[ix][iy] + prout("%c %d,%d\n" % (co, ix, iy)) + game.optime = 0.5 + game.ididit = True +#endif + +# Code from setup.c begins here + +def filelength(fd): + return os.fstat(fd).st_size + +def prelim(): + # issue a historically correct banner + skip(2) + prout(_("-SUPER- STAR TREK")) + skip(1) +#ifdef __HISTORICAL__ +# prout(_("Latest update-21 Sept 78")) +# skip(1) +#endif __HISTORICAL__ + +def freeze(boss): + # save game + if boss: + citem = "emsave.trk" + else: + key = scan() + if key == IHEOL: + proutn(_("File name: ")) + key = scan() + if key != IHALPHA: + huh() + return + chew() + if '.' not in citem: + citem += ".trk" + try: + fp = open(citem, "wb") + except IOError: + prout(_("Can't freeze game as file %s") % citem) + return + cPickle.dump(game, fp) + fp.close() + +def thaw(): + # retrieve saved game + game.passwd[0] = '\0' + key = scan() + if key == IHEOL: + proutn(_("File name: ")) + key = scan() + if key != IHALPHA: + huh() + return True + chew() + if '.' not in citem: + citem += ".trk" + try: + fp = open(citem, "rb") + except IOError: + prout(_("Can't thaw game in %s") % citem) + return + game = cPickle.load(fp) + fp.close() + return False + +# I used to find planets +# with references in ST:TOS. Eath and the Alpha Centauri +# Colony have been omitted. +# +# Some planets marked Class G and P here will be displayed as class M +# because of the way planets are generated. This is a known bug. +systnames = ( + # Federation Worlds + _("Andoria (Fesoan)"), # several episodes + _("Tellar Prime (Miracht)"), # TOS: "Journey to Babel" + _("Vulcan (T'Khasi)"), # many episodes + _("Medusa"), # TOS: "Is There in Truth No Beauty?" + _("Argelius II (Nelphia)"),# TOS: "Wolf in the Fold" ("IV" in BSD) + _("Ardana"), # TOS: "The Cloud Minders" + _("Catulla (Cendo-Prae)"), # TOS: "The Way to Eden" + _("Gideon"), # TOS: "The Mark of Gideon" + _("Aldebaran III"), # TOS: "The Deadly Years" + _("Alpha Majoris I"), # TOS: "Wolf in the Fold" + _("Altair IV"), # TOS: "Amok Time + _("Ariannus"), # TOS: "Let That Be Your Last Battlefield" + _("Benecia"), # TOS: "The Conscience of the King" + _("Beta Niobe I (Sarpeidon)"), # TOS: "All Our Yesterdays" + _("Alpha Carinae II"), # TOS: "The Ultimate Computer" + _("Capella IV (Kohath)"), # TOS: "Friday's Child" (Class G) + _("Daran V"), # TOS: "For the World is Hollow and I Have Touched the Sky" + _("Deneb II"), # TOS: "Wolf in the Fold" ("IV" in BSD) + _("Eminiar VII"), # TOS: "A Taste of Armageddon" + _("Gamma Canaris IV"), # TOS: "Metamorphosis" + _("Gamma Tranguli VI (Vaalel)"), # TOS: "The Apple" + _("Ingraham B"), # TOS: "Operation: Annihilate" + _("Janus IV"), # TOS: "The Devil in the Dark" + _("Makus III"), # TOS: "The Galileo Seven" + _("Marcos XII"), # TOS: "And the Children Shall Lead", + _("Omega IV"), # TOS: "The Omega Glory" + _("Regulus V"), # TOS: "Amok Time + _("Deneva"), # TOS: "Operation -- Annihilate!" + # Worlds from BSD Trek + _("Rigel II"), # TOS: "Shore Leave" ("III" in BSD) + _("Beta III"), # TOS: "The Return of the Archons" + _("Triacus"), # TOS: "And the Children Shall Lead", + _("Exo III"), # TOS: "What Are Little Girls Made Of?" (Class P) +# # Others +# _("Hansen's Planet"), # TOS: "The Galileo Seven" +# _("Taurus IV"), # TOS: "The Galileo Seven" (class G) +# _("Antos IV (Doraphane)"), # TOS: "Whom Gods Destroy", "Who Mourns for Adonais?" +# _("Izar"), # TOS: "Whom Gods Destroy" +# _("Tiburon"), # TOS: "The Way to Eden" +# _("Merak II"), # TOS: "The Cloud Minders" +# _("Coridan (Desotriana)"), # TOS: "Journey to Babel" +# _("Iotia"), # TOS: "A Piece of the Action" +) + +device = ( + _("S. R. Sensors"), \ + _("L. R. Sensors"), \ + _("Phasers"), \ + _("Photon Tubes"), \ + _("Life Support"), \ + _("Warp Engines"), \ + _("Impulse Engines"), \ + _("Shields"), \ + _("Subspace Radio"), \ + _("Shuttle Craft"), \ + _("Computer"), \ + _("Navigation System"), \ + _("Transporter"), \ + _("Shield Control"), \ + _("Death Ray"), \ + _("D. S. Probe"), \ +) + +def setup(needprompt): + # prepare to play, set up cosmos + w = coord() + + # Decide how many of everything + if choose(needprompt): + return # frozen game + # Prepare the Enterprise + game.alldone = game.gamewon = False + game.ship = IHE + game.state.crew = FULLCREW + game.energy = game.inenrg = 5000.0 + game.shield = game.inshld = 2500.0 + game.shldchg = False + game.shldup = False + game.inlsr = 4.0 + game.lsupres = 4.0 + game.quadrant = randplace(GALSIZE) + game.sector = randplace(QUADSIZE) + game.torps = game.intorps = 10 + game.nprobes = int(3.0*random.random() + 2.0) # Give them 2-4 of these + game.warpfac = 5.0 + game.wfacsq = game.warpfac * game.warpfac + for i in range(0, NDEVICES): + game.damage[i] = 0.0 + # Set up assorted game parameters + game.battle = coord() + game.state.date = game.indate = 100.0*int(31.0*random.random()+20.0) + game.nkinks = game.nhelp = game.casual = game.abandoned = 0 + game.iscate = game.resting = game.imine = game.icrystl = game.icraft = False + game.isatb = game.state.nplankl = 0 + game.state.starkl = game.state.basekl = 0 + game.iscraft = "onship" + game.landed = False + game.alive = True + game.docfac = 0.25 + for i in range(1, GALSIZE+1): + for j in range(1, GALSIZE+1): + quad = game.state.galaxy[i][j] + quad.charted = 0 + quad.planet = NOPLANET + quad.romulans = 0 + quad.klingons = 0 + quad.starbase = False + quad.supernova = False + quad.status = "secure" + # Initialize times for extraneous events + schedule(FSNOVA, expran(0.5 * game.intime)) + schedule(FTBEAM, expran(1.5 * (game.intime / game.state.remcom))) + schedule(FSNAP, 1.0 + random.random()) # Force an early snapshot + schedule(FBATTAK, expran(0.3*game.intime)) + unschedule(FCDBAS) + if game.state.nscrem: + schedule(FSCMOVE, 0.2777) + else: + unschedule(FSCMOVE) + unschedule(FSCDBAS) + unschedule(FDSPROB) + if (game.options & OPTION_WORLDS) and game.skill >= SKILL_GOOD: + schedule(FDISTR, expran(1.0 + game.intime)) + else: + unschedule(FDISTR) + unschedule(FENSLV) + unschedule(FREPRO) + # Starchart is functional but we've never seen it + game.lastchart = FOREVER + # Put stars in the galaxy + game.instar = 0 + for i in range(1, GALSIZE+1): + for j in range(1, GALSIZE+1): + k = random.random()*9.0 + 1.0 + game.instar += k + game.state.galaxy[i][j].stars = k + # Locate star bases in galaxy + for i in range(1, game.inbase+1): + while True: + while True: + w = randplace(GALSIZE) + if not game.state.galaxy[w.x][w.y].starbase: + break + contflag = False + # C version: for (j = i-1; j > 0; j--) + # so it did them in the opposite order. + for j in range(1, i): + # Improved placement algorithm to spread out bases + distq = w.distance(game.state.baseq[j]) + if distq < 6.0*(BASEMAX+1-game.inbase) and random.random() < 0.75: + contflag = True + if idebug: + prout("=== Abandoning base #%d at %s" % (i, w)) + break + elif distq < 6.0 * (BASEMAX+1-game.inbase): + if idebug: + prout("=== Saving base #%d, close to #%d" % (i, j)) + if not contflag: + break + game.state.baseq[i] = w + game.state.galaxy[w.x][w.y].starbase = True + game.state.chart[w.x][w.y].starbase = True + # Position ordinary Klingon Battle Cruisers + krem = game.inkling + klumper = 0.25*game.skill*(9.0-game.length)+1.0 + if klumper > MAXKLQUAD: + klumper = MAXKLQUAD + while True: + r = random.random() + klump = (1.0 - r*r)*klumper + if klump > krem: + klump = krem + krem -= klump + while True: + w = randplace(GALSIZE) + if not game.state.galaxy[w.x][w.y].supernova and \ + game.state.galaxy[w.x][w.y].klingons + klump <= MAXKLQUAD: + break + game.state.galaxy[w.x][w.y].klingons += klump + if krem <= 0: + break + # Position Klingon Commander Ships + for i in range(1, game.incom+1): + while True: + w = randplace(GALSIZE) + if (game.state.galaxy[w.x][w.y].klingons or random.random()>=0.75) and \ + not game.state.galaxy[w.x][w.y].supernova and \ + game.state.galaxy[w.x][w.y].klingons <= MAXKLQUAD-1 and \ + not w in game.state.kcmdr[:i]: + break + game.state.galaxy[w.x][w.y].klingons += 1 + game.state.kcmdr[i] = w + # Locate planets in galaxy + for i in range(game.inplan): + while True: + w = randplace(GALSIZE) + if game.state.galaxy[w.x][w.y].planet == NOPLANET: + break + new = planet() + new.w = w + new.crystals = "absent" + if (game.options & OPTION_WORLDS) and i < NINHAB: + new.pclass = "M" # All inhabited planets are class M + new.crystals = "absent" + new.known = "known" + new.name = systnames[i] + new.inhabited = True + else: + new.pclass = ("M", "N", "O")[random.randint(0, 2)] + if random.random()*1.5: # 1 in 3 chance of crystals + new.crystals = "present" + new.known = "unknown" + new.inhabited = False + game.state.galaxy[w.x][w.y].planet = new + game.state.planets.append(new) + # Locate Romulans + for i in range(1, game.state.nromrem+1): + w = randplace(GALSIZE) + game.state.galaxy[w.x][w.y].romulans += 1 + # Locate the Super Commander + if game.state.nscrem > 0: + while True: + w = randplace(GALSIZE) + if not game.state.galaxy[w.x][w.y].supernova and game.state.galaxy[w.x][w.y].klingons <= MAXKLQUAD: + break + game.state.kscmdr = w + game.state.galaxy[w.x][w.y].klingons += 1 + # Place thing (in tournament game, thingx == -1, don't want one!) + global thing + if thing == None: + thing = randplace(GALSIZE) + skip(2) + game.state.snap = False + if game.skill == SKILL_NOVICE: + prout(_("It is stardate %d. The Federation is being attacked by") % int(game.state.date)) + prout(_("a deadly Klingon invasion force. As captain of the United")) + prout(_("Starship U.S.S. Enterprise, it is your mission to seek out")) + prout(_("and destroy this invasion force of %d battle cruisers.") % ((game.inkling + game.incom + game.inscom))) + prout(_("You have an initial allotment of %d stardates to complete") % int(game.intime)) + prout(_("your mission. As you proceed you may be given more time.")) + skip(1) + prout(_("You will have %d supporting starbases.") % (game.inbase)) + proutn(_("Starbase locations- ")) + else: + prout(_("Stardate %d.") % int(game.state.date)) + skip(1) + prout(_("%d Klingons.") % (game.inkling + game.incom + game.inscom)) + prout(_("An unknown number of Romulans.")) + if game.state.nscrem: + prout(_("And one (GULP) Super-Commander.")) + prout(_("%d stardates.") % int(game.intime)) + proutn(_("%d starbases in ") % game.inbase) + for i in range(1, game.inbase+1): + proutn(`game.state.baseq[i]`) + proutn(" ") + skip(2) + proutn(_("The Enterprise is currently in Quadrant %s") % game.quadrant) + proutn(_(" Sector %s") % game.sector) + skip(2) + prout(_("Good Luck!")) + if game.state.nscrem: + prout(_(" YOU'LL NEED IT.")) + waitfor() + newqad(False) + if game.nenhere - iqhere-game.ithere: + game.shldup = True + if game.neutz: # bad luck to start in a Romulan Neutral Zone + attack(False) + +def choose(needprompt): + # choose your game type + global thing + while True: + game.tourn = 0 + game.thawed = False + game.skill = SKILL_NONE + game.length = 0 + if needprompt: # Can start with command line options + proutn(_("Would you like a regular, tournament, or saved game? ")) + scan() + if len(citem)==0: # Try again + continue + if isit("tournament"): + while scan() == IHEOL: + proutn(_("Type in tournament number-")) + if aaitem == 0: + chew() + continue # We don't want a blank entry + game.tourn = int(aaitem) + random.seed(aaitem) + break + if isit("saved") or isit("frozen"): + if thaw(): + continue + chew() + if game.passwd == None: + continue + if not game.alldone: + game.thawed = True # No plaque if not finished + report() + waitfor() + return True + if isit("regular"): + break + proutn(_("What is \"%s\"?"), citem) + chew() + while game.length==0 or game.skill==SKILL_NONE: + if scan() == IHALPHA: + if isit("short"): + game.length = 1 + elif isit("medium"): + game.length = 2 + elif isit("long"): + game.length = 4 + elif isit("novice"): + game.skill = SKILL_NOVICE + elif isit("fair"): + game.skill = SKILL_FAIR + elif isit("good"): + game.skill = SKILL_GOOD + elif isit("expert"): + game.skill = SKILL_EXPERT + elif isit("emeritus"): + game.skill = SKILL_EMERITUS + else: + proutn(_("What is \"")) + proutn(citem) + prout("\"?") + else: + chew() + if game.length==0: + proutn(_("Would you like a Short, Medium, or Long game? ")) + elif game.skill == SKILL_NONE: + proutn(_("Are you a Novice, Fair, Good, Expert, or Emeritus player? ")) + # Choose game options -- added by ESR for SST2K + if scan() != IHALPHA: + chew() + proutn(_("Choose your game style (or just press enter): ")) + scan() + if isit("plain"): + # Approximates the UT FORTRAN version. + game.options &=~ (OPTION_THOLIAN | OPTION_PLANETS | OPTION_THINGY | OPTION_PROBE | OPTION_RAMMING | OPTION_MVBADDY | OPTION_BLKHOLE | OPTION_BASE | OPTION_WORLDS) + game.options |= OPTION_PLAIN + elif isit("almy"): + # Approximates Tom Almy's version. + game.options &=~ (OPTION_THINGY | OPTION_BLKHOLE | OPTION_BASE | OPTION_WORLDS) + game.options |= OPTION_ALMY + elif isit("fancy"): + pass + elif len(citem): + proutn(_("What is \"%s\"?") % citem) + setpassword() + if game.passwd == "debug": + idebug = True + fputs("=== Debug mode enabled\n", sys.stdout) + + # Use parameters to generate initial values of things + game.damfac = 0.5 * game.skill + game.state.rembase = random.randint(BASEMIN, BASEMAX) + game.inbase = game.state.rembase + game.inplan = 0 + if game.options & OPTION_PLANETS: + game.inplan += (MAXUNINHAB/2) + (MAXUNINHAB/2+1)*random.random() + if game.options & OPTION_WORLDS: + game.inplan += NINHAB + game.state.nromrem = game.inrom = (2.0+random.random())*game.skill + game.state.nscrem = game.inscom = (game.skill > SKILL_FAIR) + game.state.remtime = 7.0 * game.length + game.intime = game.state.remtime + game.state.remkl = game.inkling = 2.0*game.intime*((game.skill+1 - 2*random.random())*game.skill*0.1+.15) + game.incom = game.skill + 0.0625*game.inkling*random.random() + game.state.remcom = min(10, game.incom) + game.incom = game.state.remcom + game.state.remres = (game.inkling+4*game.incom)*game.intime + game.inresor = game.state.remres + if game.inkling > 50: + game.state.rembase += 1 + game.inbase = game.state.rembase + return False + +def dropin(iquad): + # drop a feature on a random dot in the current quadrant + w = coord() + while True: + w = randplace(QUADSIZE) + if game.quad[w.x][w.y] == IHDOT: + break + game.quad[w.x][w.y] = iquad + return w + +def newcnd(): + # update our alert status + game.condition = "green" + if game.energy < 1000.0: + game.condition = "yellow" + if game.state.galaxy[game.quadrant.x][game.quadrant.y].klingons or game.state.galaxy[game.quadrant.x][game.quadrant.y].romulans: + game.condition = "red" + if not game.alive: + game.condition="dead" + +def newkling(i): + # drop new Klingon into current quadrant + pi = dropin(IHK) + game.ks[i] = pi + game.kdist[i] = game.kavgd[i] = distance(game.sector, pi) + game.kpower[i] = random.random()*150.0 +300.0 +25.0*game.skill + return pi + +def newqad(shutup): + # set up a new state of quadrant, for when we enter or re-enter it + w = coord() + game.justin = True + game.klhere = 0 + game.comhere = False + game.ishere = False + game.irhere = 0 + game.iplnet = 0 + game.nenhere = 0 + game.neutz = False + game.inorbit = False + game.landed = False + game.ientesc = False + game.ithere = False + iqhere = False + iqengry = False + game.iseenit = False + if game.iscate: + # Attempt to escape Super-commander, so tbeam back! + game.iscate = False + game.ientesc = True + q = game.state.galaxy[game.quadrant.x][game.quadrant.y] + # cope with supernova + if q.supernova: + return + game.klhere = q.klingons + game.irhere = q.romulans + game.nenhere = game.klhere + game.irhere + + # Position Starship + game.quad[game.sector.x][game.sector.y] = game.ship + + if q.klingons: + w.x = w.y = 0 # quiet a gcc warning + # Position ordinary Klingons + for i in range(1, game.klhere+1): + w = newkling(i) + # If we need a commander, promote a Klingon + for i in range(1, game.state.remcom+1): + if game.state.kcmdr[i] == game.quadrant: + break + + if i <= game.state.remcom: + game.quad[w.x][w.y] = IHC + game.kpower[game.klhere] = 950.0+400.0*random.random()+50.0*game.skill + game.comhere = True + + # If we need a super-commander, promote a Klingon + if same(game.quadrant, game.state.kscmdr): + game.quad[game.ks[1].x][game.ks[1].y] = IHS + game.kpower[1] = 1175.0 + 400.0*random.random() + 125.0*game.skill + game.iscate = (game.state.remkl > 1) + game.ishere = True + # Put in Romulans if needed + for i in range(game.klhere+1, game.nenhere+1): + w = dropin(IHR) + game.ks[i] = w + game.kdist[i] = game.kavgd[i] = distance(game.sector, w) + game.kpower[i] = random.random()*400.0 + 450.0 + 50.0*game.skill + # If quadrant needs a starbase, put it in + if q.starbase: + game.base = dropin(IHB) + + # If quadrant needs a planet, put it in + if q.planet != NOPLANET: + game.iplnet = q.planet + if game.state.planets[q.planet].inhabited == UNINHABITED: + game.plnet = dropin(IHP) + else: + game.plnet = dropin(IHW) + # Check for condition + newcnd() + # And finally the stars + for i in range(1, q.stars+1): + dropin(IHSTAR) + + # Check for RNZ + if game.irhere > 0 and game.klhere == 0: + game.neutz = True + if not damaged(DRADIO): + skip(1) + prout(_("LT. Uhura- \"Captain, an urgent message.")) + prout(_(" I'll put it on audio.\" CLICK")) + skip(1) + prout(_("INTRUDER! YOU HAVE VIOLATED THE ROMULAN NEUTRAL ZONE.")) + prout(_("LEAVE AT ONCE, OR YOU WILL BE DESTROYED!")) + + if shutup==0: + # Put in THING if needed + if same(thing, game.quadrant): + w = dropin(IHQUEST) + thing = randplace(GALSIZE) + game.nenhere += 1 + iqhere = True + game.ks[game.nenhere] = w + game.kdist[game.nenhere] = game.kavgd[game.nenhere] = \ + distance(game.sector, w) + game.kpower[game.nenhere] = random.random()*6000.0 +500.0 +250.0*game.skill + if not damaged(DSRSENS): + skip(1) + prout(_("Mr. Spock- \"Captain, this is most unusual.")) + prout(_(" Please examine your short-range scan.\"")) + + # Decide if quadrant needs a Tholian; lighten up if skill is low + if game.options & OPTION_THOLIAN: + if (game.skill < SKILL_GOOD and random.random() <= 0.02) or \ + (game.skill == SKILL_GOOD and random.random() <= 0.05) or \ + (game.skill > SKILL_GOOD and random.random() <= 0.08): + while True: + game.tholian.x = random.choice((1, QUADSIZE)) + game.tholian.y = random.choice((1, QUADSIZE)) + if game.quad[game.tholian.x][game.tholian.y] == IHDOT: + break + game.quad[game.tholian.x][game.tholian.y] = IHT + game.ithere = True + game.nenhere += 1 + game.ks[game.nenhere] = game.tholian + game.kdist[game.nenhere] = game.kavgd[game.nenhere] = \ + distance(game.sector, game.tholian) + game.kpower[game.nenhere] = random.random()*400.0 +100.0 +25.0*game.skill + # Reserve unoccupied corners + if game.quad[1][1]==IHDOT: + game.quad[1][1] = 'X' + if game.quad[1][QUADSIZE]==IHDOT: + game.quad[1][QUADSIZE] = 'X' + if game.quad[QUADSIZE][1]==IHDOT: + game.quad[QUADSIZE][1] = 'X' + if game.quad[QUADSIZE][QUADSIZE]==IHDOT: + game.quad[QUADSIZE][QUADSIZE] = 'X' + sortklings() + + # Put in a few black holes + for i in range(1, 3+1): + if random.random() > 0.5: + dropin(IHBLANK) + + # Take out X's in corners if Tholian present + if game.ithere: + if game.quad[1][1]=='X': + game.quad[1][1] = IHDOT + if game.quad[1][QUADSIZE]=='X': + game.quad[1][QUADSIZE] = IHDOT + if game.quad[QUADSIZE][1]=='X': + game.quad[QUADSIZE][1] = IHDOT + if game.quad[QUADSIZE][QUADSIZE]=='X': + game.quad[QUADSIZE][QUADSIZE] = IHDOT + +def sortklings(): + # sort Klingons by distance from us + # The author liked bubble sort. So we will use it. :-( + if game.nenhere-iqhere-game.ithere < 2: + return + while True: + sw = False + for j in range(1, game.nenhere): + if game.kdist[j] > game.kdist[j+1]: + sw = True + t = game.kdist[j] + game.kdist[j] = game.kdist[j+1] + game.kdist[j+1] = t + t = game.kavgd[j] + game.kavgd[j] = game.kavgd[j+1] + game.kavgd[j+1] = t + k = game.ks[j].x + game.ks[j].x = game.ks[j+1].x + game.ks[j+1].x = k + k = game.ks[j].y + game.ks[j].y = game.ks[j+1].y + game.ks[j+1].y = k + t = game.kpower[j] + game.kpower[j] = game.kpower[j+1] + game.kpower[j+1] = t + if not sw: + break + +def setpassword(): + # set the self-destruct password + if game.options & OPTION_PLAIN: + while True: + chew() + proutn(_("Please type in a secret password- ")) + scan() + game.passwd = citem + if game.passwd != None: + break + else: + game.passwd = "" + for i in range(3): + game.passwd += chr(97+int(random.random()*25)) + +# Code from sst.c begins here + +commands = { + "SRSCAN": OPTION_TTY, + "STATUS": OPTION_TTY, + "REQUEST": OPTION_TTY, + "LRSCAN": OPTION_TTY, + "PHASERS": 0, + "TORPEDO": 0, + "PHOTONS": 0, + "MOVE": 0, + "SHIELDS": 0, + "DOCK": 0, + "DAMAGES": 0, + "CHART": 0, + "IMPULSE": 0, + "REST": 0, + "WARP": 0, + "SCORE": 0, + "SENSORS": OPTION_PLANETS, + "ORBIT": OPTION_PLANETS, + "TRANSPORT": OPTION_PLANETS, + "MINE": OPTION_PLANETS, + "CRYSTALS": OPTION_PLANETS, + "SHUTTLE": OPTION_PLANETS, + "PLANETS": OPTION_PLANETS, + "REPORT": 0, + "COMPUTER": 0, + "COMMANDS": 0, + "EMEXIT": 0, + "PROBE": OPTION_PROBE, + "SAVE": 0, + "FREEZE": 0, # Synonym for SAVE + "ABANDON": 0, + "DESTRUCT": 0, + "DEATHRAY": 0, + "DEBUG": 0, + "MAYDAY": 0, + "SOS": 0, # Synonym for MAYDAY + "CALL": 0, # Synonym for MAYDAY + "QUIT": 0, + "HELP": 0, + "SEED": 0, + "VISUAL": 0, +} + +def ACCEPT(cmd): return (not commands[cmd] or (commands[cmd] & game.options)) + +def listCommands(): + # generate a list of legal commands + k = 0 + proutn(_("LEGAL COMMANDS ARE:")) + for key in commands: + if ACCEPT(cmd): + if k % 5 == 0: + skip(1) + proutn("%-12s " % key) + k += 1 + skip(1) + +def helpme(): + # browse on-line help + # Give help on commands + key = scan() + while True: + if key == IHEOL: + setwnd(prompt_window) + proutn(_("Help on what command? ")) + key = scan() + setwnd(message_window) + if key == IHEOL: + return + if citem in commands or citem == "ABBREV": + break + skip(1) + listCommands() + key = IHEOL + chew() + skip(1) + cmd = citem.upper() + try: + fp = open(SSTDOC, "r") + except IOError: + try: + fp = open(DOC_NAME, "r") + except IOError: + prout(_("Spock- \"Captain, that information is missing from the")) + proutn(_(" computer. You need to find ")) + proutn(DOC_NAME) + prout(_(" and put it in the")) + proutn(_(" current directory or to ")) + proutn(SSTDOC) + prout(".\"") + # + # This used to continue: "You need to find SST.DOC and put + # it in the current directory." + # + return + while True: + linebuf = fp.readline() + if linebuf == '': + prout(_("Spock- \"Captain, there is no information on that command.\"")) + fp.close() + return + if linebuf[0] == '%' and linebuf[1] == '%' and linebuf[2] == ' ': + linebuf = linebuf[3:].strip() + if cmd == linebuf: + break + skip(1) + prout(_("Spock- \"Captain, I've found the following information:\"")) + skip(1) + while linebuf in fp: + if "******" in linebuf: + break + proutn(linebuf) + fp.close() + +def makemoves(): + # command-interpretation loop + v = 0 + clrscr() + setwnd(message_window) + while True: # command loop + drawmaps(1) + while True: # get a command + hitme = False + game.justin = False + game.optime = 0.0 + i = -1 + chew() + setwnd(prompt_window) + clrscr() + proutn("COMMAND> ") + if scan() == IHEOL: + if game.options & OPTION_CURSES: + makechart() + continue + game.ididit = False + clrscr() + setwnd(message_window) + clrscr() + cmd = citem.upoper + if cmd not in commands: + listCommands() + continue + commandhook(commands[i].name, True) + if cmd == "SRSCAN": # srscan + srscan() + elif cmd == "STATUS": # status + status(0) + elif cmd == "REQUEST": # status request + request() + elif cmd == "LRSCAN": # long range scan + lrscan() + elif cmd == "PHASERS": # phasers + phasers() + if game.ididit: + hitme = True + elif cmd == "TORPEDO": # photon torpedos + photon() + if game.ididit: + hitme = True + elif cmd == "MOVE": # move under warp + warp(False) + elif cmd == "SHIELDS": # shields + doshield(False) + if game.ididit: + hitme = True + game.shldchg = False + elif cmd == "DOCK": # dock at starbase + dock(True) + if game.ididit: + attack(False) + elif cmd == "DAMAGES": # damage reports + damagereport() + elif cmd == "CHART": # chart + makechart() + elif cmd == "IMPULSE": # impulse + impulse() + elif cmd == "REST": # rest + os.wait() + if game.ididit: + hitme = True + elif cmd == "WARP": # warp + setwarp() + elif cmd == "SCORE": # score + score() + elif cmd == "SENSORS": # sensors + sensor() + elif cmd == "ORBIT": # orbit + orbit() + if game.ididit: + hitme = True + elif cmd == "TRANSPORT": # transport "beam" + beam() + elif cmd == "MINE": # mine + mine() + if game.ididit: + hitme = True + elif cmd == "CRYSTALS": # crystals + usecrystals() + if game.ididit: + hitme = True + elif cmd == "SHUTTLE": # shuttle + shuttle() + if game.ididit: + hitme = True + elif cmd == "PLANETS": # Planet list + survey() + elif cmd == "REPORT": # Game Report + report() + elif cmd == "COMPUTER": # use COMPUTER! + eta() + elif cmd == "COMMANDS": + listCommands() + elif cmd == "EMEXIT": # Emergency exit + clrscr() # Hide screen + freeze(True) # forced save + os.exit(1) # And quick exit + elif cmd == "PROBE": + probe() # Launch probe + if game.ididit: + hitme = True + elif cmd == "ABANDON": # Abandon Ship + abandon() + elif cmd == "DESTRUCT": # Self Destruct + selfdestruct() + elif cmd == "SAVE": # Save Game + freeze(False) + clrscr() + if game.skill > SKILL_GOOD: + prout(_("WARNING--Saved games produce no plaques!")) + elif cmd == "DEATHRAY": # Try a desparation measure + deathray() + if game.ididit: + hitme = True + elif cmd == "DEBUGCMD": # What do we want for debug??? + debugme() + elif cmd == "MAYDAY": # Call for help + mayday() + if game.ididit: + hitme = True + elif cmd == "QUIT": + game.alldone = True # quit the game + elif cmd == "HELP": + helpme() # get help + elif cmd == "SEED": # set random-number seed + key = scan() + if key == IHREAL: + seed = int(aaitem) +#ifdef BSD_BUG_FOR_BUG +# elif cmd == "VISUAL": +# visual() # perform visual scan +#endif + commandhook(commands[i].name, False) + while True: + if game.alldone: + break # Game has ended + if game.optime != 0.0: + events() + if game.alldone: + break # Events did us in + if game.state.galaxy[game.quadrant.x][game.quadrant.y].supernova: + atover(False) + continue + if hitme and not game.justin: + attack(True) + if game.alldone: + break + if game.state.galaxy[game.quadrant.x][game.quadrant.y].supernova: + atover(False) + hitme = True + continue + break + if game.alldone: + break + if idebug: + prout("=== Ending") + +def cramen(cmd): + # return an enemy + if cmd == IHR: s = _("Romulan") + elif cmd == IHK: s = _("Klingon") + elif cmd == IHC: s = _("Commander") + elif cmd == IHS: s = _("Super-commander") + elif cmd == IHSTAR: s = _("Star") + elif cmd == IHP: s = _("Planet") + elif cmd == IHB: s = _("Starbase") + elif cmd == IHBLANK: s = _("Black hole") + elif cmd == IHT: s = _("Tholian") + elif cmd == IHWEB: s = _("Tholian web") + elif cmd == IHQUEST: s = _("Stranger") + elif cmd == IHW: s = _("Inhabited World") + else: s = "Unknown??" + proutn(s) + +def cramlc(loctype, w): + # name a location + if loctype == "quadrant": + buf = _("Quadrant ") + elif loctype == "sector": + buf = _("Sector ") + buf += ("%d - %d" % (w.x, w.y)) + return buf + +def crmena(stars, enemy, loctype, w): + # print an enemy and his location + if stars: + proutn("***") + cramen(enemy) + proutn(_(" at ")) + proutn(cramlc(loctype, w)) + +def crmshp(): + # print our ship name + if game.ship == IHE: + s = _("Enterprise") + elif game.ship == IHF: + s = _("Faerie Queene") + else: + s = "Ship???" + proutn(s) + +def stars(): + # print a line of stars + prouts("******************************************************") + skip(1) + +def expran(avrage): + return -avrage*math.log(1e-7 + random.random()) + +def randplace(size): + # choose a random location + w = coord() + w.x = random.randint(1, size) + w.y = random.randint(1, size) + return w + +def chew(): + # Demand input for next scan + global inqueue + inqueue = None + +def chew2(): + # return IHEOL next time + global inqueue + inqueue = [] + +def scan(): + # Get a token from the user + global inqueue, line, citem + aaitem = 0.0 + citem = '' + + # Read a line if nothing here + if inqueue == None: + line = cgetline() + if curwnd==prompt_window: + clrscr() + setwnd(message_window) + clrscr() + # Skip leading white space + line = line.lstrip() + if line: + inqueue = line.split() + else: + inqueue = [] + return IHEOL + elif not inqueue: + return IHEOL + # From here on in it's all looking at the queue + citem = inqueue.pop(0) + if citem == IHEOL: + return IHEOL + try: + aaitem = float(citem) + return IHREAL + except ValueError: + pass + # Treat as alpha + citem = citem.lower() + return IHALPHA + +def ja(): + # yes-or-no confirmation + chew() + while True: + scan() + chew() + if citem == 'y': + return True + if citem == 'n': + return False + proutn(_("Please answer with \"y\" or \"n\": ")) + +def huh(): + # complain about unparseable input + chew() + skip(1) + prout(_("Beg your pardon, Captain?")) + +def isit(s): + # compares s to citem and returns true if it matches to the length of s + return s.startswith(citem) + +def debugme(): + # access to the internals for debugging + proutn("Reset levels? ") + if ja() == True: + if game.energy < game.inenrg: + game.energy = game.inenrg + game.shield = game.inshld + game.torps = game.intorps + game.lsupres = game.inlsr + proutn("Reset damage? ") + if ja() == True: + for i in range(0, NDEVICES): + if game.damage[i] > 0.0: + game.damage[i] = 0.0 + proutn("Toggle debug flag? ") + if ja() == True: + idebug = not idebug + if idebug: + prout("Debug output ON") + else: + prout("Debug output OFF") + proutn("Cause selective damage? ") + if ja() == True: + for i in range(NDEVICES): + proutn("Kill ") + proutn(device[i]) + proutn("? ") + chew() + key = scan() + if key == IHALPHA and isit("y"): + game.damage[i] = 10.0 + proutn("Examine/change events? ") + if ja() == True: + ev = event() + w = coord() + legends = { + FSNOVA: "Supernova ", + FTBEAM: "T Beam ", + FSNAP: "Snapshot ", + FBATTAK: "Base Attack ", + FCDBAS: "Base Destroy ", + FSCMOVE: "SC Move ", + FSCDBAS: "SC Base Destroy ", + FDSPROB: "Probe Move ", + FDISTR: "Distress Call ", + FENSLV: "Enslavement ", + FREPRO: "Klingon Build ", + } + for i in range(1, NEVENTS): + proutn(legends[i]) + if is_scheduled(i): + proutn("%.2f" % (scheduled(i)-game.state.date)) + if i == FENSLV or i == FREPRO: + ev = findevent(i) + proutn(" in %s" % ev.quadrant) + else: + proutn("never") + proutn("? ") + chew() + key = scan() + if key == 'n': + unschedule(i) + chew() + elif key == IHREAL: + ev = schedule(i, aaitem) + if i == FENSLV or i == FREPRO: + chew() + proutn("In quadrant- ") + key = scan() + # IHEOL says to leave coordinates as they are + if key != IHEOL: + if key != IHREAL: + prout("Event %d canceled, no x coordinate." % (i)) + unschedule(i) + continue + w.x = int(aaitem) + key = scan() + if key != IHREAL: + prout("Event %d canceled, no y coordinate." % (i)) + unschedule(i) + continue + w.y = int(aaitem) + ev.quadrant = w + chew() + proutn("Induce supernova here? ") + if ja() == True: + game.state.galaxy[game.quadrant.x][game.quadrant.y].supernova = True + atover(True) + +if __name__ == '__main__': + global line, thing, game + game = citem = aaitem = inqueue = None + line = '' + thing = coord() + game = gamestate() + idebug = 0 + + game.options = OPTION_ALL &~ (OPTION_IOMODES | OPTION_SHOWME | OPTION_PLAIN | OPTION_ALMY) + # Disable curses mode until the game logic is working. + # if os.getenv("TERM"): + # game.options |= OPTION_CURSES | OPTION_SHOWME + # else: + game.options |= OPTION_TTY + + seed = time.time() + (options, arguments) = getopt.getopt(sys.argv[1:], "r:tx") + for (switch, val) in options: + if switch == '-r': + try: + replayfp = open(optarg, "r") + except IOError: + sys.stderr.write("sst: can't open replay file %s\n" % optarg) + os.exit(1) + line = replayfp.readline().strip() + try: + (key, seed) = line.split() + seed = int(seed) + except ValueError: + sys.stderr.write("sst: replay file %s is ill-formed\n"%optarg) + os.exit(1) + game.options |= OPTION_TTY + game.options &=~ OPTION_CURSES + elif switch == '-t': + game.options |= OPTION_TTY + game.options &=~ OPTION_CURSES + elif switch == '-x': + idebug = True + else: + sys.stderr.write("usage: sst [-t] [-x] [startcommand...].\n") + os.exit(0) + # where to save the input in case of bugs + try: + logfp = open("/usr/tmp/sst-input.log", "w") + except IOError: + sys.stderr.write("sst: warning, can't open logfile\n") + if logfp: + #setlinebuf(logfp) + logfp.write("seed %d\n" % (seed)) + random.seed(seed) + + iostart() + if arguments: + inqueue = arguments + else: + inqueue = None + + while True: # Play a game + setwnd(fullscreen_window) + clrscr() + prelim() + setup(needprompt=not line) + if game.alldone: + score() + game.alldone = False + else: + makemoves() + skip(1) + stars() + skip(1) + + if game.tourn and game.alldone: + proutn(_("Do you want your score recorded?")) + if ja() == True: + chew2() + freeze(False) + proutn(_("Do you want to play again? ")) + if not ja(): + break + skip(1) + prout(_("May the Great Bird of the Galaxy roost upon your home planet.")) + raise SysExit, 0 +