Search found 5492 matches

by albert
Feb 27, 2020 2:40
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

One of the guys in my apartment complex , was saying his pecker gets hard when the wind blows.. So i said: Mr. SlightBreez. Then SlightBreez became SlyBreez ( get some on the sly ) Then SlyBreez became CheatinBreez then CheatinBreez became ChetBreez Just playing around with words... Doing Calculus w...
by albert
Feb 27, 2020 2:16
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

@Richard ==================================================== n1 = bin( *ulp ) : ulp+= 1 'ones = 0 'zeros = 0 sum = 0 for b as longint = 1 to len( n1 ) step 1 'if n1[ b - 1 ] = 48 then zeros+=1 'if n1[ b - 1 ] = 49 then ones+=1 if n1[ b - 1 ] = 48 then sum+= 1 shl ( len( n1 ) - b ) next bits1+= bin(...
by albert
Feb 27, 2020 1:30
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

@srvaldez The "Gone" song , i didn't like too much... It was supposed to be a light rock song.. A sombre song... It's a song about a man coming home and finding his wife dead of an overdose. The music was supposed to sound similar to the KISS song "Beth" from the 1970's I came up...
by albert
Feb 26, 2020 19:36
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

For the "Yah-Zip" above..

bits1+= bin( zeros )
bits2+= right( "0000" + bin( ones ) , 4 )

Changed to:

bits1+= bin( zeros )
bits2+= right( "0000" + bin( len( n1 ) ) , 4 )

Then you know how long the input is supposed to be...
by albert
Feb 26, 2020 19:14
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

I got my "Hallelujah" and "Gone" songs demo'd

https://soundcloud.com/user-704620747

Pearl Snap Studios , did a good job on the music for "Hallelujah"
by albert
Feb 26, 2020 2:14
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Yah-Zip

@Richard @Dodicat ( !!~ COMPRESSION SUCCESS ~!! ) It's a formula , i tried before and it didn't compress... I tried it again with different sizes , and it compresses above 30,000 bytes in. ( i was trying it at 10,000 bytes in.. it expanded 116% ) 30,000 bytes in compresses 27% 100,000 bytes in compr...
by albert
Feb 22, 2020 3:26
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

@Dodicat I got something that works.. Now i got to see if it can be reversed... Compresses 100,000 by 98% after 100 loops : Takes 3 seconds.. It's real fast... Declare Function compress_loop( chrs as string ) as string Declare Function decompress_loop( chrs as string ) as string Namespace Zlibrary #...
by albert
Feb 22, 2020 0:32
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Quad Mul

@Dodicat I was working with quadra-decimal... stepping by 3 digits.. 000 to 333 You add 1 to the left digit , and add 1 to the right 2 digits... So you have 1 , 2 , 3 , 4 and ( 01 02 03 04 ) , ( 11 12 13 14 ) , ( 21 22 23 24 ) , ( 31 32 33 34 ) Then you multiply the left digit by the right 2 digits....
by albert
Feb 21, 2020 3:07
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

I came up with a funny name for a Chinese dish...

Pi Don Shu

( peed on shoe ) !!~ HA-HA ~!!

Maybe a flank steak with lemon sauce???
by albert
Feb 19, 2020 3:37
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

I got another song written... Pearl Snap Studios is working on the demo.. It should be done in a few days.. Here's the lyric. =================================================================== I think Adam & Eve were the beginning of the Jewish genealogy.. After Cain killed Able , he went to a ...
by albert
Feb 19, 2020 3:14
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

3 MOD

@Richard @Dodicat How would you alter the below code, to automatically search for the 3 lowest values?? We need md1 , md2 , md3 , to equal the three lowest values , that will equal ( V = 127 or V = ?? ) screen 19 dim as longint v , v1 , v2 , v3 , v4 dim as longint md1 , md2 , md3 , md4 do do 'ADJUST...
by albert
Feb 18, 2020 23:54
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

@Dodicat I went back to mods... Here's another compressor.. 7 bits input.. =============================================== n1 = mid( bits , a , 7 ) v1 = val( "&B" + n1 ) v2 = v1 mod 3 v3 = v1 mod 4 v4 = v1 mod 11 n2 = str( ( ( v2 * 100 ) + ( v3 * 10 ) ) + v4 ) bits1+= chr( val( n2 ) ) ...
by albert
Feb 17, 2020 0:40
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

@Dodicat I got a search function done in the decompression... It's sometimes getting it right.. Got to figure out how to do the search , first to last and backwards , last to first .... Here's the "Test-Bed" Declare Function compress_loop( chrs as string ) as string Declare Function decomp...
by albert
Feb 15, 2020 1:33
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Yah-Zip ( 4 bit )

@Dodicat I got yet another compression formula that works.. It only compresses 100,000 by 65% after 100 lops and takes about a minute...Got to speed it up.... Here's the "Test-Bed" , where i write the decompression.... Can you help with the decompression??? Just let me know , if it can't b...
by albert
Feb 14, 2020 4:08
Forum: General
Topic: Squares
Replies: 7633
Views: 457332

Re: Squares

@badidea 100 ZB (zettabyte) What is a zettabyte ?? When i went to school and learned the number system it only goes up to dectillions ( 10 ) ones tens hundreds thousands 1 )millions 2) billions 3) trillions 4) quadrillions 5) quintillions 6) sextillions 7) septillions 8) octillions 9 ) novtillions 1...

Go to advanced search