gamefic-sdk 1.7.0 → 2.0.0

data/scripts/standard/actions/inventory.plot.rb

@@ -1,9 +0,0 @@
-respond :inventory do |actor|
-  if actor.children.length > 0
-    actor.tell "#{you.pronoun.Subj} #{you.verb.be} carrying #{actor.children.join_and}."
-  else
-    actor.tell "#{you.pronoun.Subj} #{you.contract you.verb.be + ' not'} carrying anything."
-  end
-end
-
-interpret "i", "inventory"

data/scripts/standard/actions/leave.plot.rb

@@ -1,30 +0,0 @@
-respond :leave, Use.parent do |actor, thing|
-  actor.tell "There's no way out of #{the thing}."
-end
-
-respond :leave, Use.parent(Enterable, :enterable?) do |actor, thing|
-  actor.tell "#{you.pronoun.Subj} #{you.verb[thing.leave_verb]} #{the thing}."
-  actor.parent = thing.parent
-end
-
-respond :leave, Use.room do |actor, room|
-  portals = room.children.that_are(Portal)
-  if portals.length == 0
-    actor.tell "#{you.pronoun.Subj} #{you.contract you.verb.do + ' not'} see any obvious exits."
-  elsif portals.length == 1
-    actor.perform :go, portals[0]
-  else
-    actor.tell "I don't know which way you want to go: #{portals.join_or}."
-  end
-end
-
-respond :leave do |actor|
-  actor.perform :leave, actor.parent
-end
-
-interpret "exit", "leave"
-interpret "exit :supporter", "leave :supporter"
-interpret "get on :supporter", "enter :supporter"
-interpret "get off :supporter", "leave :supporter"
-interpret "get out :container", "leave :container"
-interpret "get out of :container", "leave :container"

data/scripts/standard/actions/look.plot.rb

@@ -1,108 +0,0 @@
-respond :look, Use.text do |actor, string|
-  if string == 'around'
-    actor.perform :look, actor.room
-  else
-    actor.tell "You don't see any \"#{string}\" here."
-  end
-end
-
-respond :look, Use.itself do |actor, thing|
-  actor.tell actor.description
-  actor.perform :inventory
-end
-
-respond :look, Use.available do |actor, thing|
-  actor.tell thing.description
-  thing.children.that_are(:attached?).that_are(:itemized?).each { |item|
-    actor.tell "#{An item} is attached to #{the thing}."
-  }
-end
-
-respond :look, Use.available(Supporter) do |actor, thing|
-  actor.proceed
-  if thing.accessible?
-    itemized = thing.children.that_are_not(:attached?).that_are(:itemized?)
-    actor.tell "You see #{itemized.join_and} on #{the thing}." unless itemized.empty?
-  end
-end
-
-respond :look, Use.available(Receptacle) do |actor, thing|
-  actor.proceed
-  if thing.accessible?
-    itemized = thing.children.that_are_not(:attached?).that_are(:itemized?)
-    actor.tell "You see #{itemized.join_and} in #{the thing}." unless itemized.empty?
-  end
-end
-
-respond :look, Use.parent(Supporter, :enterable?) do |actor, supporter|
-  actor.proceed
-  actor.tell "#{you.pronoun.Subj} are currently on #{the supporter}."
-end
-
-respond :look, Use.room do |actor, room|
-  actor.tell "<strong>#{room.name.cap_first}</strong>"
-  actor.tell room.description if room.has_description?
-  actor.execute :_itemize_room
-end
-
-respond :_itemize_room do |actor|
-  room = actor.room
-  next if room.nil?
-  with_locales = []
-  chars = room.children.that_are(Character).that_are(:itemized?) - [actor]
-  charsum = []
-  chars.each { |char|
-    if char.locale_description != ""
-      with_locales.push char
-    else
-      charsum.push char
-    end
-  }
-  if charsum.length > 0
-    actor.tell "#{charsum.join_and.cap_first} #{charsum.length == 1 ? 'is' : 'are'} here."
-  end
-  items = room.children.that_are(:itemized?) - [actor] - room.children.that_are(Character) - room.children.that_are(Portal)
-  itemsum = []
-  items.each { |item|
-    if item.locale_description != ""
-      with_locales.push item
-    else
-      itemsum.push item
-    end
-  }
-  if itemsum.length > 0
-    actor.tell "#{you.pronoun.Subj} #{you.verb.see} #{itemsum.join_and}."
-  end
-  with_locales.each { |entity|
-    actor.tell entity.locale_description
-  }
-  if room.explicit_exits?
-    portals = room.children.that_are(Portal).that_are(:itemized?)
-    if portals.length > 0
-      if portals.length == 1
-        p = portals[0]
-        actor.tell "There is an exit #{p.instruction}."
-      else
-        dirs = []
-        portals.each { |p|
-          dirs.push p.instruction
-        }
-        actor.tell "There are exits #{dirs.join_and(', ')}."
-      end
-    end
-  end
-  if actor.parent.kind_of?(Supporter)
-    actor.tell "#{you.pronoun.Subj} #{you.verb.be} on #{the actor.parent}."
-    actor.parent.children.that_are_not(actor).each { |s|
-      actor.tell "#{A s} is on #{the actor.parent}."
-    }
-  end
-end
-
-interpret "look", "look around"
-interpret "l", "look around"
-
-interpret "look at :thing", "look :thing"
-interpret "l :thing", "look :thing"
-interpret "examine :thing", "look :thing"
-interpret "x :thing", "look :thing"

data/scripts/standard/actions/nil.plot.rb

@@ -1,36 +0,0 @@
-meta nil, Query::Text.new() do |actor, string|
-  words = string.split_words
-  list = verbs
-  if list.include?(words[0])
-    if words.length > 1
-      actor.tell "I recognize '#{words[0]}' as a verb but could not understand the rest of your sentence."
-    else
-      actor.tell "I recognize '#{words[0]}' as a verb but could not understand it in this context."
-    end
-  else
-    found = []
-    list.each { |c|
-      next if c.include?('_')
-      if c.length > words[0].length and c.start_with?(words[0])
-        found.push c
-      end
-    }
-    if found.length == 1
-      words[0] = found[0]
-      actor.perform words.join(' ')
-    elsif found.length > 1 and words[0].length > 2
-      actor.tell "I'm not sure if #{words[0]} means #{found.join_and(', ', ' or ')}."
-    else
-      actor.tell "I don't recognize '#{words[0]}' as a verb."
-    end
-  end
-end
-
-meta nil, Query::Text.new(/^it$/) do |actor, string|
-  words = string.split_words
-  if verbs(to_s: true).include?(words[0])
-    actor.tell "I'm not sure what you mean by \"it.\""
-  else
-    actor.proceed
-  end
-end

data/scripts/standard/actions/place.plot.rb

@@ -1,41 +0,0 @@
-respond :place, Use.children, Use.reachable do |actor, thing, supporter|
-  actor.tell "#{you.pronoun.Subj} #{you.contract(you.verb.can + ' not')} put #{the thing} on #{the supporter}."
-end
-
-respond :place, Use.visible, Use.reachable(Supporter) do |actor, thing, supporter|
-  if thing.parent != actor
-    actor.perform :take, thing
-  end
-  if thing.parent == actor
-    thing.parent = supporter
-    actor.tell "You put #{the thing} on #{the supporter}."
-  end
-end
-
-respond :place, Use.children, Use.reachable(Supporter) do |actor, thing, supporter|
-  if thing.sticky?
-    actor.tell thing.sticky_message || "#{you.pronoun.Subj} #{you.verb.need} to keep #{the thing} for now."
-  else
-    thing.parent = supporter
-    actor.tell "#{you.pronoun.Subj} #{you.verb.put} #{the thing} on #{the supporter}."
-  end
-end
-
-respond :place, Use.visible, Use.text do |actor, thing, supporter|
-  actor.tell "#{you.pronoun.Subj} #{you.contract(you.verb.do + ' not')} see anything called \"#{supporter}\" here."
-end
-
-respond :place, Use.text, Use.visible do |actor, thing, supporter|
-  actor.tell "#{you.pronoun.Subj} #{you.contract(you.verb.do + ' not')} see anything called \"#{thing}\" here."
-end
-
-respond :place, Use.text, Use.text do |actor, thing, supporter|
-  actor.tell "I don't know what you mean by \"#{thing}\" or \"#{supporter}.\""
-end
-
-xlate "put :thing on :supporter", "place :thing :supporter"
-xlate "put :thing down on :supporter", "place :thing :supporter"
-xlate "set :thing on :supporter", "place :thing :supporter"
-xlate "set :thing down on :supporter", "place :thing :supporter"
-xlate "drop :thing on :supporter", "place :thing :supporter"
-xlate "place :thing on :supporter", "place :thing :supporter"

data/scripts/standard/actions/quit.plot.rb

@@ -1,11 +0,0 @@
-confirm_quit = yes_or_no 'Are you sure you want to quit?' do |actor, data|
-  if data.yes?
-    actor.cue default_conclusion
-  else
-    actor.cue default_scene
-  end
-end
-
-meta :quit do |actor|
-  actor.cue confirm_quit
-end

data/scripts/standard/actions/take.plot.rb

@@ -1,31 +0,0 @@
-respond :take, Use.text do |actor, text|
-  actor.tell "#{you.pronoun.Subj} #{you.contract(you.verb.do + ' not')} see any \"#{text}\" here."
-end
-
-respond :take, Use.available do |actor, thing|
-  if thing.parent == actor
-    actor.tell "#{you.contract(you.pronoun.subj + ' are').cap_first} already carrying #{the thing}."
-  elsif thing.portable?
-    if actor.parent != thing.parent
-      actor.tell "#{you.pronoun.Subj} #{you.verb.take} #{the thing} from #{the thing.parent}."
-    else
-      actor.tell "#{you.pronoun.Subj} #{you.verb.take} #{the thing}."
-    end
-    thing.parent = actor
-  else
-    actor.tell "#{you.pronoun.Subj} #{you.contract you.verb.can + ' not'} take #{the thing}."
-  end
-end
-
-respond :take, Use.available(:attached?) do |actor, thing|
-  actor.tell "#{The thing} is attached to #{the thing.parent}."
-end
-
-respond :take, Use.available(Rubble) do |actor, rubble|
-  actor.tell "#{you.pronoun.Subj} #{you.contract(you.verb.do + ' not')} have any use for #{the rubble}."
-end
-
-interpret "get :thing", "take :thing"
-interpret "pick up :thing", "take :thing"
-interpret "pick :thing up", "take :thing"
-interpret "carry :thing", "take :thing"

data/scripts/standard/actions/talk.plot.rb

@@ -1,27 +0,0 @@
-respond :talk do |actor|
-  actor.tell "#{you.pronoun.Subj} #{you.verb.talk} to #{you.pronoun.reflex}."
-end
-
-respond :talk, Use.itself do |actor, yourself|
-  actor.perform :talk
-end
-
-respond :talk, Use.available do |actor, thing|
-  actor.tell "Nothing happens."
-end
-
-respond :talk, Use.available(Character) do |actor, character|
-  if actor == character
-    actor.perform :talk
-  else
-    actor.tell "#{The character} has nothing to say."
-  end
-end
-
-interpret "talk to :character", "talk :character"
-interpret "talk to :character about :subject", "talk :character :subject"
-interpret "ask :character :subject", "talk :character :subject"
-interpret "ask :character about :subject", "talk :character :subject"
-interpret "tell :character :subject", "talk :character :subject"
-interpret "tell :character about :subject", "talk :character :subject"
-interpret "ask :character for :subject", "talk :character :subject"

data/scripts/standard/actions/wait.plot.rb

@@ -1,3 +0,0 @@
-respond :wait do |actor|
-  actor.tell "Time passes."
-end

data/scripts/standard/clothing.plot.rb

@@ -1,4 +0,0 @@
-# @gamefic.script standard/clothing
-
-script 'standard/clothing/entities'
-script 'standard/clothing/actions'

data/scripts/standard/clothing/actions.plot.rb

@@ -1,4 +0,0 @@
-script 'standard/clothing/actions/doff'
-script 'standard/clothing/actions/drop'
-script 'standard/clothing/actions/inventory'
-script 'standard/clothing/actions/wear'

data/scripts/standard/clothing/actions/doff.plot.rb

@@ -1,12 +0,0 @@
-respond :doff, Query::Children.new(Clothing) do |actor, clothing|
-  if !clothing.attached?
-    actor.tell "You're not wearing #{the clothing}."
-  else
-    clothing.attached = false
-    actor.tell "You take off #{the clothing}."
-  end
-end
-
-xlate "remove :clothing", "doff :clothing"
-xlate "take off :clothing", "doff :clothing"
-xlate "take :clothing off", "doff :clothing"

data/scripts/standard/clothing/actions/drop.plot.rb

@@ -1,8 +0,0 @@
-respond :drop, Query::Children.new(Clothing) do |actor, clothing|
-  if clothing.attached?
-    actor.perform :doff, clothing
-  end
-  if !clothing.attached?
-    actor.proceed
-  end
-end

data/scripts/standard/clothing/actions/inventory.plot.rb

@@ -1,14 +0,0 @@
-respond :inventory do |actor|
-  if actor.children.length > 0
-    carried = actor.children.that_are_not(:attached?)
-    worn = actor.children.that_are(:attached?)
-    if carried.length > 0
-      actor.tell "You are carrying #{carried.join_and}."
-    end
-    if worn.length > 0
-      actor.tell "You are wearing #{worn.join_and}."
-    end
-  else
-    actor.tell "You aren't carrying anything."
-  end
-end

data/scripts/standard/clothing/actions/wear.plot.rb

@@ -1,20 +0,0 @@
-respond :wear, Use.available(Clothing) do |actor, clothing|
-  if clothing.parent != actor
-    actor.tell "You don't have #{the clothing}."
-  end
-  if clothing.attached?
-    actor.tell "You're already wearing #{the clothing}."
-  else
-    already = actor.children.that_are(clothing.class).that_are(:attached?)
-    if already.length == 0
-      clothing.attached = true
-      actor.tell "You put on #{the clothing}."
-    else
-      actor.tell "You're already wearing #{an already[0]}."
-    end
-  end
-end
-
-xlate "put on :clothing", "wear :clothing"
-xlate "put :clothing on", "wear :clothing"
-xlate "don :clothing", "wear :clothing"

data/scripts/standard/clothing/entities.plot.rb

@@ -1,7 +0,0 @@
-script 'standard/clothing/entities/clothing'
-script 'standard/clothing/entities/coat'
-script 'standard/clothing/entities/gloves'
-script 'standard/clothing/entities/hat'
-script 'standard/clothing/entities/pants'
-script 'standard/clothing/entities/shirt'
-script 'standard/clothing/entities/shoes'

data/scripts/standard/clothing/entities/clothing.plot.rb

@@ -1,5 +0,0 @@
-class Clothing < Item
-  def worn?
-    self.parent.kind_of?(Character) and self.attached?
-  end
-end

data/scripts/standard/clothing/entities/coat.plot.rb

@@ -1,3 +0,0 @@
-class Coat < Clothing
-
-end

data/scripts/standard/clothing/entities/gloves.plot.rb

@@ -1,3 +0,0 @@
-class Gloves < Clothing
-
-end

data/scripts/standard/clothing/entities/hat.plot.rb

@@ -1,3 +0,0 @@
-class Hat < Clothing
-
-end

data/scripts/standard/clothing/entities/pants.plot.rb

@@ -1,3 +0,0 @@
-class Pants < Clothing
-
-end

data/scripts/standard/clothing/entities/shirt.plot.rb

@@ -1,3 +0,0 @@
-class Shirt < Clothing
-
-end

data/scripts/standard/clothing/entities/shoes.plot.rb

@@ -1,3 +0,0 @@
-class Shoes < Clothing
-
-end

data/scripts/standard/container.plot.rb

@@ -1,28 +0,0 @@
-# @gamefic.script standard/container
-
-script 'standard/openable'
-script 'standard/lockable'
-#script 'standard/container/entities'
-#script 'standard/container/actions'
-
-class Container < Receptacle
-  include Openable
-  include Lockable
-  #include Transparent
-end
-
-respond :insert, Use.available, Use.available(Container) do |actor, thing, container|
-  if container.open?
-    actor.proceed
-  else
-    actor.tell "#{The container} is closed."
-  end
-end
-
-respond :leave, Use.parent(Container, :enterable?, :closed?) do |actor, container|
-  actor.tell "#{The container} is closed."
-end
-
-respond :enter, Use.siblings(Container, :enterable?, :closed?) do |actor, container|
-  actor.tell "#{The container} is closed."
-end