// This page hosted by GeoCities
// GeoCities
// Get your own Free Home Page
// ----------------------------------------------
copyrightnotice =
"© Copyright 1999, 2000 MIKE LOUIS GRIEBEL, DENMARK. All rights reserved."
// ----------------------------------------------
//
// ----------------------------------------------
//test = true
//test = false
// ----------------------------------------------
function reportjavalib() {
if (test) { alert('Loaded ' + javalibfilename) }
}
// -------------------------------------------
javalibfilename = "gmtqlib.js"
reportjavalib()
// -------------------------------------------
// ----------------------------------------------
// QLIB
// ----------------------------------------------
var qlib_vqs = new makearray ( 100 )
var qlib_vas = new makearray ( 100 )
var qlib_vdidknow = new makearray ( 100 )
var qlib_vdidknowsum = 0
var qlib_vcurrent = -1
var qlib_vcurmax = 0
var qlib_vrandomize = true
var aaa = ""
var aaa = ""
function qlib_reset () {
res = true
qlib_vqs = new makearray ( 100 )
qlib_vas = new makearray ( 100 )
qlib_vdidknow = new makearray ( 100 )
qlib_vdidknowsum = 0
qlib_vcurrent = -1
qlib_vcurmax = 0
qlib_vrandomize = true
return res
}
function qlib_addq (qq,aa) {
//alert ( 'qlib_addq< ' + qq + '#' + aa + ">>>" + qlib_vcurmax )
res = true
qlib_vqs [ qlib_vcurmax ] = qq
qlib_vas [ qlib_vcurmax ] = aa
qlib_vdidknow [ qlib_vcurmax ] = false
qlib_vcurmax++
return res
}
function qlib_vqselem (ii) {
res = qlib_vqs [ ii ]
return res
}
function qlib_vaselem (ii) {
res = qlib_vas [ ii ]
return res
}
function qlib_list () {
res = ""
for ( ii=0; ii