ArieKnarie
Wild zwijn
Dan maar nog een tranen trekkert.....
kweel factor: 7,5
kweel factor: 7,5
De "Maak Bewust Een K#t Nummer" Contest I
- Thread starter 6 trak
- Start date
- Status
SadBunny
3 cm buiten het universum
SCREEN 13: CLS : COLOR 4: a$ = "Zaadhaasch is bek"
LOCATE 13, 21 - (LEN(a$)) / 2: PRINT a$
LINE (0, 86)-(320, 8, 1, BF: LINE (0, 110)-(320, 112), 1, BF
LINE (0, 0)-(320, 85), 4, BF: LINE (0, 113)-(320, 199), 4, BF
DO
IF d1 = 0 THEN z = z + .03
IF d2 = 0 THEN y = y + .01
IF d3 = 0 THEN x = x + .02
IF d1 = 1 THEN z = z - .01
IF d2 = 1 THEN y = y - .02
IF d3 = 1 THEN x = x - .01
IF z > 63 THEN d1 = 1
IF y > 31 THEN d2 = 1
IF x > 63 THEN d3 = 1
IF z < 0 THEN d1 = 0
IF y < 0 THEN d2 = 0
IF x < 0 THEN d3 = 0
PALETTE 0, z: PALETTE 4, y: PALETTE 1, x
LOOP WHILE INKEY$ = ""
END:
Goh zeg, een heel quickbasic (of zo... toch?) programma als ode aan mij!
Die was me nog niet opgevallen... Nu pas!Maarreh... Screen 13... Bestaat dat nog? Dat was toch die 720x384 resolutie met die hercules monochroom kaarten? Die screen mode heerste over alle andere.
Zal morgen, als ik weer wakker ben, eens kijken of ik hem uitgevoerd krijg! (Al zie ik zo ook wel wat de bedoeling is...
) Zeg, het is toch niet stiekem een virus dat al mijn porno naar mijn oma stuurt? Heheh, hopelijk niet... Dan is 'ie wel effe bezig met uploaden naar die 64 kbit lijn van haar, en trouwens, die hele harde schijf is ook maar 80 gb
SadBunny
3 cm buiten het universum
Afgezien van dat de artiestennaam echt 100% bij deze draad hoort... ROFL! Is het echt een bizar en creepy nummer... Wel heel intrigerend om naar te luisteren. Nice!
SadBunny
3 cm buiten het universum
6 trak
?ILLEGAL QUANTITY ERROR
- Lid sinds
- 20 september 2002
- Berichten
- 33.894
indernaad q-beestsick... wat het doet stelt geen reet voor, min of meer kut is het wel...Goh zeg, een heel quickbasic (of zo... toch?) programma als ode aan mij!
deze is leuker:
DIM a%(64), b%(1024)
r = 9 : t$ = "Bouke, Bouke, Bouke de beer... daar izzi weer, daar izzi weer"
FOR z = 1 TO 40: t$ = t$ + " ": NEXT z
SCREEN 7, 0, 1, 0
DO
FOR c = 1 TO LEN(t$)
FOR x = 0 TO 7
LOCATE 1, 1 : PRINT MID$(t$, c, 1)
GET (x, 0)-(x, 7), a%
GET (1, r *
-(319, r * 8 + 7), b%PUT (0, r *
, b%, PSETPUT (319, r *
, a%, PSETIF INKEY$ <> "" THEN end
LINE (0, 0)-(7, 7), 0, BF
PCOPY 1, 0
NEXT x
NEXT c
LOOP
in DOSBox wel enzeau...
screen 1,7 en 13 zijn 320x200 (met verschillende buttplane diepten, resp. 2,4 en
screen 2 en 8 zijn 'medium res' (640x200 dus)
screen 9 en 10 zijn 640 x 350 ofzo...
en screen 11 en 12 zijn 640x480 (met de ene 1 buttplane en de andere 4 gleuf ik)
Laatst gewijzigd:
6 trak
?ILLEGAL QUANTITY ERROR
- Lid sinds
- 20 september 2002
- Berichten
- 33.894
de perfecte musix om ff op te trainen... huilende
en toch he... en toch... is juist dat onverstaanbare best lekker...
cool... Arnie; King of Poepshìììt... King of K*tpop is wel op z'n plaats...
soon is bij jou een 2 jaren plan
minstens...maar erm... zou Arnout Quirijns in het vervolg dan ff de mp3 file name voluit willen schrijven?
dus ff bijv: Arnout Quirijns - Jij Hebt Het Leven offe... Arnout Quirijns - Sjeu Le Peu
(die laatste is trouwens... erm... net echt
)
Laatst gewijzigd:
SadBunny
3 cm buiten het universum
Dosbox heb ik wel natuurlijk
Maar het was wel ff zoeken naar QB4.5. Wist alleen nog dat ik hem altijd opstartte met "qb /h /l" vroeger.Maar ik heb ze allebei uitgevoerd inderdaad. Geinig!
Lang niet meer gezien, quickbasic code. Heb er wel kilometers code in geschreven vroeger... screen 1,7 en 13 zijn 320x200 (met verschillende buttplane diepten, resp. 2,4 en
screen 2 en 8 zijn 'medium res' (640x200 dus)
screen 9 en 10 zijn 640 x 350 ofzo...
en screen 11 en 12 zijn 640x480 (met de ene 1 buttplane en de andere 4 gleuf ik)
Ik was in de war met screen 3. Dat was die heersende hercules mode.
ArieKnarie
Wild zwijn
de perfecte musix om ff op te trainen... huilende
en toch he... en toch... is juist dat onverstaanbare best lekker...
cool... Arnie; King of Poep
soon is bij jou een 2 jaren plan
maar erm... zou Arnout Quirijns in het vervolg dan ff de mp3 file name voluit willen schrijven?
dus ff bijv: Arnout Quirijns - Jij Hebt Het Leven offe... Arnout Quirijns - Sjeu Le Peu
(die laatste is trouwens... erm... net echt
Excuuzmie 6, ik was wat te rap met uploaden: ik zal er in het vervolg ffies aan denken
6 trak
?ILLEGAL QUANTITY ERROR
- Lid sinds
- 20 september 2002
- Berichten
- 33.894
maar die werkt niet meer in DOSBox... slechts ende alleen 1,2,7,8,9,10,11,12 en 13...
waarbij scherm 7,8 en 9 ook nog pages hebben (zoals je bijv zag in mijn smooth scroller code)...
dankExcuuzmie 6, ik was wat te rap met uploaden: ik zal er in het vervolg ffies aan denken
(een punt van verbetering )
Subgroover
Zweet spot
SCREEN 13: CLS : COLOR 4: a$ = "Zaadhaasch is bek"
LOCATE 13, 21 - (LEN(a$)) / 2: PRINT a$
LINE (0, 86)-(320, 8
LINE (0, 0)-(320, 85), 4, BF: LINE (0, 113)-(320, 199), 4, BF
DO
IF d1 = 0 THEN z = z + .03
IF d2 = 0 THEN y = y + .01
IF d3 = 0 THEN x = x + .02
IF d1 = 1 THEN z = z - .01
IF d2 = 1 THEN y = y - .02
IF d3 = 1 THEN x = x - .01
IF z > 63 THEN d1 = 1
IF y > 31 THEN d2 = 1
IF x > 63 THEN d3 = 1
IF z < 0 THEN d1 = 0
IF y < 0 THEN d2 = 0
IF x < 0 THEN d3 = 0
PALETTE 0, z: PALETTE 4, y: PALETTE 1, x
LOOP WHILE INKEY$ = ""
END:
Oooooh heerlijk, Basic, good'ol times!
ArieKnarie
Wild zwijn
maar die werkt niet meer in DOSBox... slechts ende alleen 1,2,7,8,9,10,11,12 en 13...
waarbij scherm 7,8 en 9 ook nog pages hebben (zoals je bijv zag in mijn smooth scroller code)...
dank
Wellicht
... al heb ik mijn twijfels of het met m'n muziek ooit nog wel eens goed komt, ik vrees met grote frezen van not.
maar daar is deze tread weer uitermate geschikt voor.
j.baars
vintage eigenheimer
- Lid sinds
- 22 februari 2005
- Berichten
- 12.349
[embed]66034[/embed]
de komende tijd zullen de liederen nogal gritty klinken.
ik heb de converter in m´n laptop opgeblazen, denk ik.............
ow, even de disclamer;
ik raad mensen die ergens aanstoot aan kunnen nemen, aan, NIET naar mijn brouwsels te luisteren, cq, te kijken.......
Otlen
Lid
Laat ik maar weer eens een korte cuntributie doen
j.baars
vintage eigenheimer
- Lid sinds
- 22 februari 2005
- Berichten
- 12.349
- Status
Vergelijkbare discussies
