Am I doin it rite?
1
Name:
Anonymous
2007-03-08 16:11
ID:ko8I8fKq
#!/usr/local/bin/python
inc=0
length=int(raw_input("How long is looooooongcat?\n"))
print " ^_____^ \n"
print " / \ \n"
print " | # # | \n"
print " \ @ | \n"
print " \ _|_ / \n"
print " / \________ \n"
print " / ________ ___ \ \n"
print " | ________ \ \__/ \n"
print " | \__/ \n"
while inc<length:
print " | | \n"
inc=inc+1
print " / \ \n"
print " / ______ \ \n"
print " | / \ | \n"
print " | | | | \n"
print " / | | \ \n"
print " \__/ \__/ \n"
41
Name:
Anonymous
2007-03-15 13:33
ID:2kvYIUHN
module Main where
longcat n =
["\n ^_____^ ",
" / \\ ",
" | # # | ",
" \\ @ | ",
" \\ _|_ / ",
" / \\________ ",
" / ________ ___ \\ ",
" | ________ \\ \\__/ ",
" | \\__/ ",
unlines . tail $ replicate n
" | | ",
" / \\ ",
" / ______ \\ ",
" | / \\ | ",
" | | | | ",
" / | | \\ ",
" \\__/ \\__/ "]
userInteract = (. ((putStrLn .) . (. read))) .
(>>=) . (>> getLine) . putStr
main = userInteract "How long is longcat?"
(unlines . longcat)
Can someone help me? I can't seem to get rid of the empty line in the middle...
42
Name:
Anonymous
2007-03-15 14:05
ID:9r+M76Oj
#!/usr/bin/env perl
print "How long is looooooongcat?\n";
chomp(my $lenght = <STDIN>);
print " ^_____^ \n";
print " / \ \n";
print " | # # | \n";
print " \ @ | \n";
print " \ _|_ / \n";
print " / \________ \n";
print " / ________ ___ \ \n";
print " | ________ \ \__/ \n";
print " | \__/ \n";
print " | | \n" for 1..$lenght;
print " / \ \n";
print " / ______ \ \n";
print " | / \ | \n";
print " | | | | \n";
print " / | | \ \n";
print " \__/ \__/ \n";
43
Name:
Anonymous
2007-03-15 14:39
ID:Fa0Isyx1
that doesn't really look like long cat, but ASCII cat is ASCIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII
44
Name:
Anonymous
2007-03-15 14:43
ID:nxdbkCiM
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~DESU~
45
Name:
Anonymous
2007-03-15 15:15
ID:9r+M76Oj
Needs more PERL-ish .
>>42 is way to pythonic.
#!/usr/bin/env perl
use strict; #follow best practices
use warnings;
print "How long is looooooongcat?\n";
chomp(my $l = <STDIN>);
my $c = " ^_____^ \n / \
| # # |
\ @ | \n \ _|_ / \n / \________
/ ________ ___ \ \n | ________ \ \__/ \n | \__/
| | \n / \ \n / ______ \
| / \ | \n | | | | \n / | | \
\__/ \__/ \n";
my @cat_part = map { (/(^\s+\|\s+\|\s+$)/) ?
[$_, sub{ print @_ for 1..$l }]
: [$_, sub{ print @_ } ];
} split "\n", $c;
foreach (@cat_part) {
my $s = pop @{$_};
&$s(@{$_}, "\n");
}
46
Name:
Anonymous
2007-03-15 16:22
ID:yIaXqa4C
use strict; #follow best practices
lol so it's the same as shell( 'python' ); exit;
47
Name:
Anonymous
2007-03-15 17:14
ID:lBotmpW+
>>45
Needs more string multiplication operator! (x)
48
Name:
Anonymous
2007-03-15 17:22
ID:+W2OALdG
My old girlfriend from college used to fart when ever she felt like it. Even if we were in public, she'd just let one rip and not give a damn. She was kind of a tomboy, but only in her actions.
Anyway, this one time when we were having sex she farted so loud that she pooped on the bed sheets. She was so embarrassed and ending up crying... but the reason why she cried wasn't because she pooped on the sheets, it was because I couldn't stop laughing at her. In fact, I laughed to the point where I started to fart like a machine gun. I couldn't stop myself.
So, in the end, she broke up with me because she felt I wasn't "mature" enough to handle her "mature" farts.
49
Name:
Anonymous
2007-03-15 20:02
ID:lmYe6t5i
>>48
I'm sexually aroused from your story.
50
Name:
Anonymous
2007-03-15 21:28
ID:KiHY9adU
>>48
This is not your invitation:
http://www.lost.eu/2fea9
51
Name:
Anonymous
2007-03-15 22:32
ID:2ypAs0DZ
>>1
You're not doing it right because it's python, it's an automatic failure.
#include <stdio.h>
int main(int argc, char *argv[])
{
long length = 0;
long i=0;
scanf("%ld",&length);
printf(" ^_____^ \n");
printf(" / \\ \n");
printf(" | # # | \n");
printf(" \\ @ | \n");
printf(" \\ _|_ / \n");
printf(" / \\________ \n");
printf(" / ________ ___ \\ \n");
printf(" | ________ \\ \\__/ \n");
printf(" | \\__/ \n");
for(i=0;i<length;i++)
{
printf(" | | \n");
}
printf(" / \\ \n");
printf(" / ______ \\ \n");
printf(" | / \\ | \n");
printf(" | | | | \n");
printf(" / | | \\ \n");
printf(" \\__/ \\__/ \n");
printf("longcat is l");
for(i=0;i<length;i++)
{
printf("o");
}
printf("ng\n");
system("PAUSE");
return 0;
}
Fear the power of ANSI C.
52
Name:
Anonymous
2007-03-16 4:06
ID:Pf8QjnIb
system("PAUSE");
Automatic failure. Also already done.
53
Name:
Anonymous
2007-03-16 7:10
ID:f877EdeU
Dim as Long cat, i
Input "How long is longcat? "; cat
Print " ^_____^ "
Print " / \ "
Print " | # # | "
Print " \ @ | "
Print " \ _|_ / "
Print " / \________ "
Print " / ________ ___ \ "
Print " | ________ \ \__/ "
Print " | \__/ "
For i = 1 To cat
Print " | | "
Next i
Print " / \ "
Print " / ______ \ "
Print " | / \ | "
Print " | | | | "
Print " / | | \ "
Print " \__/ \__/ "
54
Name:
Anonymous
2007-03-16 9:25
ID:Pf8QjnIb
U r doin it rite
55
Name:
Anonymous
2007-03-16 11:48
ID:nxn8JFDO
In b4 an infinite, lazily evaluated longcat.
56
Name:
Anonymous
2007-03-16 11:51
ID:x4KAU57y
#!/usr/bin/perl
print 'How long is longcat?: ';
chomp($length_of_longcat = <STDIN>);
print ' ^_______^ ' . "\n";
print ' / \ ' . "\n";
print ' | # # | ' . "\n";
print ' \ @ | ' . "\n";
print ' \ _|_ / ' . "\n";
print ' / \____________ ' . "\n";
print ' / _____________ ____ \ ' . "\n";
print ' | ___________ \ \___/ ' . "\n";
print ' | \___/ ' . "\n";
foreach (0..$length_of_longcat) {
print ' | | ' . "\n";
}
print ' / \ ' . "\n";
print ' / ________ \ ' . "\n";
print ' | / \ | ' . "\n";
print ' | | | | ' . "\n";
print '/ | | \ ' . "\n";
print '\___/ \___/ ' . "\n";
57
Name:
Anonymous
2007-03-16 11:52
ID:Heaven
module LongCock (main) where
main = putStrLn ('8' : (repeat '=') ++ ">")
58
Name:
Anonymous
2007-03-16 11:53
ID:QVBuyJBg
Haskell wanker is a wanker
59
Name:
Anonymous
2007-03-16 11:54
ID:E/O+EdDc
>>56
NEEDS LESS FAILURE!
#!/usr/bin/perl
print 'How long is longcat?: ';
chomp($length_of_longcat = <STDIN>);
print ' ^_______^ ' . "\n";
print ' / \ ' . "\n";
print ' | # # | ' . "\n";
print ' \ @ | ' . "\n";
print ' \ _|_ / ' . "\n";
print ' / \____________ ' . "\n";
print ' / _____________ ____ \ ' . "\n";
print ' | ___________ \ \___/ ' . "\n";
print ' | \___/ ' . "\n";
print " | | \n" x $length_of_longcat;
print ' / \ ' . "\n";
print ' / ________ \ ' . "\n";
print ' | / \ | ' . "\n";
print ' | | | | ' . "\n";
print '/ | | \ ' . "\n";
print '\___/ \___/ ' . "\n";
60
Name:
Anonymous
2007-03-16 12:41
ID:z/liyv+O
Pop this into C++ for ultimate Console ASCII Cats!
/*~~~~~~~ ASCII CATS ~~~~~~~~
Longcat for Visual Studio 2005 C++
USE ON A WINDOWS MACHINE
- otherwise you FAIL
~~~~~~~~ /ASCII CATS ~~~~~~~*/
#include <iostream> //Includes input/output library
using namespace std; //Removes need for std:: all the time
int length = 0;
void Longcat();
void Tacgnol();
int main() //Main Function - required
{
system("COLOR 9F");
int master = 0;
cout << "Copypasta /r/ who is your master!\n";
cout << "Longcat - 1\n";
cout << "Tacgnol - 0\n\n";
cin >> master;
while(master >= 2 || master <= -1)
{
cout << "Your attemt at being a smartass has FAILED";
}
system("CLS");
if(master == 0)
{
Tacgnol();
}
if(master == 1)
{
Longcat();
}
system("PAUSE"); //PAUSE
return 0; //EXIT
}
void Tacgnol()
{
system("COLOR 08"); //Changes background colour to white and text colour to gray - F8 for longcat
cout << "How gnol si Tacgnol!?"; //Message output to user
cin >> length; //User input
//Longcat image displayed on screen - cuter than before
//Head
cout << " ^_____^ \n";
cout << " / \\ \n";
cout << " | @ @ | \n";
cout << " \\ v | \n";
cout << " \\ _|_ / \n";
cout << " / \\________ \n";
cout << " / ________ ___ \\ \n";
cout << " | ________ \\ \\__/ \n";
cout << " \\ \\__/ \n";
//Mid-section
for( int c = 0 ; c <= length ; c++) //For loop - will output the mid-section of Longcat for as many units as stated by the user
{
cout << " | | \n"; //Midsection to be output
}//End For Loop
//Legs
cout << " / \\ \n";
cout << " / ______ \\ \n";
cout << " | / \\ | \n";
cout << " | | | | \n";
cout << " / | | \\ \n";
cout << " \\__/ \\__/ \n\n";
cout << "Tacgnol si... GN";
for(int i = 0 ; i <= length ; i++)
{
cout << "O";
}
cout << "L\n";
}
void Longcat()
{
system("COLOR F8"); //Changes background colour to white and text colour to gray - F8 for longcat
cout << "How long is Longcat!?"; //Message output to user
cin >> length; //User input
//Longcat image displayed on screen - cuter than before
//Head
cout << " ^_____^ \n";
cout << " / \\ \n";
cout << " | @ @ | \n";
cout << " \\ v | \n";
cout << " \\ _|_ / \n";
cout << " / \\________ \n";
cout << " / ________ ___ \\ \n";
cout << " | ________ \\ \\__/ \n";
cout << " \\ \\__/ \n";
//Mid-section
for( int c = 0 ; c <= length ; c++) //For loop - will output the mid-section of Longcat for as many units as stated by the user
{
cout << " | | \n"; //Midsection to be output
}//End For Loop
//Legs
cout << " / \\ \n";
cout << " / ______ \\ \n";
cout << " | / \\ | \n";
cout << " | | | | \n";
cout << " / | | \\ \n";
cout << " \\__/ \\__/ \n\n";
cout << "Longcat is... L";
for(int i = 0 ; i <= length ; i++)
{
cout << "O";
}
cout << "NG\n";
}
61
Name:
Anonymous
2007-03-16 12:57
ID:Heaven
int length = 0; // Assigns the value zero to the integer variable named length.
62
Name:
Anonymous
2007-03-16 13:49
ID:DoG3mEM0
>>61
lol, yes, yes it does
63
Name:
Anonymous
2007-03-16 14:27
ID:Heaven
>>60
What the hell is wrong with you.
64
Name:
Anonymous
2007-03-16 15:57
ID:Pf8QjnIb
$lenght_of_longcat = int <STDIN>
reads nicer than
chomp($length_of_longcat = <STDIN>);
65
Name:
Anonymous
2007-03-16 15:59
ID:Pf8QjnIb
>>59
what's with the needless
". "\n" ?
66
Name:
Anonymous
2007-03-16 16:11
ID:E/O+EdDc
>>65
Too lazy to change it -- I only copipasta'd it to show off my extensive (I kid) knowledge of Perl operators.
67
Name:
Anonymous
2007-03-16 18:10
ID:Pf8QjnIb
>>66
I liked the string multiplication operator though, that might come in handy.
using a for loop is possibly more readable though
68
Name:
Anonymous
2007-03-17 0:16
ID:s/RgDImc
#!/usr/bin/env perl
use strict;
use PerlHP;
<% our $length %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"
http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> ;
<html xmlns="
http://www.w3.org/1999/xhtml" ; lang="en" xml:lang="en">
<head>
<title>looooooongcat</title>
</head>
<body>
<% if(!$length=~/^\d+$/){ %>
<form method="post" action="<%= $ENV{SCRIPT_NAME} %>">
<p>
<label for="length">How long is looooooongcat?</label>
<input type="text" name="length" id="length"/>
<input type="submit"/>
</p>
</form>
<% }else{ %>
<p style="white-space:pre;font-family:monospace">
^_____^
/ \
| # # |
\ @ |
\ _|_ /
/ \________
/ ________ ___ \
| ________ \ \__/
| \__/
<%= " | |\n"x$length
%> / \
/ ______ \
| / \ |
| | | |
/ | | \
\__/ \__/
</p>
<% } %>
</body>
</html>
69
Name:
Anonymous
2007-03-17 1:51
ID:Heaven
>>68
needs more
tags.
[code]#!/usr/bin/env perl
use strict;
use PerlHP;
<% our $length %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> ;;
<html xmlns="http://www.w3.org/1999/xhtml" ;; lang="en" xml:lang="en">
<head>
<title>looooooongcat</title>
</head>
<body>
<% if(!$length=~/^\d+$/){ %>
<form method="post" action="<%= $ENV{SCRIPT_NAME} %>">
<p>
<label for="length">How long is looooooongcat?</label>
<input type="text" name="length" id="length"/>
<input type="submit"/>
</p>
</form>
<% }else{ %>
<p style="white-space:pre;font-family:monospace">
^_____^
/ \
| # # |
\ @ |
\ _|_ /
/ \________
/ ________ ___ \
| ________ \ \__/
| \__/
<%= " | |\n"x$length
%> / \
/ ______ \
| / \ |
| | | |
/ | | \
\__/ \__/
</p>
<% } %>
</body>
</html>
70
Name:
Anonymous
2007-03-17 1:53
ID:Heaven
>>69
lol, i guess shiichan fails at bbcode.
bbcode is made of fail anyway, tho.
if you fail at failure, does that mean you win?
71
Name:
Anonymous
2007-03-17 5:21
ID:Heaven
>>70
Yes, the special Olympics.
72
Name:
Anonymous
2007-03-17 5:25
ID:MS2lcoGe
if you fail at failure, does that mean you win?
It means you can be sure you're using shiichan or shiichan derivative
73
Name:
Anonymous
2009-01-14 15:15
GTFO
77
Name:
Anonymous
2011-01-31 20:12
<-- check em dubz
78
Name:
Anonymous
2011-02-03 8:00