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

zw2004

<script language="JavaScript">4 ~! h: p/ C$ L9 W1 d" V
2 D3 s' }" l, V. s% g
<!-- ActiveASCII by Neal Kanodia (please, don't delete this line)' M; b  }9 \0 u2 `  w, S7 l
% s2 R% |% w8 t* {
function createArr(num) { for(var i = 0; i < num; i++) { this = null } }+ S: K1 Q* T  i/ p- }8 O
function fillArr(tx,me,ti,wa) { this.text = tx;  this.method = me.toLowerCase();  this.ticks = ti;  this.wait = wa }
+ {9 D$ H, f9 J. W7 T* N9 Cfunction block(num,txt,mthod,tcks,wit) { blocks[num] = new fillArr(txt,mthod,tcks,wit) }3 k5 S  m( ~: Z1 T
function ms(unt) { var sp = "";  for( var i = 1; i <= unt; i++ ) { sp += " " } return(sp) }
. }5 y& z! y! {4 L5 d0 yfunction 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 }9 o6 _% f& f/ z2 t% K: l; x1 @& d
if (meth == "0") { document.Active.ASCII.value = end }; B+ R" p/ a) V( `0 b7 T
if (meth == "display") { Tape = blocks[cblock].text;  Wait = blocks[cblock].wait;  Display() }+ W9 y. @$ s; r( @- [
if (meth == "display center") { Tape = blocks[cblock].text;  Wait = blocks[cblock].wait;  half = Tape.length / 2;  DisplayC() }% _. J9 f" U& O
if (meth == "scroll left") { clen = tlen;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  ScrollL() }, K$ a! j5 J' R% L' j$ Y3 \1 ?
if (meth == "scroll right") { clen = 0 - blocks[cblock].text.length;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  ScrollR() }
" b  P7 g9 b7 R7 Dif (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() }1 @5 Z" ^( Z1 Y$ Q3 Z9 p
if (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() }
8 |7 F, h9 g9 I) u' v: Oif (meth == "scroll cl") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  half = Tape.length / 2;  clen = cent - half;  ScrollCL() }& Z! `6 [- O' `4 o1 |+ D
if (meth == "scroll cr") { Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  tTicks = Ticks * 2;  half = Tape.length / 2;  clen = cent - half;  ScrollCR() }
7 _3 ?9 m7 N& \. O2 k" D6 Aif (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() }& o+ j2 n" {3 x
if (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() }/ o6 D1 l' C8 V* b
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() }
1 y0 [0 m: X0 B/ O# oif (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() }9 e2 |7 i4 L3 a( w2 k) |8 [/ a
if (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() }6 \9 r8 j, f" C' D) h2 K
if (meth == "slip left") { clen = 0;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  SlipL() }4 `* o8 W2 T( ?$ f" L4 R
if (meth == "slip right") { clen = 0;  Tape = blocks[cblock].text;  Ticks = blocks[cblock].ticks;  SlipR() }. A0 z+ l) Z4 W" r9 m/ ]
if (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() }; u. @" ~5 W9 v
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() }6 z7 |  T$ S1 T; z& C
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() } }7 h8 @% B0 Z3 B
function Display() { document.Active.ASCII.value = Tape;  cblock++;  timerID = setTimeout("Activate()",Wait) }- g# p/ o" H* I- b! G' a
function DisplayC() { var temp = cent - half;  ini = ms(temp);  document.Active.ASCII.value = ini + Tape;  cblock++;  timerID = setTimeout("Activate()",Wait) }
' x2 e0 a0 ]6 w9 }5 h5 Xfunction 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) } } }
; A; r4 w, G' Z8 U  A  cfunction 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) } }. L  c- k* n/ H) C7 ?
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) } } }- s9 O) p! R- ~5 H
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) } }
0 ~( i6 J/ m' W9 Z% N: z, z* O3 _: [/ nfunction 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) } } }8 \# m' J4 K* B' Z! }
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) } }
3 C8 C* P  g2 n$ y3 n/ L3 Afunction 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) } } }2 l% b# B. ^6 w4 t1 g
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) } } }
7 }0 o2 G3 R) T; ^, I& g2 h' k+ Lfunction 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) } } }
, x! F1 l$ r- S4 ~% u; d: w0 s/ \  ^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) } } }9 e8 M: T5 L2 B
function 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) } } }
4 z* H4 B; K. N" tfunction 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) } }
5 ]5 W2 D$ ?- ifunction 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) } } }
+ [- e5 B( S& g. v& L/ @* Ufunction 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) } } }: L1 {6 `+ p9 j# |6 T( a2 ]; h
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) } } }
) t; q1 ]1 j& \0 {' ~3 |function 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) } }
# E5 ^9 U2 n7 h6 y: m1 y
# M) K6 D# T' ]) ]" |  Q; R/////////////////////////////////////////////////////////////////. @7 y+ X! V  r  y3 o" R7 L
//# User Vars( P" A' k# }! l( L* P* X5 C  e+ ~
// Number of blocks (see bottom) to be displayed.
% q" [) j8 E) M8 M5 U: F// ***COMMON ERROR***: Make sure to set this value according to the$ ~" S/ J4 M$ C) b+ O
// number of blocks (always the last block # + 1)!$ w  A3 l0 T$ ]3 R8 \
var max = 188 T4 N3 i2 y- H# Y# F7 k9 R% E' e
# W2 V3 H1 F7 U: j7 d, W& s
// Don't change this!1 M5 M) N# S+ z* e5 c  I
var blocks = new createArr(max)
. ~8 e" B4 }9 p% e
+ M; Q6 O9 q' K, m6 i// Length of textbox
& Z  Y- `5 l3 v1 z// ***COMMON ERROR: If you change this or the length of the- |. }& }, O3 k, _' P
// textbox, remember to change the other accordingly.***
6 r! T5 F/ x- U5 Q; ]  ^: w: jvar len = 50
( v. ]+ @. F, s$ v/ Y& g  O( f. `8 J/ M& y! o
// Number of time to loop ALL blocks (use 0 for unlimited)
" X. e2 k3 o7 A; x2 _# B. Avar loops = 0
+ t, R1 E, Q& M$ C  e* R( r2 J! a4 Y. l% Z) H
// If you set the number of loops, set the final messege7 o. }) s2 R+ o; H( T6 V
var end = 'End of "ActiveASCII" by Neal Kanodia.'
- S6 B- o: h4 v) [/ Y4 f( O% N
3 ]) ^, z" S* _* C  j// Use this format for each string (starting at 0 until 1 less4 z  O$ _5 Z9 d8 P' ]/ d/ R! u. D
// than max):
/ H6 N0 P* ^% l// block(#block,"Text to display","Method",#ticks,#wait)5 ^, |5 Z# `0 R/ r
// example: block(0,"1st block.","Scroll Left",25,0)8 W) F: O3 A8 M% d/ v5 I
// ***COMMON ERROR***: If you add a block INCREASE MAX BY 15 f  H, d4 U; o) h
// ***COMMON ERROR***: If you remove a block DECREASE MAX BY 1! d+ l. a4 p0 e# I& N" y
// ***COMMON ERROR***: Check the spelling of your methods!!!9 G. }6 v8 w2 O2 n$ _  M
block(17,"欢迎光临七色风!","display",0,500)
" Z" k: G, G6 A" G$ y( ^block(18,"新一代网络商城!","display center",0,500)
0 O' o) O, D; ^; O, i4 `. x% ?block(2,"新一代企业信息系统!","scroll left",25,0). B- q, R1 G! _! w! `+ V9 l- w
block(3,"全新的自助建站模式!","scroll right",25,0)
/ ?9 N; ^4 f  g, p. `7 V9 }" q8 iblock(4,"欢迎光临七色风!","scroll lc",25,500)
9 p8 I6 C9 F& a4 U) D6 x; fblock(5,"欢迎光临!","scroll rc",25,500)
+ t( d* h) R. d& W9 Qblock(6,"欢迎光临!","scroll cl",25,0)
% P$ }8 T2 e. r. q" ~# Wblock(7,"欢迎光临!","scroll cr",25,0): S0 [- ~- ^2 x& u; T' U( U
block(8,"欢迎光临!","slide left",25,500)* G: ~. W: t# E
block(9,"欢迎光临!","slide lc",25,500)
/ R5 L+ g# }4 t5 `1 d( T; j6 q# m, f1 ?block(10,"欢迎光临!","slide rc",25,500)
1 Q" p" `+ n" [$ s- h& b: ^3 Ublock(11,"欢迎光临!","slide cl",25,0)
3 k- g' u" [/ ~$ z6 N, Q! O8 yblock(12,"国内域名：110元!","slide cr",25,0)2 E2 [1 j% }; G+ S, }2 X
block(13,"国际域名：58元!","slip left",25,0)
7 R4 |, y! F2 L" a5 G$ v4 U8 `# Ublock(14,"欢迎光临中讯数据!","slip right",25,0)
7 z' ~9 l7 S9 {  s+ [block(15,"欢迎您的光临","slip letter",25,0)& s$ C- X% l5 p" F( K" Z: v6 D
block(16,"","display",0,500)
- N% g0 \& O9 Q% F  yblock(0,"欢迎欢迎!","merge",25,1000)2 B2 y8 d. s  {( S" ?5 s# k1 F+ o9 O
block(1,"欢迎!","split",25,0)
" a- }  T  g) \2 T) e9 u4 c, D/ \//End User Vars
3 ?' z( N$ Y0 M- k8 w$ @( j2 @4 a  p/////////////////////////////////////////////////////////////////, K) G/ s( U/ [  p/ E) i

1 b& w$ F  l- K$ b! u' J// Don't change!!!; h; H2 {* I3 ]$ x9 n
var tlen = 2.4 * len; S$ }+ J( x: @& J7 g
var cent = tlen / 2.2
) x% J1 f# J6 e  T- j1 Avar clen = null* E! B( i0 \' r
var tickered = null1 j5 [+ u; _$ j) A3 h
var ini = null/ T/ k9 Q# O0 ~6 q( x. v* p8 M! ?
var iloop = 0
6 o) l4 |$ Q, P3 Y; zif (loops == 0) {iloop = 1}
7 E3 ]+ e% L9 N, l) uvar cblock = 0# w) ~/ Y4 L& ^3 A( i
var timerID = null
( {) T; s4 L! x7 X$ f- Qvar beg = null1 K2 P+ A6 l( F6 D
var clet = null
# O! G' \7 m2 u) D2 F5 fvar cstr = null% _$ \; U- q' |2 e
var cpos = null. u* r3 u! e( v( g2 d% F% I/ C! k
var ib = null
4 V' n+ u+ P# tvar iba = null) u8 S/ a( i- H1 v# z1 x
var fs = null. S0 G. Z2 x9 d7 u* ?$ ~. u: P
var hstr1 = null% G( r" |: E# U9 z+ m) d- a
var hstr2 = null
+ G/ R+ t) S( H( z" m0 S# n<!-- end  --># }. h8 y2 _3 P) v# k$ F9 V5 k

/ {! \) Q6 d4 O% j</script>& A, u4 o7 h9 P/ d3 T
<script language="JavaScript">
' x7 h/ u6 Z! q# L; W6 \" y9 O" U<!-- 7 n# q, N) A0 H0 A4 }
document.write('<form name="Active" onSubmit="0">')
: {( e+ J; s: ?- ydocument.write('<input type="text" name="ASCII" size="50">')
# n$ }( q  z( b" Odocument.write('</form>')! j( \7 R2 [4 z7 O$ j
Activate()
& q8 ?* p* r4 B) g! _( T, w3 J<!-- end -->
) |/ d, P6 I9 |2 \% {: T5 U% Z' d) v! L  d. T! F+ I0 c
</script>