The commented lines on the begining of the code explain what the output should be.
I can't make the last 4 lines of the output work. More clearly, I can't put the spaces I defined in %one %two %three and %four, inside the %upper.
#zoom
#ZOOM
#ZOOM (bold)
#ZOOM (bold, underlined)
#ZOOM (bold, underlined, white background, black font)
# Z O O M (bold, underlined, white background, black font)
# Z O O M (bold, underlined, white background, black font)
# Z O O M (bold, underlined, white background, black font)
# Z O O M (bold, underlined, white background, black font)
%upper = $str.upcase($0-);
%length = $str.len(%upper);
%one = " ";
%two = " ";
%three = " ";
%four = " ";
%len1 = %length*2;
%len2 = %length*3;
%len3 = %length*4;
%len4 = %length*5;
echo %len1;
echo $0-;
echo %upper;
echo $b%upper;
echo $b$u%upper;
echo $k(1,0)$b$u%upper;
%result = %upper;
for(%i = 0; %i < %len1; %i++){
%result = $str.insert(%result, %one, %i);
%i++;
}
echo $k(1,0)$b$u%result;
%result = %upper;
for(%i = 0; %i < %len2; %i++){
%result = $str.insert(%result, %two, %i);
%i+=2;
}
echo $k(1,0)$b$u%result;
%result = %upper;
for(%i = 0; %i < %len3; %i++){
%result = $str.insert(%result, %three, %i);
%i+=3;
}
echo $k(1,0)$b$u%result;
%result = %upper;
for(%i = 0; %i < %len4; %i++){
%result = $str.insert(%result, %four, %i);
%i+=4;
}
echo $k(1,0)$b$u%result;
%result = %upper;
IRC Client KVIrc Forums
