Dino's Guide to
Ultima VII
The Black Gate

Celebrating 23 Years

Writings

Scroll of Infinity

Details

Written Content

            SCROLL OF INFINITY

  artifact TalismanOfInfinity -
  if Reality is Magic -
  if Locale(Artifact) is Void -
  Convex is
FindInBritannia(ConvexLens)
  Concave is
FindInBritannia(ConcaveLens)

  if DoLightTest(Concave, Convex) -
  TalismanList is
BritanniaSearch(Talisman)


  Counter is 0
  foreach Talisman in TalismanList -
  if KnowType(Talisman) is Truth -
  Counter is Counter and 1
  --
  if KnowType(Talisman) is Love -
  Counter is Counter and 1
  --
  if KnowType(Talisman) is Courage
  Counter is Counter and 1
  --

  if Counter is 3 -
  DoVoidAccess()


InfinityAction is Action(Instance, aPlanarTravel, Britannia, aCallBack, TalismanOfInfinity)
  --
 if Reality is PseudoScience -
  EvilEntity is EntitySearch(All, Powerful, Evil)
  if EvilEntity -
  Check is PushReality(EvilEntity)
  if not Check -
  Test("Thou shalt never see this!")

© by Daniel D'Agostino 2002-2025