mirror of
https://github.com/house-of-vanity/hexound.ru.git
synced 2026-05-07 07:19:59 +00:00
256 lines
27 KiB
Modula-2
256 lines
27 KiB
Modula-2
|
coming soon (chip) kollaps og d.kool u @ hhv. fd og gfb(tm). ã @ et rigtig sommermodul ? < <lavet i foraaret 96, > 7 hvor der jo var K ) masser af sne... ~ #
|
|||
|
|
@ K
|
|||
|
|
|
|||
|
|
|
|||
|
|
|
|||
|
|
M.K.ü? þL@¬PI ‚ ” þ0 I ” þL X I ‚ þ0 ” I ü0 ” âð I þ0 ” I ü0 ” âðX I ü0 ” ü0 Öð I þ0 ” ¦0 âðSPG t ÖðS0 G t âðX Sð G S0 t G ¦0 tSð ªð G S0 t G ¦0 t ªðX G ¦0 t ¦0 ¾ð G S0 t ü0 ÖðSPX … ¾ð þ0 âð X … ÖðX Öð X þ0 … âð âð X ü0 … Öð þð X þ0 … âð X ü0 … þðX ªð X ü0 … ü0 ð X þ0 … ªð¦0 ªð
|
|||
|
|
P8 ƒ ðS0 8 ƒ ªðX 8 S0 ƒ 8 ¦0 ƒ âð 8 S0 ƒ 8 ¦0 ƒ âðX 8 ¦0 ƒ ¦0 8 S0 ƒ ü? ÖL@SPX ‚ … þ0 X … ÖL X X ‚ þ0 … X ü0 … X þ0 … X ü0 … X âð X ü0 … :0 þð X 0 … âð€0 Öð@PG t þð@0 G t ÖðX G @0 t G €0 t G @0 t G €0 t X âð G €0 t ¦0 þð G S0 t âðú0 Öð@PI ” þð}0 I ” ÖðX âð I }0 ” I ú0 ” âð þðSPW S0 u
|
|||
|
|
ð W ¦0 u þðX þð G ¦0 t
|
|||
|
|
ð¦0 âð G S0 t þðü0 þð¬PI ” âð þ0 I ” þðX I þ0 ” I ü0 ” þ0 I ” ü2 I ”
|
|||
|
|
2 t‚ I
|
|||
|
|
” @2 ISt‚
|
|||
|
|
”
|
|||
|
|
¦?ht‚P8 ‚
|
|||
|
|
ƒ
|
|||
|
|
¦0 8
|
|||
|
|
ƒ
|
|||
|
|
S0 �8
|
|||
|
|
ƒ
|
|||
|
|
¦0 8
|
|||
|
|
ƒ
|
|||
|
|
X ht SPG
|
|||
|
|
t ðzS? G
|
|||
|
|
t
|
|||
|
|
¦0 G
|
|||
|
|
t
|
|||
|
|
¦0 G
|
|||
|
|
�t
|
|||
|
|
ü?ht ¬PI
|
|||
|
|
”
|
|||
|
|
zü? I
|
|||
|
|
”
|
|||
|
|
þ0 I
|
|||
|
|
”
|
|||
|
|
ü0 I
|
|||
|
|
”
|
|||
|
|
X �I
|
|||
|
|
”
|
|||
|
|
þ0 I t
|
|||
|
|
”
|
|||
|
|
ü0 St I
|
|||
|
|
”
|
|||
|
|
ü0 I
|
|||
|
|
”
|
|||
|
|
¦?àt P8
|
|||
|
|
ƒhz¦? 8
|
|||
|
|
ƒ
|
|||
|
|
S0 �8
|
|||
|
|
ƒ
|
|||
|
|
¦0 8
|
|||
|
|
ƒ
|
|||
|
|
X ht SPG
|
|||
|
|
t ðzS? G
|
|||
|
|
t
|
|||
|
|
¦0 G
|
|||
|
|
t
|
|||
|
|
¦0 G
|
|||
|
|
�t
|
|||
|
|
ü? SPX ðt âz …
|
|||
|
|
ü? X
|
|||
|
|
…
|
|||
|
|
þ0 X
|
|||
|
|
…
|
|||
|
|
ü0 X
|
|||
|
|
…
|
|||
|
|
X X
|
|||
|
|
…
|
|||
|
|
ü0 X
|
|||
|
|
…
|
|||
|
|
:0 ªL@ X �…
|
|||
|
|
0 X … ªL ú0 ð þPX … }0 ªð X … L X ¾ð X … ªðÐ0 Öð X … ¾ð¦0 âð
|
|||
|
|
P8 ƒ ÖðS0 8 ƒ âðX ªð 8 ƒ Ð0 8 ƒ ªðú0 ð þPX … }0 X ªð … ðX ¾ð X … Ð0 Öð X ªð … ¾ð¦0 âð þP' r ÖðS0 ' r âðX Sð
|
|||
|
|
P8 ƒ 0 8 ƒSðü0 þð¬�I ” þ0 Öð PI ” þðX âð �I þ0 ” Öð þð PI ü0 ” âðS0 âðS�G t þð¦0 PG ¦0 t âðX
|
|||
|
|
ðÅ�Y ¦0 • 0 PY
|
|||
|
|
0 •
|
|||
|
|
ðü0 þð¬�I ” þ0 PI ” þðX �I þ0 ” PI ü0 ” I ÖL þ0 ” I ü0 ” X I þ0 �” (ü0 I 0 þ0 ” 8:1 L@¬PI ü3 þ ” ‚ ‚ I ” L I þ ” ‚ I ” âð I ” I ” âð I ” Öð I ” ¦3ð âðSPG t Öð G t âð Sð G t G tSð ªð G t G t ªð G t ¾ð G t ü3 ÖðSPX … ¾ð âð X … Öð Öð X … âð âð X … Öð þð X … âð X … þð ªð X … ð X … ªðS3 ªð
|
|||
|
|
P8 ƒ ð 8 ƒ ªð 8 ƒ 8 ƒ âð 8 ƒ 8 ƒ âð 8 ƒ 8 ƒ ü0 ÖL@SPX ‚ … X … ÖL X ‚ … X … X … X … âð X … þð X … âð€3 Öð@PG t þð G t Öð G t G t G t G t âð G t þð G t âðú3 Öð@PI ” þð I ” Öð âð I ” I ” âð¦3 þðSPW u
|
|||
|
|
ð W
|
|||
|
|
u þðS0 þð G t
|
|||
|
|
ð âð G
|
|||
|
|
t þðü3@ þð¬PI ” âð I ” þð I ”
|
|||
|
|
I ”
|
|||
|
|
I ”
|
|||
|
|
I ” þ2 ‚)XY $¬ }‚)XY ü‚$XYü? @¬PI @ ‚ ” ‚ þ0 I ” X I þ0 ” I ü0 ” âð I ¾ð þ0 ” I ü0 ” X I ü0 ” ü0 Öð I ªð þ0 ” ¦0 âðSPG ¾ð t S0 G t X Sð G þðS0 t G ¦0 t ªð G þðS0 t G ¦0 t X G ¦0 t ¦0 ¾ð G ðS0 t ü0 ÖðSPX ªð … þ0 âð X ¾ð … X Öð X ªð þ0 … âð X ¾ðü0 … þð X Öð þ0 … X ü0 … X ªð X þCðü0 … ü0 ð X âCð þ0 … ¦0 ªð
|
|||
|
|
P8 ÖCð ƒ S0 8 ƒ X 8 S0 ƒ 8 ¦0 ƒ âð 8
|
|||
|
|
CðS0 ƒ 8 ¦0 ƒ X 8 ¦0 ƒ ¦0 8 S0 ƒ ü? ÖL@SPX þ @ ‚ … ‚ þ0 X … X X þ0 … X ü0 … X þ0 … X ü0 … X âð X ðü0 … :0 þð X 0 … €0 Öð@PG@ð t @0 G t X G @0 t G €0 t G @0 t G €0 t X âð GSð€0 t ¦0 þð G S0 t ú0 Öð@PI}ð ” }0 I ” X âð I
|
|||
|
|
ð}0 ” I ú0 ” þðSPWSðS0 u
|
|||
|
|
ð W ð¦0 u X þð G Öð¦0 t ¦0 âð G ¾ðS0 t ü0 þð¬PI Öð ” þ0 I ” X I þ0 ” IX ü0 ” þ0 IX ” I ” t‚ I
|
|||
|
|
” IS|
|
|||
|
|
”
|
|||
|
|
ú0 L@ þPX … }0 ªð X … L X ¾ð X … ªðÐ0 Öð X … ¾ð¦0 âð
|
|||
|
|
P8 ƒ ÖðS0 8 ƒ âðX ªð 8 ƒ Ð0 8 ƒ ªðú0 ð þPX … }0 X ªð … ðX ¾ð X … Ð0 Öð X ªð … ¾ð¦0 âð þP' r ÖðS0 ' r âðX Sð
|
|||
|
|
P8h‚ ƒ 0 8 X ƒSL ü0 þð¬�I ” þ0 Öð PI ” þðX âð �I þ0 ” Öð þð PI ü0 ” âðS0 âðS�G t þð¦0 PG ¦0 t âðX
|
|||
|
|
ðÅ�Y ¦0 • 0 PY
|
|||
|
|
0 •
|
|||
|
|
ðü0 þð¬�I ” þ0 PI ” þðX �I þ0 ” PI ü0 ” I þ0 ” I ü0 ” X üŒ I þ0 �” ü0 I þ0 ”üŒü0 }Œ ¬PI ” þ0 @ð I ”}ŒX Sð I þ0 ”@ð }ð I ü0 ”SðS0 SðSPG t}ð¦0 G ¦0 tSðX ”ðÅPY ¦0 • 0 Y
|
|||
|
|
0 ¬ •”ð¬0 ¬¬PG ¬ t Ö0 G¬ t¬X G¬ Ö0 t G ¬0 t G Ö0 t G ¬0 0 t X h|@ G¬‚ Ö0
|
|||
|
|
t ¬0 G:‚ X
|
|||
|
|
t¦‚ €0 ¬PYSt‚
|
|||
|
|
•
|
|||
|
|
@0 ht Y
|
|||
|
|
•
|
|||
|
|
X Y”t @0
|
|||
|
|
•
|
|||
|
|
Åt Y \0
|
|||
|
|
•
|
|||
|
|
:0 }PYàt
|
|||
|
|
•
|
|||
|
|
0 Y
|
|||
|
|
•
|
|||
|
|
X ht Y 0
|
|||
|
|
•
|
|||
|
|
\0 Y .0
|
|||
|
|
•
|
|||
|
|
€0 ¬PYSt
|
|||
|
|
•
|
|||
|
|
@0 Y hz •
|
|||
|
|
X Y”t @0
|
|||
|
|
•
|
|||
|
|
Åt Y \0
|
|||
|
|
•
|
|||
|
|
0 ¬P'àt
|
|||
|
|
Pr
|
|||
|
|
�'
|
|||
|
|
�r
|
|||
|
|
Å0 ¬Œ ÅP8 Pƒ
|
|||
|
|
�8 �ƒ¬Œ¬0 @Œ ¬ �• Ö0 þð PY �•@ŒXY 𬠕 �• þð Ö0 @ð PY �• ð:0 ð¬ �t@ð 0 PG �t ðXYS𬠕 �t 0 PG �tSðü0 }ð¬ þ�s þ0 @ð þP7 þ�s}ðXYS𬠕 þ�s@ð þ0 }ð þP7 þ�sSð¦0 Sð¬ �”}ðS0 PI �”SðXY¬ð¬ • �” S0 PI �”¬ð€0 àð¬ @�t @0 }ð@PG @�tàðXY¬ð¬ • @�t}ð@0 àð@PG @�t¬ð¬0 üð¬ �•àð Ö0 ¬ð PY �•üðXY@𬠕 �•¬ð Ö0 PY �•@ðú0 @ð¬ .�ƒ }0 }ð.P8 .�ƒ@ðXYS𬠕 .�ƒ}ð}0 @ð.P8 .�ƒSð:0 ð¬ �u@ð 0 PW �u ðXY\p̬ • Ì �t 0 À PGXY �tXY¬0 Åp̬ Ì �• Ö0 hpÌ PY Ì �•Å| XY”p̬ • Ì �•hð Ö0 ÅpÌ PY Ì �•”ð:0 ”p̬ Ì �tÅð 0 À PG �t”ðXYàp̬ • Ì �t 0 À PG �tàðü0 p̬ Ì þ�s þ0 ÅpÌ þP7 Ì þ�sðXYàp̬ • Ì þ�sÅð þ0 pÌ þP7 Ì þ�sàð¦0 àp̬ Ì �”ðS0 pÌ PI Ì �”àðXY\p̬ • Ì �”ðS0 À PI �”\ð€0 ¦p̬ Ì@�t @0 pÌ@PG Ì@�t¦ðXY\p̬ • Ì@�tð@0 ¦pÌ@PG Ì@�t\ð¬0 Ðp̬ Ì �•¦ð Ö0 \pÌ PY Ì �•ÐðXYÅp̬ • Ì �•\ð Ö0 À PY �•Åðú0 Åp̬ Ì.�ƒ }0 pÌ.P8 Ì.�ƒÅðXYàp̬ • Ì.�ƒð}0 ÅpÌ.P8 Ì.�ƒàð:0 ”pÌ �W Ì PuÅð 0 À �W Pu”ð:0 ÖL@ PG �t 0 ¾ð PGXY PtXY¬0 ªL@ PY • Ö0 Y • ªL XY Y • • Ö0 ªð Y • Å0 Y • ªð â0 ð Y • XY ªð Y • • ð â0 ¾ð Y • ªðü0 Öð þP7 s ¾ð þ0 7 s ÖðXY âð 7 • s þ0 þð 7 s âð:0 7 s þð 0 âð 7 s XY Öð 7 • s âð 0 7 s Öð€0 þð 8 ƒ @0 8 ƒ þðXY 8 • ƒ @0 8 ƒ \0 8 ƒ .0 8 ƒ XY âð 8 • ƒ .0 Öð 8 ƒ âð:0 âð PW u Öð 0 W u âðXY W • u 0 W u Å0 G t â0 G t XY Öð G • t XY ¾ð G XY t Öð¬0 ªL@ PY ‚ • Ö0 Y • ªL XY Y • • Ö0 ªð Y • Å0 Y • ªð â0 ð Y • XY ªð Y • • ð â0 ¾ð Y • ªðü0 Öð þP7 s ¾ð þ0 7 s ÖðXY âð 7 • s þ0 þð 7 s âð:0 7 s þð 0 âð 7 s XY Öð 7 • s âð 0 7 s Öð€0 þð 8 ƒ @0 8 ƒ þðXY 8 • ƒ @0 8 ƒ €0 8 ƒ @0 8 ƒ XY âð 8 • ƒ @0 þð 8 ƒ âð¦0
|
|||
|
|
ð
|
|||
|
|
P8 ƒ þðS0 8 ƒ
|
|||
|
|
ðXY 8 • ƒ S0 8 ƒ ¦0 8 ƒ S0 8 ƒ XYSD 8 • ƒ
|
|||
|
|
ƒ
|
|||
|
|
ðü0
|
|||
|
|
L@ þP7 s þ0 7
|
|||
|
|
s
|
|||
|
|
L XY 7 • þC s þ0 þC 7 þC s ü0 þC 7 þ þC s þ þ0 þC 7 þ þC s þXY þð 7 þ • s þ þ0 7 þ s þðü0 þP7 s þ0 7 s XY 7 • s þ0 7 s ü0 7 s þ0 7 s XY 7 • s þ0 7 þD âD s ü0
|
|||
|
|
þPG ÊJ t þ0
|
|||
|
|
G
|
|||
|
|
t XY
|
|||
|
|
G
|
|||
|
|
• t þ0
|
|||
|
|
G
|
|||
|
|
t ü0
|
|||
|
|
G
|
|||
|
|
t þ0
|
|||
|
|
G
|
|||
|
|
t XY
|
|||
|
|
G
|
|||
|
|
• t þ0
|
|||
|
|
G
|
|||
|
|
t }0 ¾J X
|
|||
|
|
… ¾0
|
|||
|
|
X
|
|||
|
|
… XY
|
|||
|
|
X
|
|||
|
|
• … ¾0
|
|||
|
|
X
|
|||
|
|
… }0
|
|||
|
|
X
|
|||
|
|
… ¾0
|
|||
|
|
X
|
|||
|
|
… XY
|
|||
|
|
X
|
|||
|
|
• … ¾0
|
|||
|
|
XSJ @D … }0
|
|||
|
|
Y.J • ¾0
|
|||
|
|
Y
|
|||
|
|
• XY
|
|||
|
|
Y
|
|||
|
|
• • ¾0
|
|||
|
|
Y
|
|||
|
|
• }0
|
|||
|
|
Y
|
|||
|
|
• ¾0
|
|||
|
|
Y
|
|||
|
|
• XY
|
|||
|
|
Y
|
|||
|
|
• • ¾0
|
|||
|
|
Y
|
|||
|
|
• :0 J ðPI
|
|||
|
|
” 0
|
|||
|
|
I
|
|||
|
|
” XY
|
|||
|
|
I
|
|||
|
|
• ” 0
|
|||
|
|
I
|
|||
|
|
” :0
|
|||
|
|
I
|
|||
|
|
” 0
|
|||
|
|
I
|
|||
|
|
” XY
|
|||
|
|
I
|
|||
|
|
• ” 0
|
|||
|
|
I
|
|||
|
|
” :0
|
|||
|
|
âP8 âJ ƒ 0
|
|||
|
|
8
|
|||
|
|
ƒ XY
|
|||
|
|
8
|
|||
|
|
• ƒ 0
|
|||
|
|
8
|
|||
|
|
ƒ :0
|
|||
|
|
8
|
|||
|
|
ƒ 0
|
|||
|
|
8
|
|||
|
|
ƒ XY
|
|||
|
|
8
|
|||
|
|
• ƒ 0
|
|||
|
|
8
|
|||
|
|
ƒ ¬0 ÖJ ÖP7
|
|||
|
|
s Ö0
|
|||
|
|
7
|
|||
|
|
s XY
|
|||
|
|
7
|
|||
|
|
• s Ö0
|
|||
|
|
7
|
|||
|
|
s ¬0
|
|||
|
|
7¬J s Ö0
|
|||
|
|
7
|
|||
|
|
s XY
|
|||
|
|
7
|
|||
|
|
• s Ö0
|
|||
|
|
7
|
|||
|
|
s ¬0 XJ 7
|
|||
|
|
s Ö0
|
|||
|
|
7
|
|||
|
|
s XY
|
|||
|
|
7
|
|||
|
|
• s Ö0
|
|||
|
|
7
|
|||
|
|
s ¬0
|
|||
|
|
7
|
|||
|
|
s Ö0
|
|||
|
|
7XY s •XY
|
|||
|
|
7 Y • s •à0
|
|||
|
|
7XY sX•¬0 @Œ ÖP7 s Ö0 7 s@ŒXY 7 • s Ö0 7 s ¬0 ð 7 s Ö0 7 s ðXY 7 • s Ö0
|
|||
|
|
ð 7 s :0 ð âP8 ƒ
|
|||
|
|
ð 0 8 ƒ ðXY¬ð 8 • ƒ 0 8 ƒ¬ð:0 Öð 8 ƒ 0 8 ƒ ÖðXY 8 • ƒ 0 ðð 8 ƒ ¬0
|
|||
|
|
ð ÖP7 s ðð Ö0 ð 7 s
|
|||
|
|
ðXY
|
|||
|
|
ð 7 • s ð Ö0 ð 7 s
|
|||
|
|
ð¬0 @ð 7 s ð Ö0 7 s@ðXY Öð 7 • s Ö0 Êð 7 s Öð:0 Öð âP8 ƒ Êð 0 8 ƒ ÖðXY 8 • ƒ 0 8 ƒ :0 ð 8 ƒ 0 8 ƒ ðXY 8 • ƒ 0 8 ƒ ¬0
|
|||
|
|
Œ ÖP7 s Ö0 7 s
|
|||
|
|
ŒXY 7 • s Ö0 7 s ¬0 7 s Ö0 7 s XY 7 • s ð0 ð 7 @ð s 0
|
|||
|
|
ð 8 ƒ
|
|||
|
|
0 8 ð ƒ@ðXY 8
|
|||
|
|
ð • ƒ
|
|||
|
|
0 8 ƒ 0 8 ƒ
|
|||
|
|
0 8 ƒ XY 8 • ƒ 0 ð 8 @ð ƒ €0
|
|||
|
|
ð X … ð@0 X@ð …
|
|||
|
|
ðXY ð X • … @0 X … ð:0 @ð âP8 ƒ 0 Sð 8 ƒ@ðXY@ð 8 • ƒS 0 ð 8XY ƒX•¬0
|
|||
|
|
ð ÖP7 Y s Œ Ö0 7 s
|
|||
|
|
ŒXY 7 • s Ö0 7 s ¬0 7 s Ö0 7 s XY 7 • s ð0 ð 7 @ð s 0
|
|||
|
|
ð 8 ƒ ð
|
|||
|
|
0 8@ð ƒ
|
|||
|
|
ðXY 8 • ƒ
|
|||
|
|
0 8 ƒ 0 8 ƒ
|
|||
|
|
0 8 ƒ XY 8 • ƒ 0 ð 8 @ð ƒ €0
|