// (c) 2004 Copyright by Mike Knueppel, Mill Creek, WA! All rights reserved.
var MKLNumberArray=new Array(100)
var MKLNumberFrom=0
var MKLNumberTo=9
var MKLNumberCounter=0
var MKLNumberPosition=0
var MKLNumberSelection=""
var MKToday=new Date();
var MKCurrentRandom=0;
function MKRandom()
{
 MKCurrentRandom=Math.pow(MKCurrentRandom+Math.PI,3);
 MKCurrentRandom=MKCurrentRandom-Math.floor(MKCurrentRandom);
 return MKCurrentRandom;
}
function MKLuckySet(MKLInputType,MKLInputData)
{
 // Today
 if (MKLInputType==0) 
  {
   MKCurrentRandom=MKToday.getDate()*.1+MKToday.getMonth()*.01+MKToday.getYear()*.001+MKLInputData
  }
 return "";
}
function MKLuckyRange(MKLInputFrom,MKLInputTo)
{
 MKLNumberFrom=MKLInputFrom
 MKLNumberTo=MKLInputTo
 for (counter=0;counter<=MKLNumberTo-MKLNumberFrom;counter++)
  {
   MKLNumberArray[counter]="N"+(MKLNumberFrom+counter)
  }
 MKLNumberCounter=MKLNumberTo-MKLNumberFrom+1;
 return "";
}
function MKLuckyNumber(MKLInputType,MKLInputSet)
{
 if (MKLInputSet==1 || MKLNumberCounter<1)
  {
   MKLNumberCounter=MKLNumberTo-MKLNumberFrom+1;
  }
 if (MKLInputType==0)
  {
   MKLNumberPosition=Math.floor(Math.random()*MKLNumberCounter)
  }
 if (MKLInputType==1)
  {
   MKLNumberPosition=Math.floor(MKRandom()*MKLNumberCounter)
  }
 MKLNumberSelection=MKLNumberArray[MKLNumberPosition]
 MKLNumberArray[MKLNumberPosition]=MKLNumberArray[MKLNumberCounter-1]
 MKLNumberArray[MKLNumberCounter-1]=MKLNumberSelection
 MKLNumberCounter--
 return MKLNumberSelection.substring(1,MKLNumberSelection.length);
 //return MKCurrentRandom+"P"+MKLNumberPosition+"C"+MKLNumberCounter;
}