egosoft.com

Code: Select all

<?xml version="1.0" encoding="iso-8859-1" ?>
<?xml-stylesheet href="director.xsl" type="text/xsl" ?>
<director name="BBS_Lottery" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:noNamespaceSchemaLocation="director.xsd">
  <documentation>
    <author name="Toastie" />
    <content name="BBS_Lottery" description="BBS-based lottery quest" reference="BM47_XXXT"/>
    <version date="31 Jul 07" number="1.0" status="Beta Test"/>
  </documentation>
  <cues>
    <cue name="BM47LotteryMainCue" comment="This is the top-level cue, the start point for our quest">      
      <condition>
        <check_age value="{player.age}" min="5s" comment="Conditions to determine when, or where, or under what circumstances your BBS Mission should appear"/>
      </condition>
      <action>
        <do_all>
          <add_bbs_quest name="BM47Lottery" priority="50" max="1" comment="Priority= How often your quest should occur on a scale of 0-100. Max= Max amount of the same quest per station"/>
        </do_all>
      </action>
      <cues>
        <cue name="BM47Lottery Mission Offer" instantiate="static" comment="This will offer the Lottery Mission to the player">
          <condition>
            <bbs_quest_evaluated quest="BM47Lottery" comment="Will evaluate your quest by its given priority and max you set above"/>
          </condition>
          <action>
            <offer_bbs_quest quest="BM47Lottery" author="Spamelot Lottery" text="[center]Would you like to buy a lottery ticket and win more than a guaranteed 1,000,000Cr?\n\nThey cost only 1,000Cr!\n\n[select value='yes']You bet![/select]\n[select value='no']Forget it![/select][/center]"/>
          </action>
          <cues>
            <cue name="BM47 Mission Accepted" comment="If the player accepts your quest">
              <condition>
                <check_all>
                  <bbs_quest_selected quest="BM47Lottery" answer="yes"/>
                </check_all>
              </condition>
              <action>
                <do_all comment="Here we can see how the do_choose works">
                  <do_choose comment="if the player has at least 1000Cr (the cost of a ticket), then the quest is accepted and 1000Cr is debited from the player's account.">
                    <do_when value="{player.money}" min="1000">
                      <accept_bbs_quest quest="BM47Lottery"/>
                      <reward_player>
                        <money min="-1000" comment="this is the 1000Cr being taken from the player"/>
                      </reward_player>
                    </do_when>
                    <do_otherwise comment="do_otherwise is the case if the player doesn't have the 1000Cr for a ticket.">
                      <incoming_message author="Spamelot Lottery" text="You cannot buy a ticket with money you don't have.  Goodbye."/>
                      <cancel_cue cue="lucky dip" comment="here we cancel the next (and subsequent) cue so the draw doesn't take place if no funds are available"/>
                    </do_otherwise>
                  </do_choose>
                </do_all>
              </action>
              <cues>
                <cue name="lucky dip">
                  <condition>
                    <cue_is_complete cue="BM47 Mission Accepted" comment="once all of the actions of the previous cue have been completed this cue will be triggered"/>
                  </condition>
                  <action>
                    <do_all comment="here we are setting some values as local variables to provide 6 'random' lottery numbers. In the lucky dip message, we can see how those variables are used to show the player's lotto numbers.">
                      <set_value min="1" max="7" name="this.rand1"/>
                      <set_value min="8" max="17" name="this.rand2"/>
                      <set_value min="18" max="25" name="this.rand3"/>
                      <set_value min="26" max="33" name="this.rand4"/>
                      <set_value min="34" max="42" name="this.rand5"/>
                      <set_value min="43" max="49" name="this.rand6"/>
                      <incoming_message author="Spamelot Lottery" text="Your lucky dip numbers are:\n\n[center]{value@this.rand1} {value@this.rand2} {value@this.rand3} {value@this.rand4} {value@this.rand5} {value@this.rand6}\n\nGood luck![/center]"/>
                    </do_all>
                  </action>
                  <cues>
                    <cue name="draw" comment="a certain amount of time after ticket purchase">
                      <timing>
                        <!--<time min="20s" max="25s" comment="The 20-25s is just a debug time to shorten testing"/>-->
                        <time min="2h" max="4h"/>
                      </timing>
                      <action>
                        <do_all>
                          <set_value name="this.prize" min="1000000" max="1500000" comment="Prize is somewhere between 1 and 1.5 million Cr"/>
                          <!--<set_value name="this.lotterynum" min="1" max="2" comment="the odds of winning are 50/50 for debug purposes"/>-->
                          <set_value name="this.lotterynum" min="1" max="100000" comment="the odds of winning are 1 in 100000"/>
                          <do_choose comment="another do_choose... useful blighters ;)">
                            <do_when value="{value@this.lotterynum}" max="1" comment="if 'this.lotterynum' is evaluated as being 1 (ie 1 in 100000) then the enclosed actions will be performed.">
                              <incoming_message author="Spamelot Lottery" text="Congratulations! You've won the jackpot!\n\n[b]{value@this.prize} Credits[/b] are being transferred to your account." comment="whichever random number between 1 and 1.5 MCr is evaluated above is inserted here as the prize"/>
                              <reward_player>
                                <money min="{value@this.prize}" comment="and we now add the value of 'this_prize' to the player's account"/>
                              </reward_player>
                            </do_when>
                            <do_otherwise comment="if the value of 'this_lotterynum' is evaluated to a number other than 1 then the message below is sent instead.">
                              <incoming_message author="Spamelot Lottery" text="Sorry, you have not won a prize this time. Please try again soon."/>
                            </do_otherwise>
                          </do_choose>
                        </do_all>
                      </action>
                    </cue>
                  </cues>
                </cue>
              </cues>
            </cue>
            <cue name="BM47 Mission Rejected" comment="If the player declines your quest, ie doesn't want to buy a ticket">
              <condition>
                <bbs_quest_selected quest="BM47Lottery" answer="no" />
              </condition>
              <action>
                <do_all>
                  <incoming_message author="Spamelot Lottery Services" text="Too bad! You look the lucky type." />
                  <accept_bbs_quest quest="BM47Lottery"/>
                </do_all>
              </action>
            </cue>
          </cues>
        </cue>
      </cues>
    </cue>
  </cues>
</director>