Board Logo
« Magical 8-Ball »

Welcome Guest. Please Login or Register.
Nov 22nd, 2009, 8:35pm




Pages: 1  Notify Send Topic Print
 thread  Author  Topic: Magical 8-Ball  (Read 143 times)
Ļe Fŕenastø Apiyano
Administrator
ImageImageImageImageImage

member is offline

Avatar




Homepage PM

Gender: Male
Posts: 103
xx Magical 8-Ball
« Thread started on: Sep 6th, 2007, 9:49pm »

http://www2.webng.com/libertybasic/ball.zip
Here is only the Source code. You need the picture in the zip to run it ::)
Code:
console.off()

set.height ("420")
set.width ("390")

window.graphic {
_GW_NORMAL
("Magical 8-Ball")
}

declare {
vtab ("12")
htab ("37")
}

pen.color : white
pen.back : black

//new\\

blank(window.graphic)

embe.bmp {
("\ball.bmp")
("ball")
}

stick()

declare {
numm rnd( 5 )
}

prompt.user {
("Ask a question.")
void
}

goto.label : @ numm

break()

//1\\

embe ("Yes")

break()

//2\\

embe ("Maybe")

break()

//3\\

embe ("No")

break()

//4\\

embe ("Ask Again")
goto.label : //end\\

break()

//5\\

embe ("Not a chance!")

break()
 
« Last Edit: Sep 6th, 2007, 9:50pm by Ļe Fŕenastø Apiyano » User IP Logged

User Image
Pages: 1  Notify Send Topic Print
« Previous Topic | Next Topic »


New Monthly Ad-Free Plan!

$6.99 Gets 50,000 Ad-Free Pageviews!
| Hookah | Free Shoutboxes |

This Board Hosted For FREE By Conforums ©
Get Your Own Free Message Board!