func Init()
  if(linked(Random) and linked(doRandom))
    lng.decl_loc_var(rnd, 'integer')
  end
end

func _create(data)
  fvar(m)
  m = Min
  return('Random(' && Max && '-' && m && ' + 1) + ' && m)
end

func doRandom(_data)
  if(linked(Random))
    println(rnd, ' := ', _create(_data), ';')
    event(onRandom, rnd)
  else
    event(onRandom, _create(_data))
  end
end

func doRandomize(_data)
  println('Randomize;')
end

func Random()
  if(linked(doRandom))
    return(rnd)
  else
    return(_create(_data))
  end
end