1. US flag

I made a US flag program, and shrouded it. If anybody wants it
unshrouded, you must guess what my middle initial stands for(Z). HinT:
It's a Z name blink

new topic     » topic index » view message » categorize

2. Re: US flag

ok, here it is:

flag.ex:

ùwarning

îB=26
îC={
48,49,50,51,52,53,54,55,56,57},
D=C&{
65,66,67,68,69,70},
E=C&{
45,43,46,35}
æF()
ç-(B,0)
éæ
îG=0,
H=-1,
I=1
îJ=-2
îK=1
ïL(¡M)
çM>=0
éï
ïM(¡N)
çN>=JÄN<=255
éï
L N
_O
L P
M Q
æR()
M S
üQ=Jâ
ü«(O)â
üP<=½(O)â
S=O[P]
P=P+1
çS
à
çH
éü
à
ç+(N)
éü
à
S=Q
Q=J
çS
éü
éæ
äS(M T)
Q=T
éä
äT()
M U
èKê
U=R()
üö+(U,{
32,9,10})â
É
éü
éè
S(U)
éä
îU={
110,116,39,34,92,114},
V={
10,9,39,34,92,13}
æW(M X)
L Y
Y=+(X,U)
üY=0â
çI
à
çV[Y]
éü
éæ
æX()
M Y
Y=R()
üY=92â
Y=W(R())
üY=Iâ
ç{I,0}
éü
éü
üR()!=39â
ç{I,0}
à
ç{G,Y}
éü
éæ
æY()
«Z
M a
Z={}
èKê
a=R()
üa=HÅa=10â
ç{I,0}
éü
üa=34â
É
ëa=92â
a=W(R())
üa=Iâ
ç{I,0}
éü
éü
Z=Z&a
éè
ç{G,Z}
éæ
ïZ(¡a)
ça=-1Åa=+1
éï
æa()
M b
Z c,d
L e
¡f
+g,h,i,j
c=+1
g=0
d=+1
i=0
e=0
b=R()
üb=45â
c=-1
ëb !=43â
S(b)
éü
b=R()
üb=35â
èKê
b=R()
f=+(b,D)-1
üf>=0â
e=e+1
g=g*16+f
à
S(b)
üe>0â
ç{G,c*g}
à
ç{I,0}
éü
éü
éè
éü
èb>=48Äb<=57ê
e=e+1
g=g*10+(b-48)
b=R()
éè
üb=46â
b=R()
h=10
èb>=48Äb<=57ê
e=e+1
g=g+(b-48)/h
h=h*10
b=R()
éè
éü
üe=0â
ç{I,0}
éü
üb=101Åb=69â
b=R()
üb=45â
d=-1
ëb !=43â
S(b)
éü
b=R()
üb>=48Äb<=57â
i=b-48
b=R()
èb>=48Äb<=57ê
i=i*10+b-48
b=R()
éè
S(b)
à
ç{I,0}
éü
à
S(b)
éü
j=1
üd>=0â
åk=1ìiê
j=j*10
éå
à
åk=1ìiê
j=j*0.1
éå
éü
ç{G,c*g*j}
éæ
æb()
M c
«d,e
T()
c=R()
ü+(c,E)â
S(c)
ça()
ëc=123â
d={}
èKê
T()
c=R()
üc=125â
ç{G,d}
à
S(c)
éü
e=b()
üe[1]!=Gâ
çe
éü
d=_(d,e[2])
T()
c=R()
üc=125â
ç{G,d}
ëc !=44â
ç{I,0}
éü
éè
ëc=34â
çY()
ëc=39â
çX()
ëc=-1â
ç{H,0}
à
ç{I,0}
éü
éæ
æf(¡g)
N=g
O=0
Q=J
çb()
éæ
æh(«i)
O=i
P=1
Q=J
çb()
éæ
îj=2
îk=#B8000,
c=#B0000,
d=30
îe=9,
g=10,
i=13
ïl(¡m)
çm>=0Äm<=255
éï
ÆîVC_COLOR=1,
VC_MODE=2,
VC_LINES=3,
VC_COLUMNS=4,
VC_XPIXELS=5,
VC_YPIXELS=6,
VC_NCOLORS=7,
VC_PAGES=8
Æævideo_config()
ç-(i,0)
éæ
Ææget_active_page()
ç-(d,0)
éæ
ïm(«n)
ç½(n)=2Än[1]>=1Än[2]>=1
Än[1]<=200Än[2]<=500
éï
Æätext_color(l n)
-(e,n)
éä
Æädisplay_text_image(m n,«o)
+p,q
¡r,s,t
«u
u=video_config()
üu[VC_MODE]=7â
p=c
à
p=k
éü
r=u[VC_COLUMNS]
ür=40â
p=p+get_active_page()*2048
à
p=p+get_active_page()*4096
éü
ün[1]<1Ån[2]<1â
ç
éü
t=u[VC_LINES]-n[1]+1
ü½(o)>tâ
üt<=0â
ç
éü
o=o[1..t]
éü
q=p+(n[1]-1)*r*j
+(n[2]-1)*j
s=2*(u[VC_COLUMNS]-n[2]+1)
åv=1ì½(o)ê
ü½(o[v])>sâ
üs<=0â
ç
éü
o[v]=o[v][1..s]
éü
+(q,o[v])
q=q+r*j
éå
éä
Æäbk_color(l n)
-(g,n)
éä
Ææsave_text_image(m o,m p)
«q,r,s
+t,u
¡v,n
s=video_config()
üs[VC_MODE]=7â
u=c
à
u=k
éü
v=s[VC_COLUMNS]
üv=40â
u=u+get_active_page()*2048
à
u=u+get_active_page()*4096
éü
t=u+
(o[1]-1)*v*j+
(o[2]-1)*j
q={}
n=p[2]-o[2]+1
åw=o[1]ìp[1]ê
r=-({t,n*j})
q=_(q,r)
t=t+v*j
éå
çq
éæ
«o
o=save_text_image({1,1},{25,80})
¦()
»(1,1)
text_color(15)
bk_color(1)
¼(1,{
42,42,42,42,42,42,42,42,42})
¼(1,{
10,42,42,42,42,42,42,42,42,42})
¼(1,{
10,42,42,42,42,42,42,42,42,42})
»(1,10)
bk_color(4)
¼(1,{
32,32,32,32,32,32,32,32,32,32,32,32,32})
»(2,10)
bk_color(7)
¼(1,{
32,32,32,32,32,32,32,32,32,32,32,32,32})
»(3,10)
bk_color(4)
¼(1,{
32,32,32,32,32,32,32,32,32,32,32,32,32})
bk_color(7)
»(4,1)
¼(1,{
»(2,10)
bk_color(7)
¼(1,{
32,32,32,32,32,32,32,32,32,32,32,32,32})
»(3,10)
bk_color(4)
¼(1,{
32,32,32,32,32,32,32,32,32,32,32,32,32})
bk_color(7)
»(4,1)
¼(1,{
32,32})
»(5,1)
bk_color(4)
¼(1,{
32,32})
ü+(o)â
éü
üF()â
éü
¦()
display_text_image({1,1},o)

Well, that's the end of it. You STILL get the original source code if
you guess what the Z stands for.

_____________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com
Or call Juno at (800) 654-JUNO [654-5866]

new topic     » goto parent     » topic index » view message » categorize

3. Re: US flag

Would it be, perhaps *deep breath*:

Zac, Zacarias, Zacariaz, Zacario, Zacaris, Zaccaria, Zacchaeus, Zach,
Zachaios, Zachariah,
Zacharias, Zacharie, Zacharjasz, Zachary, Zachery, Zack, Zackry, Zaed,
Zafar, Zahid, Zahair,
Zahavi, Zahir, Zahur, Zaid, Zak, Zakai, Zakarias, Zakarij, Zakariyya,
Zaki, Zakur, Zameer,
Zamir, Zan, Zander, Zane, Zaquarias, Zareb, Zarek, Zavad, Zavdiel, Zavier,
Zavior, Zay, Zayd,
Zbigniew, Zbyhnev, Zdenek, Zdeslav, Zdzislaw, Zeb, Zebadiah, Zebedee,
Zebulon, Zebulun,
Zechariah, Zecharya, Zedekiah, Zeeman, Zehariah, Zeheb, Zeke, Zeki,
Zelimir, Zemariah, Zeno,
Zenobios, Zenon, Zenos, Zenzel, Zephaniah, Zephyrus, Zerach, Zerachia,
Zerem, Zerika, Zesiro,
Zethus, Zeus, Zev, Zevach, Zevachiah, Zevadiah, Zevid, Zevulun, Zhanmiao,
Zhihua, Zhiyu,
Zhong, Zhu, Zhuang, Zig, Ziggy, Zikomo, Zimon, Zimran, Zimri, Zinan,
Zinova, Zinte, Zipkiyah,
Zitkaduta, Zitomir, Ziv, Zivan, Ziven, Ziya, Ziyad, Zlatan, Zlavador,
Zollie, Zolly, Zoltan,
Zomeir, Zorya, Zotom, Zsigmond, Zuberi, Zubin, Zuhayr, Zwi, Zygmunt, or
Zyrillus?

Snortboy

And,

His Friend,

The Internet

new topic     » goto parent     » topic index » view message » categorize

4. Re: US flag

wrong. guess again

_____________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com
Or call Juno at (800) 654-JUNO [654-5866]

new topic     » goto parent     » topic index » view message » categorize

5. Re: US flag

Noah Smith wrote:
> Would it be, perhaps *deep breath*:
> Zac, Zacarias, Zacariaz, Zacario, Zacaris, Zaccaria, Zacchaeus, Zach,
> Zachaios, Zachariah,
> Zacharias, Zacharie, Zacharjasz, Zachary, Zachery, Zack, Zackry, Zaed,
> Zafar, Zahid, Zahair,
> Zahavi, Zahir, Zahur, Zaid, Zak, Zakai, Zakarias, Zakarij, Zakariyya,
> Zaki, Zakur, Zameer,
> Zamir, Zan, Zander, Zane, Zaquarias, Zareb, Zarek, Zavad, Zavdiel, Zavier,
> Zavior, Zay, Zayd,
> Zbigniew, Zbyhnev, Zdenek, Zdeslav, Zdzislaw, Zeb, Zebadiah, Zebedee,
> Zebulon, Zebulun,
> Zechariah, Zecharya, Zedekiah, Zeeman, Zehariah, Zeheb, Zeke, Zeki,
> Zelimir, Zemariah, Zeno,
> Zenobios, Zenon, Zenos, Zenzel, Zephaniah, Zephyrus, Zerach, Zerachia,
> Zerem, Zerika, Zesiro,
> Zethus, Zeus, Zev, Zevach, Zevachiah, Zevadiah, Zevid, Zevulun, Zhanmiao,
> Zhihua, Zhiyu,
> Zhong, Zhu, Zhuang, Zig, Ziggy, Zikomo, Zimon, Zimran, Zimri, Zinan,
> Zinova, Zinte, Zipkiyah,
> Zitkaduta, Zitomir, Ziv, Zivan, Ziven, Ziya, Ziyad, Zlatan, Zlavador,
> Zollie, Zolly, Zoltan,
> Zomeir, Zorya, Zotom, Zsigmond, Zuberi, Zubin, Zuhayr, Zwi, Zygmunt, or
> Zyrillus?

What?  No Zebediah?  <grin>

--
\/\/ood/\/\age

--------------------------------------------------------------------
* My ICQ# is:                    17965736
* Page me online:                http://wwp.mirabilis.com/17965736
* Send me E-mail Express:        17965736 at pager.mirabilis.com
* Visit my web page:             http://www.biosys.net/woodmage
--------------------------------------------------------------------

new topic     » goto parent     » topic index » view message » categorize

6. Re: US flag

Actually, I checked for it specifically:

It was under the alternate spelling of "Zebadiah"

snortboy

John Worthington wrote:

> What?  No Zebediah?  <grin>
>
> --
> \/\/ood/\/\age
>
> --------------------------------------------------------------------
> * My ICQ# is:                    17965736
> * Page me online:                http://wwp.mirabilis.com/17965736
> * Send me E-mail Express:        17965736 at pager.mirabilis.com
> * Visit my web page:             http://www.biosys.net/woodmage
> --------------------------------------------------------------------
>

new topic     » goto parent     » topic index » view message » categorize

7. Re: US flag

Whoops!  That's what I get for just searching and not reading.  ;')

Noah Smith wrote:
>
> Actually, I checked for it specifically:
>
> It was under the alternate spelling of "Zebadiah"
>
> snortboy
>
> John Worthington wrote:
>
> > What?  No Zebediah?  <grin>
> >
> > --
> > \/\/ood/\/\age
> >
> > --------------------------------------------------------------------
> > * My ICQ# is:                    17965736
> > * Page me online:                http://wwp.mirabilis.com/17965736
> > * Send me E-mail Express:        17965736 at pager.mirabilis.com
> > * Visit my web page:             http://www.biosys.net/woodmage
> > --------------------------------------------------------------------
> >

--
\/\/ood/\/\age

--------------------------------------------------------------------
* My ICQ# is:                    17965736
* Page me online:                http://wwp.mirabilis.com/17965736
* Send me E-mail Express:        17965736 at pager.mirabilis.com
* Visit my web page:             http://www.biosys.net/woodmage
--------------------------------------------------------------------

new topic     » goto parent     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu