PDA

View Full Version : Bingo



06-17-2003, 10:50 PM
I'm a bingo junkie..i started out with 50+ wood tags and ended up with 2..

06-17-2003, 10:51 PM
Then i said screw upgrading I'm getting my money back!

06-17-2003, 10:53 PM
I then ended up losing ALL of my tags

06-17-2003, 10:55 PM
This thing has got to be rigged because theoretically i should end up with the same amount of tags i started with if i keep betting 6 tags everytime. Only once did i get above my original tag count but i only got 6 tags above it even then

06-17-2003, 11:48 PM
It's just like the casino, another way to make us spend our hard earned tags

jjohn
06-18-2003, 01:20 AM
The odds for winning are as stated on the Bingo screen. The code for bingo will soon be available as part of documentation I'm writing for FQ scripting. Here's the snippet that determines bingo win/loses:

<table border="0" align="center" width="95%" cellpadding="0" cellspacing="0"><tr><td>Code Sample </td></tr><tr><td id="CODE">
void PlayBingo&#40;&#41;
{
int wtags = 0;
int cost = 0;
int winner = 0;
int player = 0;

SetLocation&#40;&#34;Bingo Night&#34;&#41;;

play_bingo&#58;
p = &#34;&#34;;
msg = &#34;&#34;;
cost = 0;

msg = &#34;2 cards = 1 in 6 chance of winning&#92;n&#34;;
msg += &#34;4 cards = 1 in 3 chance of winning&#92;n&#34;;
msg += &#34;6 cards = 1 in 2 chance of winning&#92;n&#92;n&#34;;
msg += &#34;Jackpot is `w12 wood tags`y&#34;;

p = AddCustom&#40;p, &#34;st_generic_info&#34;, msg&#41;;
p = AddCustom&#40;p, &#34;st_generic_status&#34;, &#34;&#34;&#41;;

p = AddCustom&#40;p, &#34;st_url_bg&#34;, &#34;flash/background/background_church.swf&#34;&#41;;
p = AddCustom&#40;p, &#34;st_url&#34;, &#34;flash/stuff/lotteryticket.swf&#34;&#41;;
p = AddCustom&#40;p, &#34;st_object&#34;, &#34;i_generic&#34;&#41;;

wtags = GetTags&#40;i_my_id, C_WOOD_TAG&#41;;

msg = &#34;&#92;&#34;Ladies and gentlemen, buy your cards now,&#92;&#34; says Father Smyth.&#92;n&#92;n&#34;;
msg += &#34;Each card costs `w1 wood tag`y.&#92;n&#34;;
msg += &#34;You currently have `w&#036;wtags&#036; wood tags`y.&#92;n&#34;;
p = AddCustom&#40;p, &#34;st_main&#34;, msg&#41;;
p = AddButton&#40;p, 1, &#34;Back&#34;, 1&#41;;

// beware of off by one issues
if &#40;wtags &#62; 1&#41;
{
p = AddButton&#40;p, 2, &#34;Buy 2&#34;, 2&#41;;
}

if &#40;wtags &#62; 3&#41;
{
p = AddButton&#40;p, 3, &#34;Buy 4&#34;, 3&#41;;
}

if &#40;wtags &#62; 5&#41;
{
p = AddButton&#40;p, 4, &#34;Buy 6&#34;, 4&#41;;
}

SendPacketAndWait&#40;p&#41;;

if &#40;i_my_result == 1&#41;
{
// exit. Mail the results of tonight&#39;s winnings
if &#40;total_winnings &#62; 0&#41;
{
msg = &#34;Look who got lucky at Bingo&#33; &#34;;
msg += &#34;Your total winnings are `y&#036;total_winnings&#036; wood tags`w.&#34;;
}

if &#40;total_winnings == 0&#41;
{
msg = &#34;Bingo Night was a wash. &#34;;
msg += &#34;Good think you didn&#39;t quit your day job.&#34;;
}

if &#40;total_winnings &#60; 0&#41;
{
int tmp = 0;
int tmp -= total_winnings;

msg = &#34;The bingo cards just weren&#39;t talking to you tonight. &#34;;
msg += &#34;You lost `y&#036;tmp&#036;`w wood tags.&#34;;
}

MailText&#40;i_my_id, msg&#41;;
return;
}

// figure out the cost to the player
if &#40;i_my_result == 2&#41;
{
player = 2;
}

if &#40;i_my_result == 3&#41;
{
player = 4;
}

if &#40;i_my_result == 4&#41;
{
player = 6;
}

cost -= player;
ModTags&#40;i_my_id, C_WOOD_TAG, cost&#41;;
total_winnings += cost;
winner = RandomRange&#40;1, 12&#41;;

if &#40;winner &#62; player&#41;
{
// select a losing message
winner = RandomRange&#40;1,3&#41;;
if &#40;winner == 1&#41;
{
BingoLoser1&#40;&#41;;
}

if &#40;winner == 2&#41;
{
BingoLoser2&#40;&#41;;
}

if &#40;winner == 3&#41;
{
BingoLoser3&#40;&#41;;
}
goto play_bingo;
}

// Some of the player&#39;s cards won, did others?
winner = RandomRange&#40;1,6&#41;;
if &#40;winner &#62; 2&#41;
{
// Player gets the whole jackpot
BingoTotalWinner&#40;&#41;;
goto play_bingo;
}

if &#40;winner == 2&#41;
{
// 2-way split
Bingo2SplitWinner&#40;&#41;;
goto play_bingo;
}

if &#40;winner == 1&#41;
{
Bingo3SplitWinner&#40;&#41;;
goto play_bingo;
}

goto play_bingo;
}
[/QUOTE]

Looking the code again, it appears that for 6 tags, 7-12 loses, while 1-6 wins. That&#39;s a 1 in 2 chance of winning.
I don&#39;t know how random the number generator is, but I bet
it&#39;s random enough.

I didn&#39;t put Bingo in the game as a source of easy money. I put it in the game to steal your tags.

I like gambling in real life and I know that successful gambling devices are easy to learn and quick to gobble your money. Bingo is a sucker&#39;s game. The odds aren&#39;t in your favor at all, ever. Even if you win, sometimes you have to split your money with other winners. However, you can get lucky sometimes.

Quit while you&#39;re ahead. http://www.rtsoft.com/iB_html/non-cgi/emoticons/laugh.gif

06-18-2003, 01:56 AM
Too late... I&#39;m like one of those guys you see on TV with a gambling addiction... Hell i&#39;ll probably spend tomorrows money on it too.

06-18-2003, 01:57 AM
Although I must add that it is one keen addition to the game. Nice work.

Deathstalker
06-19-2003, 01:52 PM
john please please please..I want bingo night for my server I am tired of the church being useless....please please please...

Fakeblood
06-19-2003, 07:21 PM
whew it was a good bingo night tonight... once i got in there it was hard to restrain myself but i won about 4 gold tags http://www.rtsoft.com/iB_html/non-cgi/emoticons/biggrin.gif
http://dogmeat.topcities.com/orcbw.jpg
sorry i had the undeniable urge to post that.

jjohn
06-19-2003, 08:37 PM
Quote[/b] (Deathstalker @ June 19 2003,9:52)]john please please please..I want bingo night for my server I am tired of the church being useless....please please please...

It&#39;s a-coming. Bingo Night is an example from the FQ documentation that I&#39;m working on. If enough people who like Bingo Night email Seth or register their support for it in this forum, perhaps Seth will include Bingo Night in a future release of FQ. I will post the code in a few days. I want to make sure that most of the obvious grammar and semantic bugs have been worked out before posting.

If anyone wants the code faster than that, email me at fq@taskboy.com and I&#39;ll mail it out to you.


UPDATE: You can get Bingo Night and other mods at http://aliensaliensaliens.com/~jjohn/fq/