Snow Basic - Update 2
#1
So much has happened over the course of a few days. I'm still currently working on Snow Basic and it's fleshing out perfectly. With that being said, it's taking on the look of something you'd find on a ZX80 computer. Almost lost in time, in a way. It's been a true labor of love, I haven't slept much, just focused on working on this one project. With the hectic nature of work, I'm left to my own devices. I'm finding myself pouring my heart and soul in this project. I know a few of you are pretty excited about it, and honestly it makes me nervous. This task along is going to take years of blood and sweat to make it finally perfect. All this time I've been wasting my life on text adventures, never contributing to the form of computer programming, now I can be apart of that glory. Now, I can help others, and plant the seed of creativity rather then just a time killer. I want you all to know that this will be the death of me. I want to say thank you to all who've been nice with this project. I want to thank Walter especially who's helping me with some minor bugs. Though this is a sneak peek at Snow Basic Version 0.01, it's still a long ways away from being ready for release...or is it...or the code...that tasty fresh code...maybe if you're nice. In closed are some photo's. Keep in touch.

[youtube]4ycr1BizHdc[/youtube]

D. Taylor

P.S 72 97 118 101 32 97 32 119 111 110 100 101 114 102 117 108 32 100 97 121 32 97 110 100 32 107 101 101 112 32 119 97 116 99 104 105 110 103 32 116 104 101 32 115 107 105 101 115 46 





Reply
#2
Code:
let(message,`72 97 118 101 32 97 32 119 111 110 100 101 114 102 117 108 32 100 97 121 32 97 110 100 32 107 101 101 112 32 119 97 116 99 104 105 110 103 32 116 104 101 32 115 107 105 101 115 46'):

let(message,apply(chr,smooth(apply(unquote,<replace([message],` ',`,')>)))):

print_reduce($({[x][y]}),[message])

->

Have a wonderful day and keep watching the skies.

Wassup guys, any update on this? I much desire to mess with it.
Reply
#3
@STxAxTIC,

I have to say that David has amazed me on this one. Though I am helping him on a couple little things, so far he has done all of it by himself. He is still waiting on my additions to it.

However, there are still a lot of bugs in it and it needs some TLC before he will share it with anyone besides me.
Dedicated to empowering computer programming hobbyists, tinkerers, amateurs, and enthusiasts.
profile for Walter Whitman at Stack Overflow, Q&A for professional and enthusiast programmers


Reply
#4
Code:
s = "72 97 118 101 32 97 32 119 111 110 100 101 114 102 117 108 32 100 97 121 32 97 110 100 32 107 101 101 112 32 119 97 116 99 104 105 110 103 32 116 104 101 32 115 107 105 101 115 46"
place = instr( 1,  s, " ")
lastPlace = 0 : m = ""
while place
 m = m +  chr(mid(s, lastPlace +1, place - lastPlace))
 lastPlace = place
 place =  instr(place + 1, s, " ")
wend
m = m + "!"
for i = 1 to 100
 color rgb(255*rnd, 255*rnd, 255*rnd), rgb(255*rnd, 255*rnd, 255*rnd)
 x = rnd*xmax*.75 : y = rnd*ymax*.55+10 : s = int(rnd*80) + 4
 text x, y, s, m
 delay 100
next
pause

sub text(x, y, size, s) ' a sub to make translating to SmallBASIC from SdlBasic easier
 'when this sub is used text size is altered for the rest of the run
 local l
 l.w = window() : l.w.setfont(size, "pt", 0, 0)
 at x, y : ? s
end


Attached Files Thumbnail(s)

B += x
Reply