Funny Pic Thread (Episode III: Revenge of the ****)

  • Thread starter Thread starter ceiling_fan
  • 4,972 comments
  • 345,965 views
Status
Not open for further replies.
I would have loved to have done that when I was made to write lines, I fear that the teachers wouldn't have a clue on what I was doing though (except in an I.T class obviously).
 
mullen_power13
I would have loved to have done that when I was made to write lines, I fear that the teachers wouldn't have a clue on what I was doing though (except in an I.T class obviously).
Click to expand...
I don't even know what that computer language is. When I first got a Northstar Advantage computer back in the early 1980's, it came with a form of basic. A very simple program in this particular version of basic, that would accomplish what is shown in that photo would be as follows:

10 For x=1to500
20 !"I will not throw paper airplanes in class."
30 Next

Where this version of basic interpreted the "!" to mean print. Things were much simpler in the old days....maybe that's why it was called Basic.:)
 
A MatLab script would look like this:

Code: 
for i=1:500
    disp('I will not thrown paper planes in class')
end
 
TigJackson
I don't even know what that computer language is. When I first got a Northstar Advantage computer back in the early 1980's, it came with a form of basic. A very simple program in this particular version of basic, that would accomplish what is shown in that photo would be as follows:

10 For x=1to500
20 !"I will not throw paper airplanes in class."
30 Next

Where this version of basic interpreted the "!" to mean print. Things were much simpler in the old days....maybe that's why it was called Basic.:)
Click to expand...

In BASIC shouldn't 30 be "Next x"?
 
Perl FTW

You don't want to hard code the particular punishment, you'd like to write modular code that could handle any punishment. Ideally, you want to be able to pass your code a line to write 500 times...

#!/user/bin/perl
for ($count = 500; $count > 0; $count--) {print "I will not ".@ARGV[0]." in class.\n";}



But the real beauty would be reading it from a file:
#!/user/bin/perl
$evil_deed=`cat @ARGV[0]`;
chomp($evil_deed);
$i=500;
while($i){print "I will not $evil_deed in class.\n";$i--;}
 
Speaking of talking nerdy, anybody wanna come up with the 100-plus lines it would probably take to do it in COBOL?

I say 100-plus because (back in the day) I took a whole week of COBOL, and the first assignment was to write a program that printed your name. That's all.

110 lines of code by the time you set all your procedures, definitions, and sections. I dropped the class.
 
Danoff
Perl FTW

You don't want to hard code the particular punishment, you'd like to write modular code that could handle any punishment. Ideally, you want to be able to pass your code a line to write 500 times...
Click to expand...

But wouldn't you want it to ask you how many times you want it? So for MatLab:

Code: 
function punishment(rep,string)
for i=1:rep
    disp(['I will not ' string ' in class'])
end

With a pleasing result:

48838820il0.gif

And repeat...
 
Metar
But wouldn't you want it to ask you how many times you want it? So for MatLab:
Click to expand...

Heh

#!/user/bin/perl
for ($count = @ARGV[0]; $count > 0; $count--) {print "I will not ".@ARGV[1]." in class.\n";}

Plus you didn't have to shell out 6 bazillion dollars for a matlab license. Try reading it from a file in matlab... easily. The real matlab advantage is that you could plot it in 3D without blinking. Plus it has vector operations - which perl doesn't have.
 
Touché. Two lines - that was a clean victory. Looks like I found myself something new to learn in my free time. :p
 
Metar
Touché. Two lines - that was a clean victory. Looks like I found myself something new to learn in my free time.
Click to expand...

Cool. Glad to spread the word. When you do start learning perl, you will find that this:

Danoff
$evil_deed=`cat @ARGV[0]`;
Click to expand...

...is the coolest damned thing ever. Suddenly every single unix command, perl script, csh script etc. etc. is at your fingertips while you're coding.
 
TigJackson
I don't even know what that computer language is.
Click to expand...

Back to the question at hand, I'm pretty sure that's Java. And if it isn't, that explains why I only got a 3 on the AP Comp Sci A last year. :dunce:
 
Wow, this is getting nerdy - even for a computer games forum!
 
How many FAILS can I post before someone jumps in with a repost comment.

sinkingcarsc6.jpg


epicbikefailez8.jpg


lolzfailduckslolcatat8lge4.jpg


pepsicokeuy5.jpg


procreationfailmv6.jpg


sexyfailjg6.jpg


shipoffailcl4wq0.jpg


headshotnj1.jpg
 
Metar
With a pleasing result:

48838820il0.gif

And repeat...
Click to expand...

Heh. Made me laugh.

Can you write a program which corrects your (rep) spelling mistakes on the above JPG? :D
 
DQuaN
In BASIC shouldn't 30 be "Next x"?
Click to expand...
Sorry about being so late with a reply, but I had not lurked in the Rumble Strip for several days.

The particular version of BASIC that I was using, which is called MegaBasic Version 4.1 (Copyright 1984), did not require the 'x' that you are inquiring about. Actually, in order to accomplish the same thing that I posted earlier, and to actually keep count of the number of uses, I could simply have written the following with that specific version of MegaBasic:

forx=1to500;!x," I will not throw paper airplanes in class";next

I still have Megabasic on an older computer, and I just tried it out....it works with that simple single line of code. The blank ("_I will...) is intentional in order to separate the numbers from the text.
 
Status
Not open for further replies.

Latest Posts

Back