Scrolling
Publié : mar. 12/oct./2004 23:13

Code : Tout sélectionner
Dim story.s(18)
story(0) = "LABYRINTHUS"
story(1) = "Code"
story(2) = "Garzul (c) 2004"
story(3) = "Merci au créateur du language que j'utilise"
story(4) = "Crée par Fred (Alpha SND) Laboureur"
story(5) = "Un grand merci a tout ceux qui m'ont soutenu et aider"
story(6) = "En particulier a la communauter PureBasic"
story(7) = "Dobro , Marcus , Buckshoot , Polux , Comtois , Oliv , Heis Spiter , Le soldat inconnus"
story(8) = "Et a tous ceux que j'ai pus oublier"
story(9) = "Ce jeux représente :"
story(10) = "... code"
story(11) = "... procedure"
story(12) = "20 carte de jeux"
story(13) = "... variable"
story(14) = "Pour en savoir plus sur le : "
story(15) = "Pure Basic"
story(16) = "Allez voir sur le site officiel"
story(17) = "Http://www.purebasic.com"
story(18) = "Merci a vous"
Code : Tout sélectionner
For s = 0 To 18
DrawText(story(s))
Next