MIRZAY-E script generates 3 song names selected at random from 3 sections of a song list. Then a 4-th song name is generated by random selection from the entire list of all 3 sections. Script provides uniqueness of the 4-th name (it never repeats any of the other 3 names).
| Notes: | Entire HTMLScript code is placed between </HEAD> and <BODY> tags. | |
| HTMLScript line right above <BODY> tag selects a background at random out of 9 opportunities. |
<!-- Alexander Mirzayan Songs (English List) 02/27/1998–12/14/1998 -->
<!-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ -->
<!-- DAVAR/RUSSIAN/SONGS/MIRZAYAN/MIRZAY-E.HTS -->
<!-- Copyright (C) 1998 by Vladimir Veytsel -->
<HTML>
<HEAD>
<TITLE>Mirazayn Songs (Russian at Davar Web Site)</TITLE>
</HEAD>
<LET S1 ="HAMLET">
<LET S2 ="OHTELLME">
<LET S3 ="FORGIVE">
<LET S4 ="HOPE"> <!-- End of the 1-st section -->
<LET S5 ="ROMANFRI">
<LET S6 ="STILLIFE">
<LET S7 ="CHRISTMS">
<LET S8 ="RATCATCH">
<LET S9 ="DEATHFRI">
<LET S10="21TYRANT">
<LET S11="MEXTANGO"> <!-- End of the 2-nd section -->
<LET S12="FRESHET"> <!-- End of the entire list -->
<LET Sect_1= 4> <!-- Highest index of the 1-st section -->
<LET Sect_2=11> <!-- Highest index of the 2-nd section -->
<LET Total =12> <!-- Total number of songs in the entire list -->
<LET T =tm_min*tm_sec>
<LET I1=(T MOD Sect_1)+1> <!-- Ind within 1-st section -->
<LET I2=(T MOD (Sect_2-Sect_1))+Sect_1+1> <!-- Ind within 2-nd section -->
<LET I3=(T MOD (Total -Sect_2))+Sect_2+1> <!-- Ind within 3-rd section -->
<LET Valid=0> <!-- Index valid (non-repeatable) flag -->
<WHILE Valid EQ 0> <!-- Repeat until valid index is generated -->
<LET I=((dyn_tm_min*dyn_tm_sec) MOD Total)+1>
<LET Valid=1>
<IF I EQ I1>
<LET Valid=0>
</IF>
<IF I EQ I2>
<LET Valid=0>
</IF>
<IF I EQ I3>
<LET Valid=0>
</IF>
</WHILE>
<LET All =S&[I]>
<LET Sect_1=S&[I1]>
<LET Sect_2=S&[I2]>
<LET Sect_3=S&[I3]>
<LET J=((tm_min*tm_sec) MOD 9)+1>
<BODY BACKGROUND="../../../PAPER00&[J].JPG" BGCOLOR=White TEXT=Black LINK=Blue ALINK=Fuchsia VLINK=Purple>
<FONT FACE="Times New Roman" SIZE=3>
<A NAME="Top"></A>
<CENTER>
<TABLE>
<TR>
<TD>
<I>
<FONT COLOR=Green>Go to:</FONT> <A HREF="../../../HOME.HTM">Site entry</A>
<FONT COLOR=Green>|</FONT> <A HREF="../../../DIRECT.HTS">Direct</A>
<FONT COLOR=Green>|</FONT> <A HREF="../../../INDEX.HTS">Index</A>
<FONT COLOR=Green>|</FONT> <A HREF="../../RUSSIAN.HTS">Russian</A>
<FONT COLOR=Green>|</FONT> <A HREF="../SONGS.HTS">Russian songs</A>
<FONT COLOR=Green>|</FONT> <A HREF="MIRZAY-R.HTS">Russian list</A>
<FONT COLOR=Green>|</FONT> <FONT COLOR=Gray>Song lyrics</FONT>
<!--
<FONT COLOR=Green>|</FONT> <A HREF="MIRZAY-L.HTS">Song lyrics</A>
-->
<FONT COLOR=Green>|</FONT> <A HREF="#Bottom">List bot</A>
</I>
</TD>
</TR>
<TR><TD><HR></TD></TR>
<TR>
<TD ALIGN=Center>
<FONT COLOR=Teal>Real play sample song selected from:</FONT> <A HREF="&[All].RAM">All songs</A>
<FONT COLOR=Teal>|</FONT> <A HREF="&[Sect_1].RAM">1-st section</A>
<FONT COLOR=Teal>|</FONT> <A HREF="&[Sect_2].RAM">2-nd section</A>
<FONT COLOR=Teal>|</FONT> <A HREF="&[Sect_3].RAM">3-rd section</A>
</TD>
</TR>
<TR><TD><HR></TD></TR>
</TABLE>
<FONT SIZE=5 COLOR=Red><B><I><U> Alexander Mirzayan</U></I></B></FONT>
(To enable playback
<A HREF="http://www.real.com/products/player/index.html">download</A>
& install <FONT COLOR=Red>Real Player</FONT>)
<BR>
<TABLE> <!-- Keep all WIDTHs at the top row -->
<TR><TD WIDTH=380><I><FONT COLOR=Red><B>H</B></FONT>amlet
(Dedication to Vladimir Visotsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="HAMLET.RA">Save & play</A> 675 Kb
<A HREF="HAMLET.RAM">Real play</A> 5:21
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>H</B></FONT>ope</I></TD>
<TD></TD>
<TD><A HREF="HOPE.RA">Save & play</A> 326 Kb
<A HREF="HOPE.RAM">Real play</A> 2:35
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>F</B></FONT>orgive Me, Lord</I></TD>
<TD></TD>
<TD><A HREF="FORGIVE.RA">Save & play</A> 349 Kb
<A HREF="FORGIVE.RAM">Real play</A> 2:46
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>O</B></FONT>h Tell Me, My Friend ...</I></TD>
<TD></TD>
<TD><A HREF="OHTELLME.RA">Save & play</A> 609 Kb
<A HREF="OHTELLME.RAM">Real play</A> 4:50
</TD>
</TR>
</TABLE>
<A NAME="Sect_2"></A>
<TABLE>
<TR><TD WIDTH=380><HR></TD><TD></TD>
<TD><I><FONT COLOR=Green>Go to:</FONT> <A HREF="#Top">Top</A>
<FONT COLOR=Green>|</FONT> <A HREF="#Sect_3">Next</A>
<FONT COLOR=Green>|</FONT> <A HREF="#Bottom">Bottom</A>
</I>
</TD>
</TR>
</TR>
<TR><TD><I><FONT COLOR=Red><B>L</B></FONT>etters to the Roman Friend
(Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="ROMANFRI.RA">Save & play</A> 503 Kb
<A HREF="ROMANFRI.RAM">Real play</A> 3:59
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>S</B></FONT>till-Life (Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="STILLIFE.RA">Save & play</A> 524 Kb
<A HREF="STILLIFE.RAM">Real play</A> 4:12
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>C</B></FONT>hristmas (Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="CHRISTMS.RA">Save & play</A> 277 Kb
<A HREF="CHRISTMS.RAM">Real play</A> 2:12
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>P</B></FONT>ied Piper (Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="PIEDPIPR.RA">Save & play</A> 318 Kb
<A HREF="PIEDPIPR.RAM">Real play</A> 2:31
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>O</B></FONT>n a Friend's Death (Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="DEATHFRI.RA">Save & play</A> 401 Kb
<A HREF="DEATHFRI.RAM">Real play</A> 3:11
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>T</B></FONT>o One Tyrant
(Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="21TYRANT.RA">Save & play</A> 293 Kb
<A HREF="21TYRANT.RAM">Real play</A> 1:53
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>M</B></FONT>exican Tango
(Joseph Brodsky)
</I>
</TD>
<TD></TD>
<TD><A HREF="MEXTANGO.RA">Save & play</A> 271 Kb
<A HREF="MEXTANGO.RAM">Real play</A> 2:09
</TD>
</TR>
</TABLE>
<A NAME="Sect_3"></A>
<TABLE>
<TR><TD WIDTH=380><HR></TD><TD></TD>
<TD><I><FONT COLOR=Green>Go to:</FONT> <A HREF="#Top">Top</A>
<FONT COLOR=Green>|</FONT> <A HREF="#Sect_2">Previous</A>
<FONT COLOR=Green>|</FONT> <A HREF="#Bottom">Bottom</A>
</I>
</TD>
</TR>
<TR><TD><I><FONT COLOR=Red><B>F</B></FONT>reshet (Oleg Chuhontsev)
</I>
</TD>
<TD></TD>
<TD><A HREF="FRESHET.RA">Save & play</A> 295 Kb
<A HREF="FRESHET.RAM">Real play</A> 2:20
</TD>
</TR>
</TABLE>
<TABLE>
<TR><TD><HR></TD></TR>
<TR>
<TD ALIGN=Center>
<FONT COLOR=Teal>Play:</FONT> <A HREF="PLAY-ALL.RAM">All songs</A> 37:59
<FONT COLOR=Teal>|</FONT> <A HREF="PLAY-1.RAM">1-st section</A> 15:32
<FONT COLOR=Teal>|</FONT> <A HREF="PLAY-2.RAM">2-nd section</A> 20:07
<FONT COLOR=Teal>|</FONT> <A HREF="PLAY-3.RAM">3-rd section</A> 2:20
</TD>
</TR>
<TR><TD><HR></TD></TR>
<TR>
<TD>
<I>
<FONT COLOR=Green>Go to:</FONT> <A HREF="../../../HOME.HTS">Site entry</A>
<FONT COLOR=Green>|</FONT> <A HREF="../../../DIRECT.HTS">Direct</A>
<FONT COLOR=Green>|</FONT> <A HREF="../../../INDEX.HTS">Index</A>
<FONT COLOR=Green>|</FONT> <A HREF="../../RUSSIAN.HTS">Russian</A>
<FONT COLOR=Green>|</FONT> <A HREF="../SONGS.HTS">Russian songs</A>
<FONT COLOR=Green>|</FONT> <A HREF="MIRZAY-R.HTS">Russian list</A>
<FONT COLOR=Green>|</FONT> <FONT COLOR=Gray>Song lyrics</FONT>
<!--
<FONT COLOR=Green>|</FONT> <A HREF="MIRZAY-L.HTS">Song lyrics</A>
-->
<FONT COLOR=Green>|</FONT> <A HREF="#Top">List top</A>
</I>
</TD>
</TR>
</TABLE>
</CENTER>
<A NAME="Bottom"></A>
</FONT>
</BODY>
</HTML>