View Full Version : Some Classic Basic
martzweb
08-26-2001, 10:35 AM
10 Cls
20 Print "Martz is an arse and cant program worth a crap"
30 Goto 20
ImaginAsian
08-26-2001, 11:25 AM
Originally posted by martzweb
10 Cls
20 Print "Martz is an arse and cant program worth a crap"
30 Goto 20
Let me add more code:
5 i = 1
10 cls
20 For i = 1 to 3
30 If i = 1 then Print "Martz is an arse and cant program worth a crap"
40 If i = 2 then Print "IA is a cheap ass and damn proud of it"
50 If i = 3 then Print "DK's Mom's Ass is so Flat, Columbus Fell Off"
60 i = i + 1
70 next i
80 goto 5
:barf:
Mad dog
08-26-2001, 02:17 PM
Here is the same sort of thing in C
while(true)
{
printf("Martz is an arse and cant program worth a crap\n");
}
and in Java
while(true)
{
System.err.println("Martz is an arse and cant program worth a crap");
}
martzweb
08-26-2001, 06:19 PM
Cheers Mad Dog... now i know how to do a scroller in two languages tell mei cant program worth a toss :)
Dramen
08-27-2001, 07:03 AM
Martz, thats 3 languages...:hammer:
Mad dog
08-27-2001, 07:42 AM
Hang on i think i can do it in C# too
while(true)
{
Console.WriteLine("Martz is an arse and cant program worth a crap");
}
Hehehe, lets see how many languages we can get going
KaraK, how well do you remeber Scheme?
martzweb
08-27-2001, 02:09 PM
Thanks for pointing that out Dramen, O Toilet Scrubber Extraordinaire :)
BitBender
08-27-2001, 04:06 PM
Java:
system.out.println("Martz's balls are so small, even a fly's mouth can hold it all");
IA = cheapAss.getHow(proud);
public class main scrotScratch(String arguments arg)
extends finger implements scratchAble scrotRub
public void scrotScratch() {
int ballscratch = 0;
for (String ballColor = "normal"; ballColor = "red"; ballScratch++)
String itchySpot = new(scratchAble.positionNut());
try {
mr.scrotScratch();
} catch (pimpleException e) {
scrape = new scrotRub.getHead();
if (scrape != 0)
throw ballsTooRed()
}
ballColor = scrotRub.getColor[ballscratch]
}
Orange Peel
08-27-2001, 04:36 PM
and in Binary
100110111101101010111000101010100010011001000100110010010011001110011000100 101101010010010001001001000010111010011010010010010010100110100101000101010 010010
:hat:
KaraK
08-28-2001, 02:36 PM
Originally posted by Mad dog
KaraK, how well do you remeber Scheme?
trying VERY hard to forget it...
martzweb
08-29-2001, 06:02 PM
Woo BB... full java source...... how very, um... dull :)
Dramen
08-29-2001, 08:17 PM
Originally posted by martzweb
Thanks for pointing that out Dramen, O Toilet Scrubber Extraordinaire :)
Sob...wimper...gee did ya hafta be that cruel, at least you might have refered to me as Maintenance Engineer Extraordinaire :rolleyes:
BitBender
08-29-2001, 08:37 PM
2300-testiclues-elephantis.
perform 2350-lift-elastic-waistband thru 2350-exit.
if penis-isnt-hard
then
perform 2375-scratch-pouch thru 2375-exit
else
perform 2390-stroke-popsicle-stick varying speed
from 1 by 1 until purple-color-eliminated or
misfire-switch = 'yes'
end-if.
perform 2395-wipe-hand thru 2395-exit.
perform 2360-relax-elastic-waistband thru 2360-exit.
2300-exit.
exit.
lurch63
09-05-2001, 10:12 PM
nice one bit, :) hey dramen good to see you man, too many languages, did a little basic and C++, but the only fun thing that i have to learn is MATLAB, wich is based off of C++ with alot of math applications, also some assembler which was fun, here's s little contribution, one of the subroutines of a progy i wrote
CHARSK PROC NEAR
PUSH BX
PUSH CX
PUSH DX
CALL BLANK
XOR DI,DI
AND BH,0FH
MOV BL,BH
DEC BL
XOR BH,BH
ADD DI,BX
MOV DX,0FFEAH
MOV AL,90H
OUT DX,AL
MOV DX,0FFE8H
MOV AL,TABLE[DI]
OUT DX,AL
MOV BH,2H
CALL TIMEOUT
POP DX
POP CX
POP BX
RET
TABLE DB 5FH,7CH,58H,5EH,7BH
CHARSK ENDP
lurch
BitBender
09-05-2001, 10:49 PM
Scratchit EQ *
STM R13,R14,REGSTORE
LA R1,A('MartzBlls')
LA R2,A('Martfngr')
MVI SCRATCH1,C'S'
BAL R4,SCR_AND_SNIFF
LTR R5,R5
BZ WASHROOM
LA R1,A('Martbutt')
MVI SCRATCH1,C'S'
BAL R4,SCR_AND_SNIF
LTR R5,R5
BZ NIBBL_FNGR
BNZ WASHROOOM
WASHROOM LM R13,R14,REGSTORE
BR R15
lurch63
09-06-2001, 01:06 AM
dude, where do you find this stuff, or do you right it yourself, either way, funny shit man. :) lurch
BitBender
09-06-2001, 07:14 AM
Lurch...It's the the mark of a corrupted mind...I think in code....I see in code....I dream in code.......I compile in my sleep, and offload when I get up! Sometimes, Bitbendette will request a 'special' transfer' of digitized material....
Sad, I know, but I just write it up as I think of it!!
Hence me title, The Bitbender!
lurch63
09-06-2001, 09:00 AM
i am awed and enlightened, lurch:-)
BobBeezer
09-06-2001, 09:58 AM
And gay... oops, wrong thread! :rollin:
Damn, I really need to pick up C++ again. I actually had fun doing that (for the first 2 years) then I kinda got bored with it. I barely remember that iostream starts it off :P
Beezer
lurch63
09-07-2001, 12:44 AM
1st, bite me beezer :) , but i don't know i just loved the feel of the assembler when i worked with it, first of all we had the chip archetecture all laid out we wrote programs that actually controlled this chip or that chip, hell you could probe the pins at any point and see if you stable state stuff was coming out right, maybe its inefficient but so much of the modern programming just puts you so far away from the hardware that as far as your concerned a computer is just a mouse, keyboard and a monitor that just makes the stuff that you write go to happy land and come back with either good or bad data, but thats just my opinioni, as for a career it seems that i will have to write a lot of programs for matlab which is the major program of the sciences at the moment, (yippie don't have to learn fortran :) ) but thats an off C++ language and i like using it, but it also has the C far from the hardware feel, what can you do , lurch
ImaginAsian
09-07-2001, 02:34 AM
Once they taught me about Pointers in C/C++ I gave up and went back to Visual Basic :O
Bits...YOU CRACK ME UP AS USUAL!!!
How about some HTML and PHP coding, Bits flavor??
ImaginAsian
09-07-2001, 02:37 AM
Originally posted by lurch63
nice one bit, :) hey dramen good to see you man, too many languages, did a little basic and C++, but the only fun thing that i have to learn is MATLAB, wich is based off of C++ with alot of math applications, also some assembler which was fun, here's s little contribution, one of the subroutines of a progy i wrote
CHARSK PROC NEAR
PUSH BX
PUSH CX
PUSH DX
CALL BLANK
XOR DI,DI
AND BH,0FH
MOV BL,BH
DEC BL
XOR BH,BH
ADD DI,BX
MOV DX,0FFEAH
MOV AL,90H
OUT DX,AL
MOV DX,0FFE8H
MOV AL,TABLE[DI]
OUT DX,AL
MOV BH,2H
CALL TIMEOUT
POP DX
POP CX
POP BX
RET
TABLE DB 5FH,7CH,58H,5EH,7BH
CHARSK ENDP
lurch
Bless You :p
Looks like Egyptian Heiroglyphics to moi :hhead:
KaraK
09-07-2001, 04:53 AM
my main languages are C and Java, after 6 weeks of coding solidly in C I found I was starting to think about stuff the way I programmed. It was NOT good :eyes:
Powered by vBulletin® Version 4.2.0 Copyright © 2013 vBulletin Solutions, Inc. All rights reserved.