Posted By
RoePipi on 2010-05-01 09:53:42
| Fun in 88 characters
Let's have some fun between two projects... Copy and paste this into Yape. I call it 'I-pit' Anyone up for this "challenge"?
SCNCLR:DO:C=RND(0)*40:DOWHILEPEEK(3112+C)=32:POKE3112+C,9:POKE3072+C,32:C=C+40:LOOP:LOOP
|
|
Posted By
retroscener on 2010-05-01 10:09:28
| Re: Fun in 88 characters
lol that works great in Full Throttle
|
|
Posted By
Csabo on 2010-05-01 10:32:15
| Re: Fun in 88 characters
"@-Bounce"
A=1:B=1:DO:X=X+A:A=A*2*((X>37ORX<1)+.5):Y=Y+B:B=B*2*((Y>22ORY<1)+.5):CHAR,X,Y,"@":LOOP
|
|
Posted By
RoePipi on 2010-05-01 12:04:06
| Re: Fun in 88 characters
Hehe, nice bouncer
There is another one: Random numbers appear on the screen. If the last number is greater than (or equal to) 5, you must press a key. If it isn't, don't do anything. The game lasts till you miss one. Name is, hmm, let it be "Hit5" :)
DO:N=RND(0)*10:POKE239,0:?N:FORI=NTO499:NEXT:K=PEEK(239):LOOPWHILEK>0ANDN>=5ORK<1ANDN<5
|
|
Posted By
Gaia on 2010-05-02 07:39:13
| Re: Fun in 88 characters
Another one
GRAPHIC1,1:H=90:DO:CIRCLE,160,99+H/45,R,R,270+H,90+H,,9:H=-H:R=R+4:LOOP
|
|
Posted By
RoePipi on 2010-05-02 10:41:20
| Re: Fun in 88 characters
Wow... That's inspiring!
I got a 'Stirrer': DO:N=RND(0)*1000+3072:O=RND(1)*1000+3072:A=PEEK(N):POKEN,PEEK(O):POKEO,A:LOOP
|
|
Posted By
Csio on 2010-05-04 06:52:51
| Re: Fun in 88 characters
it is very funny topic, send a big wow to the hackers!!!
|
|
Posted By
bill hackinson on 2010-05-04 10:32:56
| Re: Fun in 88 characters
Me too. go-go gadget pseudo-code
|
|
Posted By
MIK on 2010-05-04 18:15:41
| Re: Fun in 88 characters
Is the Matrix really just one line of code?
|
|
|
Posted By
RoePipi on 2010-05-05 11:04:45
| Re: Fun in 88 characters
Yeah. Classic Matrix:
SCNCLR:DO:C=RND(0)*40:DO:POKE3072+C,RND(1)*64:C=C+40:LOOPUNTILC>999:LOOP
They are funny because client stops the 'program' and then LISTs it, but gets nothing :)
|
|
Posted By
Csabo on 2010-05-05 16:34:01
| Re: Fun in 88 characters
BASIC DYCP:
DO:S=S+.2:FORI=1TO7:CHAR,9+I,SIN(S+I/2)*5+15,"":?" DL"MID$("CHRONOS",I,1)"DL ":NEXT:LOOP
This needs a bit of typing unfortunately. SVS just posted about this, YAPE can only copy/paste ASCII, shifted and reverse characters get lost. So, once you pasted it, type over the two double quote parts, press CURSOR DOWN for D and CURSOR LEFT for L, leave the spaces as spaces.
|
|
Posted By
RoePipi on 2010-05-06 01:33:58
| Re: Fun in 88 characters
Neat! :D
Anyway, Unicode doesn't cover our control characters?
|
|
Posted By
Rachy on 2010-05-06 02:30:43
| Re: Fun in 88 characters
How about a compo?
|
|
Posted By
RoePipi on 2010-05-06 10:30:37
| Re: Fun in 88 characters
What, command-line BASIC pseudo-code compo? :D
|
|
Posted By
Rachy on 2010-05-11 03:53:55
| Re: Fun in 88 characters
"Everything, you can do in 100 characters" compo, for example.
|
|
Posted By
RoePipi on 2010-05-11 12:20:55
| Re: Fun in 88 characters
Well, if we can use line numbers, we can also use BASIC keyboard-handling commands, too.
|
|
Posted By
Rachy on 2010-05-12 02:56:57
| Re: Fun in 88 characters
Whatever you are able to, I guess. The rules might go like: typing no more than 100 characters and press Return.
|
|
Posted By
RoePipi on 2010-05-14 15:38:57
| Re: Fun in 88 characters
Like this? Or is it 101?
0GRAPHIC2,1:FORI=2TO5:READA,B,C,D:DRAW,A,BTOC,D:DRAW,A+I,BTOC+I,D:NEXT 1DATA,,,8,5,,7,8,,4,2,4,3,8,5,
Well... it needs a RUN...
|
|
Posted By
Rachy on 2010-05-15 03:51:41
| Re: Fun in 88 characters
Funny, but it would be disqualified, IMO...
|
|
Posted By
Litwr on 2010-05-20 01:47:20
| Re: Fun in 88 characters
It was fun! I've run +4 software since January first time and I was waiting for several minutes for 'I' reached the top of the screen. However it did not happened. Many thanks for RoePipi and others.
|
|
Posted By
RoePipi on 2010-05-20 11:57:20
| Re: Fun in 88 characters
Oh U! I can't grant all your wishes in 88 chars! Go for the Classic Matrix, that does fill up your screen!
|
|
|