网页之多变的滚动字幕特效

zw2004

<script language="JavaScript">
& `- O/ b* A, N1 t2 p( O
. q9 g& \  u6 v  c; J# D( W! F<!-- ActiveASCII by Neal Kanodia (please, don't delete this line)
/ L5 U2 E7 J1 @$ s' K$ y: N0 `' m3 t. u, J" u5 T& w( w/ h+ q- g
function createArr(num) { for(var i = 0; i < num; i++) { this = null } }& @1 X. N# S3 ]7 p
function fillArr(tx,me,ti,wa) { this.text = tx;  this.method = me.toLowerCase();  this.ticks = ti;  this.wait = wa }+ l4 p5 T) Z4 g/ I& S
function block(num,txt,mthod,tcks,wit) { blocks[num] = new fillArr(txt,mthod,tcks,wit) }& Q' w0 d0 W( |1 @
function ms(unt) { var sp = "";  for( var i = 1; i <= unt; i++ ) { sp += " " } return(sp) }
: \- i. l, Y& n4 Dfunction Activate() { if (cblock == max) { cblock = 0;  if (iloop == 0) { loops--;  if (loops == 0) { meth = "0" } else { meth = blocks[cblock].method } } else { meth = blocks[cblock].method } } else { meth = blocks[cblock].method }
- b, f! Z6 \& K9 W. J5 Tif (meth == "0") { document.Active.ASCII.value = end }* v: Z+ C8 B' F4 w
if (meth == "display") { Tape = blocks[cblock].text;  Wait = blocks[cblock].wait;  Display() }
/ q7 B  ]* V3 m. O! x; [5 Bif (meth == "display center") { Tape = blocks[cblock].text;  Wait = blocks[cblock].wait;  half = Tape.length / 2;  DisplayC() }
3 `- {3 y; Y5 J& u- n' p  \if (meth == "scroll left") { clen = tlen;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  ScrollL() }
& w  G% Y+ n' Q. X" ?if (meth == "scroll right") { clen = 0 - blocks[cblock].text.length;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  ScrollR() }3 r9 K4 ]- {5 T5 o
if (meth == "scroll lc") { clen = 0 - blocks[cblock].text.length;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  Wait = blocks[cblock].wait;  tTicks = Ticks * 2;  half = Tape.length / 2;  ScrollLC() }
" h* h. ^6 d* |3 u( P1 U8 Y! s% Nif (meth == "scroll rc") { clen = tlen;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  Wait = blocks[cblock].wait;  tTicks = Ticks * 2;  half = Tape.length / 2;  ScrollRC() }" d9 x9 s2 z% A  B! p
if (meth == "scroll cl") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  half = Tape.length / 2;  clen = cent - half;  ScrollCL() }
" h. c2 j3 h/ |2 i8 H6 G( {* U9 Q9 mif (meth == "scroll cr") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  half = Tape.length / 2;  clen = cent - half;  ScrollCR() }/ @9 V4 t$ D( [2 c7 i6 _4 d6 `! R8 e
if (meth == "slide left") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  Wait = blocks[cblock].wait;  cpos = 0;  clet = Tape.charAt(cpos);  clen = tlen;  cstr = "";  SlideL() }
; y5 T( b+ `8 A6 J6 Vif (meth == "slide lc") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  Wait = blocks[cblock].wait;  cpos = Tape.length - 1;  clet = Tape.charAt(cpos);  clen = 0;  cstr = "";  half = Tape.length / 2;  iba = cent - half;  ib = ms(iba);  SlideLC() }4 B' H- |' Z& O5 a2 {- m
if (meth == "slide rc") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  Wait = blocks[cblock].wait;  cpos = 0;  clet = Tape.charAt(cpos);  cstr = "";  half = Tape.length / 2;  clen = cent + half;  fs = ms(cent - half);  SlideRC() }
4 I2 L- h2 T/ m' aif (meth == "slide cl") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  cpos = 0;  clet = Tape.charAt(cpos);  cstr = Tape.substring(1,Tape.length);  half = Tape.length / 2;  clen = cent - half;  iba = 0;  ib = ms(iba);  SlideCL() }
1 a/ M! I0 C+ V2 b& p" B6 _5 S& Uif (meth == "slide cr") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  cpos = Tape.length - 1;  clet = Tape.charAt(cpos);  cstr = Tape.substring(0,Tape.length - 1);  half = Tape.length / 2;  clen = 0;  fs = ms(cent - half);  SlideCR() }
: d2 U/ y: l1 p5 I) P* [4 Tif (meth == "slip left") { clen = 0;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  SlipL() }
# L8 Y: s/ L  n7 Vif (meth == "slip right") { clen = 0;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  SlipR() }
- Y  \7 B1 h2 N& e0 }( Nif (meth == "slip letter") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  cpos = Tape.length - 1;  clet = Tape.charAt(cpos);  cstr = Tape.substring(0,Tape.length - 1);  clen = 0;  SlipLet() }* f) J8 Q% F; y4 I" H( L
if (meth == "split"){ Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  var iii = Tape.length / 2;  if (iii / 2 != Math.ceil(iii / 2)) { Tape = Tape + " " } hstr1 = Tape.substring(0,Tape.length/2);  hstr2 = Tape.substring(Tape.length/2,Tape.length);  tTicks = Ticks * 2;  clen = cent - hstr1.length;  iba = 0;  ib = ms(iba);  Split() }: ?* x+ A* R: K% |: b+ F* n
if (meth == "merge"){ Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  var iii = Tape.length / 2;  if (iii / 2 != Math.ceil(iii / 2)) { Tape = Tape + " " } hstr1 = Tape.substring(0,Tape.length/2);  hstr2 = Tape.substring(Tape.length/2,Tape.length);  tTicks = Ticks * 2;  clen = 0 - hstr1.length;  iba = tlen;  ib = ms(iba);  Wait = blocks[cblock].wait;  Merge() } }# n# E9 S! }7 T8 {  |6 b3 s. \) a
function Display() { document.Active.ASCII.value = Tape;  cblock++;  timerID = setTimeout("Activate()",Wait) }
' i$ x& x/ ^3 L" Bfunction DisplayC() { var temp = cent - half;  ini = ms(temp);  document.Active.ASCII.value = ini + Tape;  cblock++;  timerID = setTimeout("Activate()",Wait) }
7 f! Y5 ~' s% @; Nfunction ScrollL() { if (clen >= 0) { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("ScrollL()",Ticks) } else { beg = 0 - clen;  if (beg == Tape.length) { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Ticks) } else { tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("ScrollL()",tTicks) } } }
  J- E3 c' Y2 u/ w7 q' Z! Yfunction ScrollR() { if (clen >= 0) { if (clen > tlen) { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Ticks) } else { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("ScrollR()",Ticks) } } else { beg = 0 - clen;  tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("ScrollR()",tTicks) } }5 l% k$ u' R7 K( ?
function ScrollLC() { if (clen >= 0) { if (cent <= (clen + half)) { cblock++;  timerID = setTimeout("Activate()",Wait) } else { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("ScrollLC()",Ticks) } } else { beg = 0 - clen;  if (cent <= (clen + half)) { cblock++;  timerID = setTimeout("Activate()",Wait) } else { tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("ScrollLC()",tTicks) } } }( k# P* f7 N8 J2 ~; q0 R: v
function ScrollRC() { if (clen >= 0) { if (cent >= (clen + half)) { cblock++;  timerID = setTimeout("Activate()",Wait) } else { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("ScrollRC()",Ticks) } } else { beg = 0 - clen;  if (cent >= (clen + half)) { cblock++;  timerID = setTimeout("Activate()",Wait) } tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("ScrollRC()",tTicks) } }% c2 Q$ A7 C; l' Z- S
function ScrollCL() { if (clen >= 0) { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("ScrollCL()",Ticks) } else { beg = 0 - clen;  if (beg >= Tape.length) { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Wait) } else { tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("ScrollCL()",tTicks) } } }3 t0 t, [# s$ F. ~4 y( G6 W
function ScrollCR() { if (clen >= 0) { if (clen > tlen) { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Wait) } else { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("ScrollCR()",Ticks) } } else { beg = 0 - clen;  tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("ScrollCR()",tTicks) } }/ ^9 Q9 `, {: X% U
function SlideL() { if (clen >= 0) { ini = ms(clen);  tickered = cstr + ini + clet;  document.Active.ASCII.value = tickered;  clen -= 3;  timerID = setTimeout("SlideL()",Ticks) } else { document.Active.ASCII.value = cstr + clet;  cstr = document.Active.ASCII.value;  clen = tlen - cstr.length;  cpos++;  clet = Tape.charAt(cpos);  if (clet == " ") { cstr = cstr + " ";  cpos++;  clet = Tape.charAt(cpos) } if (clet == "") { cblock++;  timerID = setTimeout("Activate()",Wait) } else { timerID = setTimeout("SlideL()",Ticks) } } }& g% v) z" ]0 b1 Z$ [, }. v
function SlideLC() { if (clen <= cent - half) { ini = ms(clen);  tickered = ini + clet + ib + cstr;  document.Active.ASCII.value = tickered;  clen += 3;  iba -= 3;  ib = ms(iba);  timerID = setTimeout("SlideLC()",Ticks) } else { iba = cent - half;  ini = ms(iba);  ib = ms(iba);  document.Active.ASCII.value = ini + clet + cstr;  cstr = clet + cstr;  clen = 0;  cpos--;  if (cpos >= 0) { clet = Tape.charAt(cpos);  if (clet == " ") { cstr = " " + cstr;  cpos--;  clet = Tape.charAt(cpos) } timerID = setTimeout("SlideLC()",Ticks) } else { cblock++;  timerID = setTimeout("Activate()",Wait) } } }
6 B1 F. D$ ?) n5 u% g0 u2 y) v! w* rfunction SlideRC() { if (clen >= 0) { ini = ms(clen);  tickered = fs + cstr + ini + clet;  document.Active.ASCII.value = tickered;  clen -= 3;  timerID = setTimeout("SlideRC()",Ticks) } else { clen = cent + half;  cstr += clet;  document.Active.ASCII.value = fs + cstr;  cpos++;  clet = Tape.charAt(cpos);  if (clet == " ") { cstr = cstr + " ";  cpos++;  clet = Tape.charAt(cpos) } if (clet == "") { document.Active.ASCII.value = fs + Tape;  cblock++;  timerID = setTimeout("Activate()",Wait) } else { timerID = setTimeout("SlideRC()",Ticks) } } }: R" d2 V! k, C" ]9 G
function SlideCL() { if (clen > 0) { ini = ms(clen);  tickered = ini + clet + ib + cstr;  document.Active.ASCII.value = tickered;  clen -= 3;  iba += 3;  ib = ms(iba);  timerID = setTimeout("SlideCL()",Ticks) } else { iba = 0;  ib = ms(iba);  clen = cent - half;  ini = ms(clen);  document.Active.ASCII.value = ini + cstr;  cstr = cstr.substring(1,Tape.length);  cpos++;  clet = Tape.charAt(cpos);  if (clet == " ") { cstr = cstr.substring(1,Tape.length);  cpos++;  clet = Tape.charAt(cpos) } if (clet == "") { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Ticks) } else { timerID = setTimeout("SlideCL()",Ticks) } } }
, l' A2 t. f! p; ^+ ofunction SlideCR() { if (clen <= cent + half) { ini = ms(clen);  tickered = fs + cstr + ini + clet;  document.Active.ASCII.value = tickered;  clen += 3;  timerID = setTimeout("SlideCR()",Ticks) } else { clen = 0;  document.Active.ASCII.value = fs + cstr;  cstr = cstr.substring(0,cstr.length - 1);  cpos--;  half += 1;  if (cpos >= 0) {                ;  clet = Tape.charAt(cpos);  if (clet == " ") { cstr = cstr.substring(0,cstr.length - 1);  cpos--;  clet = Tape.charAt(cpos) } timerID = setTimeout("SlideCR()",Ticks) } else { cblock++;  timerID = setTimeout("Activate()",Ticks) } } }: e1 O" t+ _4 ^4 \6 o
function SlipR() { if (clen >= 0) { if (clen > tlen) { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Ticks) } else { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("SlipR()",Ticks) } } else { beg = 0 - clen;  tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen++;  timerID = setTimeout("SlipR()",Ticks) } }2 ~6 `, X" T4 p" L- q% B
function SlipL() { if (clen >= 0) { ini = ms(clen);  tickered = ini + Tape;  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("SlipL()",Ticks) } else { beg = 0 - clen;  if (beg == Tape.length) { document.Active.ASCII.value = "";  cblock++;  timerID = setTimeout("Activate()",Ticks) } else { tickered = Tape.substring(beg,tlen);  document.Active.ASCII.value = tickered;  clen--;  timerID = setTimeout("SlipL()",Ticks) } } }
) P# R7 M6 I6 yfunction SlipLet() { if (clen < tlen) { ini = ms(clen);  tickered = cstr + ini + clet;  document.Active.ASCII.value = tickered;  clen += 3;  timerID = setTimeout("SlipLet()",Ticks) } else { clen = 0;  cstr = cstr.substring(0,cstr.length - 1);  cpos--;  if (cpos >= 0) {           ;  clet = Tape.charAt(cpos);  if (clet == " ") { cstr = cstr.substring(0,cstr.length - 1);  cpos--;  clet = Tape.charAt(cpos) } timerID = setTimeout("SlipLet()",Ticks) } else { cblock++;  timerID = setTimeout("Activate()",Ticks) } } }' ~! z5 B1 @( G( i3 K( l5 C
function Split() { if (clen >= 0) { ini = ms(clen);  tickered = ini + hstr1 + ib + hstr2;  document.Active.ASCII.value = tickered;  clen--;  iba += 2;  ib = ms(iba);  timerID = setTimeout("Split()",Ticks) } else { if (clen <= 0 - hstr1.length) { cblock++;  timerID = setTimeout("Activate()",Ticks) } else { beg = 0 - clen;  tickered = hstr1.substring(beg,tlen);  document.Active.ASCII.value = tickered + ib + hstr2;  clen--;  iba += 2;  ib = ms(iba);  timerID = setTimeout("Split()",tTicks) } } }
& e2 S# K8 h# [, n. @: [" Zfunction Merge() { if (clen >= 0) { if (clen > cent - hstr1.length) { tickered = ini + hstr1 + hstr2;  document.Active.ASCII.value = tickered;  cblock++;  timerID = setTimeout("Activate()",Wait) } else { ini = ms(clen);  tickered = ini + hstr1 + ib + hstr2;  document.Active.ASCII.value = tickered;  clen++;  iba -= 2;  ib = ms(iba);  timerID = setTimeout("Merge()",Ticks) } } else { beg = 0 - clen;  tickered = hstr1.substring(beg,tlen);  document.Active.ASCII.value = tickered + ib + hstr2;  clen++;  iba -= 4;  ib = ms(iba);  timerID = setTimeout("Merge()",tTicks) } }
/ S* O7 f) v& P6 w2 i) a& y( v2 C% i) [9 H) ^8 M5 h( v2 z& I/ B5 s
/////////////////////////////////////////////////////////////////7 h( r+ Z3 I- E. ]4 c
//# User Vars5 S( X9 c. t2 S& _
// Number of blocks (see bottom) to be displayed.
3 C2 c( g& {6 {% Z- F" S; E  p: M0 b// ***COMMON ERROR***: Make sure to set this value according to the& x7 R2 q, C1 W* C' I! a4 D. _8 L
// number of blocks (always the last block # + 1)!, I& M& A+ t' S8 D' k) A
var max = 18- ^2 A( c8 |5 G/ q) ]- ^3 t
4 v, X6 V2 h$ O+ K, T  l2 `
// Don't change this!
' z6 Q; a& Z% g" D$ yvar blocks = new createArr(max)9 q, H0 n6 L/ T7 v$ y/ q/ n' h

+ {; Y% c4 H# I& D& }// Length of textbox8 {6 q/ S8 O6 `- {% o1 d
// ***COMMON ERROR: If you change this or the length of the( K5 j) {4 U& v3 Q; z* A. ?
// textbox, remember to change the other accordingly.***
' G; u! N! j0 v" s* qvar len = 50% q0 u0 b- J6 f7 a: M+ c; I

1 b" u0 Q9 l5 T2 S( {// Number of time to loop ALL blocks (use 0 for unlimited)
1 {; z% W$ a1 xvar loops = 0& |9 J4 ~) ~9 w) Q2 P8 r7 r8 O
1 g* J, |! u2 e/ j" N
// If you set the number of loops, set the final messege9 S5 A8 H# J' k8 C1 I
var end = 'End of "ActiveASCII" by Neal Kanodia.'
( b' o! B7 i; P/ z
! a* k! ?$ K; e9 \0 G/ }// Use this format for each string (starting at 0 until 1 less# b. K$ R) q! ]. l: k6 r3 q) C" Z
// than max):2 q2 h7 U: J# t
// block(#block,"Text to display","Method",#ticks,#wait); c! M! Z+ I+ d, _; K+ k
// example: block(0,"1st block.","Scroll Left",25,0)0 d% W+ ~" W1 z! g5 O5 H
// ***COMMON ERROR***: If you add a block INCREASE MAX BY 1* e) ~& Z# d' @- t* J5 q% X. {
// ***COMMON ERROR***: If you remove a block DECREASE MAX BY 1" o: E' S* G5 R4 _: _* q
// ***COMMON ERROR***: Check the spelling of your methods!!!
8 M' s, k; N3 L& [block(17,"欢迎光临七色风!","display",0,500)4 p/ A- j# k6 B; `+ u0 |
block(18,"新一代网络商城!","display center",0,500)6 x! W4 k& m, W; j, B: `& f4 t
block(2,"新一代企业信息系统!","scroll left",25,0)% f) M3 m5 A1 V( K4 K
block(3,"全新的自助建站模式!","scroll right",25,0)3 i1 D+ E, Q3 W; N
block(4,"欢迎光临七色风!","scroll lc",25,500)
9 G- o! B# U! M4 s5 Z" k; oblock(5,"欢迎光临!","scroll rc",25,500)7 O2 ]! Q! l  K1 w8 \* B
block(6,"欢迎光临!","scroll cl",25,0)
3 a9 f: _1 r- ^" Sblock(7,"欢迎光临!","scroll cr",25,0)# b6 B$ L; F( S2 g. z
block(8,"欢迎光临!","slide left",25,500). u: C( z' Z: g& ]/ \" W6 V. `
block(9,"欢迎光临!","slide lc",25,500)
: \  E/ _7 N" k1 e9 eblock(10,"欢迎光临!","slide rc",25,500)
* f* w; P( w  z( X9 X$ rblock(11,"欢迎光临!","slide cl",25,0)
! T4 E9 ]5 M% H5 i0 J- \$ b3 Q$ pblock(12,"国内域名：110元!","slide cr",25,0)
: L. S) a' g7 H0 i2 q" c7 _block(13,"国际域名：58元!","slip left",25,0)
) H2 ~. f" W6 ^; e0 ]" Xblock(14,"欢迎光临中讯数据!","slip right",25,0)6 ]$ s5 U* H/ E' G
block(15,"欢迎您的光临","slip letter",25,0)
5 _1 _# l7 s. ]$ z% N7 p8 `; k! Nblock(16,"","display",0,500)9 v( m9 v! ~% u7 G) C
block(0,"欢迎欢迎!","merge",25,1000)
. A) K- N. C& k4 s$ ublock(1,"欢迎!","split",25,0)
5 S! t  Y* ~5 D% Q' F$ X9 D+ ?3 B//End User Vars
1 {, D4 A) r' ~. G3 o/////////////////////////////////////////////////////////////////
7 w; b* O; j$ M& _- Z( X# |, B: p: m( W, q
// Don't change!!!
# L. p. i7 b& {: G, L# Uvar tlen = 2.4 * len
- C; K! m9 ^! y3 v+ C; ?+ svar cent = tlen / 2.2# |9 R; S. y/ Q' |( l
var clen = null
5 B8 o" d7 T3 svar tickered = null3 P5 Z; e7 G& J
var ini = null
& S( h& P. Q! Z& i5 U' O! Wvar iloop = 0
3 C1 ]" x4 }8 @8 W/ ~if (loops == 0) {iloop = 1}4 O7 [$ h) f8 w( M& I
var cblock = 0
2 ?- D/ q" T$ K3 h( G; {# Hvar timerID = null
3 A. g) t( [4 H& V, K5 cvar beg = null
( F  C# j0 J& B1 u7 ^' lvar clet = null
, w1 E" a; x) t; Q& D% g* i& }var cstr = null3 M) _% I" n' P$ h  r/ _+ M2 _
var cpos = null
0 T# P/ s( o/ W  j- I& y& \var ib = null
- B0 n& p) k& ^var iba = null& m9 l; r+ c) W) ]0 \
var fs = null
) Y* }; m- `# o& Z6 y  pvar hstr1 = null
4 V% W5 k, s/ S- jvar hstr2 = null
2 b- e3 t! e+ k4 n6 A- Z7 g0 r<!-- end  -->
  r5 x. r& ^# R1 n2 |# y7 {  K- l$ u/ `2 W( d
</script>9 r1 m% E& C1 F4 c
<script language="JavaScript">
, i) Q! _1 t" T: z3 ^4 Q<!--
# [% h8 o$ w5 J: X/ }+ {2 f  ?document.write('<form name="Active" onSubmit="0">')0 y% o4 v6 O. Z) p  d
document.write('<input type="text" name="ASCII" size="50">')5 Y, ~3 i9 e9 ]" u9 @% c( w
document.write('</form>'): X5 g. Y4 l( [+ M0 a  n
Activate()( S+ f- x6 t' s9 v) c+ y# n
<!-- end -->* D- k, I. d. k* p1 o1 {7 ]- Y
) h# `5 G4 c; ~7 a/ i; e( ]& M+ F0 A
</script>