NTDOC
|
| (KiX Master) |
| 2003-04-14 11:04 AM |
|
Its Coming!
|
Thursday, May 15, 2003
break on cls
color w/n
srnd(@msecs)
$t=5
$greenies = 15
$greenie = marray("$greenies,2")
for $i=0 to $greenies
$greenie[$i][0] = rnd(24)
$greenie[$i][1] = rnd(78)
next
$blankies = 15
$blankie = marray("$blankies,2")
for $i=0 to ubound($blankie)
$blankie[$i][0] = rnd(24)
$blankie[$i][1] = rnd(78)
next
$=setoption("hidecursor","on")
while not kbhit()
for $i = 0 to $greenies
color g/n
$c=rnd(100)+100
if $c=7 or $c=149
$c=150
endif
if $greenie[$i][0]
at($greenie[$i][0],$greenie[$i][1]) chr($c)
endif
if $greenie[$i][0] < 23
$greenie[$i][0] = $greenie[$i][0] + 1
color w+/n
at($greenie[$i][0],$greenie[$i][1]) chr($c)
else
$greenie[$i][0] = rnd(5)
$greenie[$i][1] = rnd(78)
endif
delay($t)
next
for $i = 0 to $blankies
color w/n
at($blankie[$i][0],$blankie[$i][1]) " "
$blankie[$i][0]=$blankie[$i][0]+1
if $blankie[$i][0] = 24
$blankie[$i][0]=0
$blankie[$i][1]=rnd(78)
endif
delay($t)
next
color w/n
delay($t)
loop
get$
cls
exit 1
function delay($n)
$ticks = @ticks +$n
while @ticks < $ticks
loop
endfunction
FUNCTION MArray($ind, OPTIONAL $ptr)
IF Ubound($ind) < 1 $ind =Split($ind,",") ENDIF
REDIM $MArray[$ind[$ptr]]
IF $ptr < Ubound($ind)
$MArray[0] =MArray($ind,$ptr+1)
DIM $L
FOR $L = 1 TO Ubound($MArray) $MArray[$L]=$MArray[0] NEXT
ENDIF
ENDFUNCTION
Code by Shawn Tassie with one minor mod.
[ 14. April 2003, 11:06: Message edited by: NTDOC ]
|
Jochen
|
| (KiX Supporter) |
| 2003-04-14 11:06 AM |
|
Re: Its Coming!
|
Doc ?
I expected at least a kixform if I ever saw that mentioned again
![[Wink]](images/icons/wink.gif){kind=icon}
Whazzup ?
|
NTDOC
|
| (KiX Master) |
| 2003-04-14 11:07 AM |
|
|
Re: Its Coming!
|
LOL...
The new one is coming. I'll let Shawn work on a KF model.
![[Big Grin]](images/icons/grin.gif){kind=icon}
|
Jochen
|
| (KiX Supporter) |
| 2003-04-14 01:47 PM |
|
|
Re: Its Coming!
|
Huh ! Quite quiet after that reply ...
I guess all are hiding behind their keyboards hacking some Matrix code emulators for Kforms
|
NTDOC
|
| (KiX Master) |
| 2003-04-14 08:42 PM |
|
|
|
Re: Its Coming!
|
The Matrix Reloaded Can't wait to go see it.
Here is the link to the original code by Shawn Tassie.
There is no spoon
The Matrix Reloaded - Official Website
60MB QuickTime preview movie for Matrix Reloaded
| Howard Bullock |
| (KiX Supporter) |
| 2003-04-14 09:13 PM |
|
|
Re: Its Coming!
|
DOC,
![[Cool]](images/icons/cool.gif){kind=icon}
![[Eek!]](images/icons/shocked.gif){kind=icon}
Can't wait either
![[Smile]](images/icons/smile.gif){kind=icon}
|
NTDOC
|
| (KiX Master) |
| 2003-04-16 12:08 AM |
|
|
|
Re: Its Coming!
|
Any of you KIX-FORMS Masters come up with a new, revised edition that works with KiXforms?
|
Jochen
|
| (KiX Supporter) |
| 2003-04-16 12:10 AM |
|
|
|
Re: Its Coming!
|
Got (as stated yesterday) problems with the OnResize property without which it would not be nice ...
Other code is in progress
![[Roll Eyes]](images/icons/rolleyes.gif){kind=icon}
[ 15. April 2003, 12:10: Message edited by: jpols ]
|
Lonkero
|
| (KiX Master Guru) |
| 2003-04-15 01:40 PM |
|
Re: Its Coming!
|
eh?
on resize?
damn, hit the gas and make it fullscreen.
|
Shawn
|
| (KiX Supporter) |
| 2003-04-15 02:01 PM |
|
|
Re: Its Coming!
|
This script was written before multi-demensional arrays and the sleep() command was implemented, could use a redeux. By the way, looking forward to sequel as well. To be honest, think The Matrix is my favorite movie of all time.
[ 15. April 2003, 14:04: Message edited by: Shawn ]
|
Lonkero
|
| (KiX Master Guru) |
| 2003-04-15 02:17 PM |
|
Re: Its Coming!
|
sleep() command?
|
Shawn
|
| (KiX Supporter) |
| 2003-04-15 02:22 PM |
|
|
|
Re: Its Coming!
|
Sorry, meant to say "the millisecond sleep function".
| Les |
| (KiX Master) |
| 2003-04-15 02:23 PM |
|
Re: Its Coming!
|
Is this a new Sleep() UDF?
|
Shawn
|
| (KiX Supporter) |
| 2003-04-15 02:26 PM |
|
|
|
Re: Its Coming!
|
Matrix.kix uses the Jochen-built Delay UDF:
function delay($n)
$ticks = @ticks +$n
while @ticks < $ticks
loop
endfunction
|
Jochen
|
| (KiX Supporter) |
| 2003-04-15 02:32 PM |
|
|
|
Re: Its Coming!
|
This one : Delay()
(It was in the times before Ruud was too annoyed by my requests and changed sleep to accept cdbl values
)
| Les |
| (KiX Master) |
| 2003-04-15 02:34 PM |
|
Re: Its Coming!
|
Shawn,
What does it take to get you to byte? We are trying to flame you for the use of parens. Sleep is a command despite what Lonk says. It is not a function and thus does not require parens unless of course you need to force precedence.
quote:I thought only MCA overuses parens.
Operator Precedence
When several operations occur in an expression, KiXtart evaluates and resolves each part of the expression in a predetermined order. This predetermined order is known as operator precedence.
Parentheses can be used to override the order of precedence and force some parts of an expression to be evaluated before other parts. Operations within parentheses are always performed before those outside the parentheses. Within parentheses standard operator precedence is maintained.
|
Jochen
|
| (KiX Supporter) |
| 2003-04-15 02:35 PM |
|
|
|
Re: Its Coming!
|
Hey, actually running a nice Matrix Screen Saver ...
It's here and it's free
{see how I ship around the cliffs of flaming Shawn ?
![[Razz]](images/icons/tongue.gif){kind=icon}
}[ 15. April 2003, 14:37: Message edited by: jpols ]
| Kdyer |
| (KiX Supporter) |
| 2003-04-15 02:46 PM |
|
|
Re: Its Coming!
|
You want one with full source code available?
You can run it as the desktop background (wallpaper) or as a screensaver.
http://zmatrix.sourceforge.net/
http://zmatrix.sourceforge.net/index.html#Preview
Cheers!
Kent
|
Jochen
|
| (KiX Supporter) |
| 2003-04-15 02:49 PM |
|
|
Re: Its Coming!
|
Even better !!!
| MightyR1 |
| (MM club member) |
| 2003-04-15 04:24 PM |
|
|
Re: Its Coming!
|
Better indeed
|
Jochen
|
| (KiX Supporter) |
| 2003-04-15 08:29 PM |
|
|
|
Re: Its Coming!
|
Ok, nearly done, only have to find out why it stops displaying after 4 or 5 seconds
However, don't expect too much please as I can't rebuild what the sourceforge guys did (not only because there is no support for Desktop Mode in Kforms [yet?] )
[ 15. April 2003, 22:10: Message edited by: jpols ]
|
Jochen
|
| (KiX Supporter) |
| 2003-04-16 09:04 AM |
|
|
|
Re: Its Coming!
|
Have some first approach posted here :
There is no spoon ... continued
Thought that KiXforms.org would fit better
|
NTDOC
|
| (KiX Master) |
| 2003-04-16 10:28 AM |
|
|
|
Re: Its Coming!
|
Jochen,
Please see post.
http://www.kixforms.org/forum/viewtopic.php?p=726#726
Code currently not working for me.
| masken |
| (MM club member) |
| 2003-04-16 10:52 AM |
|
|
Re: Its Coming!
|
Just
hahaha
|
Jochen
|
| (KiX Supporter) |
| 2003-04-16 10:55 AM |
|
|
Re: Its Coming!
|
Mats,
you obvioulsy have that private release build ?
For all others who want to see the Girl with the Red Dress :
You can either wait untill Shawn releases the next Beta (some minor glitches to iron out, but hoepfully this weekend) or I may mail it to you ...
Sorry for the irritation
![[Embarrassed]](images/icons/blush.gif){kind=icon}
| Kdyer |
| (KiX Supporter) |
| 2003-05-23 06:11 AM |
|
|
|
Re: Its Coming!
|
BTW...
New version at - http://zmatrix.sourceforge.net/
quote:Kent
May 21, 2003
Version 1.5.1 released. This is a quick follow-up release to 1.5.0 to address column spacing problems that were sometimes occurring with the newer Matrix Code Font bundled with 1.5.0. This release uses the older, more dependable font.