џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ--- ";DP:‡#Ќ2,""/(кž:‡@42,"DISCOUNTING"/.ф‡/Oю‡"DECREASING WHAT AMOUNT?":‡/bј‡"TYPE <0000>"/‡‰"AND TO QUIT ---- ";D:‡/˜ … DГ0000Ї890/ЌADГD­DP:DSГDЌAD/Ы ‡"DISCOUNT FROM: ";D/ы*‡"DISCOUNT PERCENTAGE: ";DP0 4‡"AMOUNT OF DISCOUNT: ";AD0+>‡"NEW REDUCED AMOUNT: ";DS0‚H:ƒFOR MC-10 COMPUTER CHANGE THE "PRINT#-2" TO "LPRINT" IN THE NEXT LINE'0ЋR‡#Ќ2,D;"---";AD;"=";DS:DГ0:ADГ0:DSГ00Щ\‡:‡"HIT ANY KEY TO GO ON"0гfO$Гџ’0шp… O$Г""Ї870:„7300юzž1„‡@134,"MARK-UP +%- DISCOUNT"17Ž‡@290,"DO YOU WANT TO START AGAIN?"1W˜‡:‰" --- --- ";R$1mЂ… R$Г"Y"Ї270:„9401sЌž1”Ж‡@134,"MARK-UP +%- DISCOUNT"1ВР‡@320,"TO BEGIN AGAIN --"1аЪ‡"TYPE AND "1кд‡:‡:‡""Ї870:„7300юzž1„‡@134,"MARK-џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ&$:ƒ COPYRIGHT 1990 FALSOFT, INC&C :ƒ PUT A COCO 2 IN ALL RAM&O:ƒ MODE&V:ƒ&Д(† 26,80,142,128,0,127,255,222,166,132,127,255,223,167,132,48,1,140,255,0,38,239,28,159,57&Ъ2€ AГ&HE00 Ѕ &HE18&е<:  X&тF: ’ A,X&щP‹ &џZЂ &HE00:’ 65503,0'dŠ COPYRIGHT 1990 FALSOFT, INC&C :ƒ PUT A COCO 2 IN ALL RAM&O:ƒ MODE&V:ƒ&Д(† 26,80,142,128,0,127,255,222,166,132,127,255,223,167,132,48,1,140,255,0,38,239,28,159,57&Ъ2€ AГ&HE00 Ѕ &HE18&е<:  X&тF: ’ A,X&щP‹ &џZЂ &HE00:’ 65503,0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ л&$:ƒ COPYRIGHT 1990 FALSOFT, INC&B :ƒMARK-UP +-+-+ DISCOUNT'&\:ƒBY GORDON E. FOUTS'&:ƒTHIS PROGRAM WAS WRITTEN FOR THE TRS-80 COLOR COMPUTER'&н(:ƒFOR NON-EXTENDED BASIC, DELETE LINES 60 THRU 260''Q2:ƒFOR THE MC-10 COMPUTER CHANGE "PRINT#-2" TO "LPRINT" IN LINES: 470, 600, 720, AND 850''m<:ƒGRAPHIC SCREEN (+%-)''}FШ4,1:М:П1,1'“PТ(100,50),11,,.75'ІZ€ TГ0Ѕ1000:‹ T'СdТ(102,45),3,,1,.25,.75'нnТ(115,24),50,,.5,.05,.3'№x€ TГ0Ѕ1000:‹ T( ‚Л(165,30)Ќ(95,135),Н(Œ€ TГ0Ѕ1000:‹ T(3–Т(155,125),11,,.75(F € TГ0Ѕ1200:‹ T(VЊ€ DГ62Ѕ97Љ1(kДЛ(50,D)Ќ(50,D),Н(sО‹ D(…Ш€ TГ0Ѕ700:‹ T(•в€ AГ32Ѕ67Љ1(ЎмЛ(A,79)Ќ(A,79),Н:‹ A(Сц€ TГ0Ѕ2000:‹ T(г№€ MГ183Ѕ218Љ1(ьњЛ(M,79)Ќ(M,79),Н:‹ M)€ TГ0Ѕ3000:‹ T:М):ƒMARK-UP +%- DISCOUNT')2ž:€ TГ0Ѕ1000:‹ T)S"‡@134,"MARK-UP +%- DISCOUNT")f,€ TГ0Ѕ1000:‹ T)Š6‡@224,"WHICH DO YOU WANT TO DO?)Љ@‡@290,"MARK-UP":‡@323,"OR")ЩJ‰" DISCOUNT ";MD$)ЯT‡)ѓ^‰" ARE YOU SURE ";YN$* h… YN$Г"Y"Ї380:„370*rž:Ѕ310*/|ž:… MD$Г"M"Ї390:„640*T†€ TГ0Ѕ200:‡@106,"MARKING-UP":‹ T*~‡@192,"WHAT PERCENTAGE OF MARK-UP?":‡*Еš‡@258,"TYPE THE PERCENTAGE":‡@290,"AS A DECIMAL":‡*кЄ‰" -- 4%=.04 -- 40%=.40 -- ";MP*§Ў‡:‰" ARE YOU SURE ";YN$+И… YN$Г"Y"Ї470:„450+ Тž:Ѕ400+Ь:ƒFOR MC-10 COMPUTER, CHANGE THE TWO "PRINT#-2"'S TO "LPRINT" IN THE NEXT LINE'+Ќж‡#Ќ2,"MARKING-UP BY ++++ ";MP:‡#Ќ2,""+Фрž:‡@42,"MARKING-UP"+Ъъ‡+ыє‡"INCREASING WHAT AMOUNT?":‡+ўў‡"TYPE <0000>",#‰"AND TO QUIT ---- ";M:‡,4… MГ0000Ї890,HAMГM­MP:MSГMЋAM,i&‡"MARK-UP FROM: ";M,‹0‡"MARK-UP PERCENTAGE: ";MP,­:‡"AMOUNT OF MARK-UP: ";AM,ЯD‡"NEW MARKED-UP AMOUNT: ";MS-&N:ƒFOR MC-10 COMPUTER CHANGE THE "PRINT#-2" TO "LPRINT" IN THE NEXT LINE'-NX‡#Ќ2,M;"+++";AM;"="MS:MГ0:AMГ0:MSГ0-lb‡:‡"HIT ANY KEY TO GO ON"-vlG$Гџ’-‹v… G$Г""Ї620:„480-Б€€ TГ0Ѕ200:‡@106,"DISCOUNTING":‹ T-мŠ‡@192,"WHAT PERCENTAGE OF DISCOUNT?":‡.”‡@258,"TYPE THE PERCENTAGE":‡@290,"AS A DECIMAL":‡.8ž‰" -- 4%=.04 -- 40%=.40 -- ";DP.`Ј‡:‰" ARE YOU SURE ";YN$.wВ… YN$Г"Y"Ї720:„700.ƒМž:Ѕ650.уЦ:ƒFOR MC-10 COMPUTER CHANGE THE TWO "PRINT#-2"'S TO "LPRINT" IN THE NEXT LINE'/а‡#Ќ2,"DISCOUNTING BY -00010 * USING WILDCARDS 00020 * 00030 * BY RICHARD ESTRADO 00040 * ON 89-10-27 00050 * 00060 * 00070 START CLRA 00080 LDX #COPY 00090 STX $C211 00100 COPY LBSR $C935 00110 CLR UCOUNT 00120 CLR TCOUNT 00130 CLR DRIVE 00140 CLR SDCF 00150 LDA $EB 00160 STA SDRIVE 00170 STA DRIVE 00180 00190 LDY #$094C 00200 LOOK LDA ,Y+ 00210 CMPA #'* 00220 BEQ GTPARM 00230 CMPY #$0957 00240 BNE LOOK 00250 LBRA $D3BC 00260 GTPARM CLRA 00270 CLRB 00280 JSR $A5 00290 BEQ SKIP 00300 CLRA 00310 COMA 00320 STA SDCF 00330 LDB #$A5 00340 JSR $B26F 00350 JSR $A5 00360 SUBB #2 00370 SUBA #'0 00380 LBLO END 00390 CMPA #3 00400 LBHI END 00410 STA DRIVE 00420 JSR $9F 00430 SKIP JSR $A5C7 00440 EXTRAC LDX #TABLE 00450 STX PLACE 00460 SETUP JSR $C79D 00470 JSR $B958 00480 LDD #$1102 00490 STA $00EC 00500 STB $EA 00510 LDB #3 00520 STORE STB $ED 00530 LDX #$600 00540 STX $EE 00550 JSR $D6F2 00560 COMP TFR X,U 00570 LDA ,X 00580 BEQ ADVAN 00590 COMA 00600 LBEQ GETNAM 00610 * COMPARE THE FILE NAME 00620 SERCH1 LDY #$094C 00630 COMP1 LDA ,Y 00640 CMPA #'* 00650 LBEQ SERCH2 00660 CMPA ,U+ 00670 BNE ADVAN 00680 CMPY #$953 00690 BEQ SERCH2 00700 LEAY 1,Y 00710 JMP COMP1 00720 SERCH2 LEAX 8,X 00730 TFR X,U 00740 LDY #$954 00750 COMP2 LDA ,Y 00760 CMPA #'* 00770 LBEQ DUMP 00780 CMPA ,U+ 00790 BEQ COMP3 00800 LEAX -8,X 00810 BRA ADVAN 00820 COMP3 CMPY #$956 00830 BNE NEXT 00840 BRA DUMP 00850 NEXT LEAY 1,Y 00860 JMP COMP2 00870 * ADVANCE THE DIR POINTER 00880 ADVAN LEAX 32,X 00890 CMPX #$700 00900 BNE COMP 00910 INCB 00920 CMPB #11 00930 BLS STORE 00940 RTS 00950 * DUMP THE FILE NAME TO BUFFER 00960 DUMP LEAX -8,X 00970 PSHS B 00980 PSHS X 00990 PSHS Y 01000 LDB #12 01010 LDY PLACE 01020 REP DECB 01030 CMPB #0 01040 BEQ QUIT 01050 LDA ,X+ 01060 STA ,Y+ 01070 BRA REP 01080 QUIT STY PLACE 01090 PULS Y 01100 PULS X 01110 PULS B 01120 BRA ADVAN 01130 * PERFORM THE REPEATED COPY 01140 GETNAM LDX #TABLE 01150 STX PLACE2 01160 LOOP LDY PLACE2 01170 CMPY PLACE 01180 BEQ SUMARY 01190 LDX #$094C 01200 LOAD LDA ,Y+ 01210 STA ,X+ 01220 CMPX #$0957 01230 BNE LOAD 01240 STY PLACE2 01250 JSR OUTNAM 01260 LDA UCOUNT 01270 CMPA #10 01280 BNE UNIT 01290 TEN INC TCOUNT 01300 CLR UCOUNT 01310 UNIT INC UCOUNT 01320 JSR COFI 01330 LDA SDCF 01340 BNE REPT 01350 JSR $D326 01360 REPT JMP LOOP 01370 COFI LDA SDRIVE 01380 STA $EB 01390 LBSR $D399 01400 LDA SDCF 01410 PSHS A 01420 LDA DRIVE 01430 STA $EB 01440 LBSR $D399 01450 JSR $CAE9 01460 LBRA $D3D6 01470 * OUTPUT COPIED FILENAME 01480 OUTNAM LDX #$094C 01490 LDB #8 01500 JSR $B9A2 01510 LDA #32 01520 JSR [$A002] 01530 LDB #3 01540 JSR $B9A2 01550 LDA #13 01560 JSR [$A002] 01570 RTS 01580 MSG FCC "FILE(S) COPIED !" 01590 SUMARY LDX #MSG 01600 LDA #13 01610 JSR [$A002] 01620 LDA TCOUNT 01630 ADDA #$30 01640 JSR [$A002] 01650 CLR TCOUNT 01660 LDA UCOUNT 01670 ADDA #$30 01680 JSR [$A002] 01690 CLR UCOUNT 01700 LDA #' 01710 JSR [$A002] 01720 LDB #16 01730 PRT LDA ,X+ 01740 JSR [$A002] 01750 DECB 01760 CMPB #0 01770 BNE PRT 01780 END RTS 01790 TABLE RMB 748 01800 PLACE RMB 2 01810 PLACE2 RMB 2 01820 DRIVE RMB 1 01830 SDRIVE RMB 1 01840 SDCF RMB 1 01850 UCOUNT RMB 1 01860 TCOUNT RMB 1 01870 END SERCH1 LDY #$094C 00600 COMP1 LDA ,Y 00610 CMPAџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџє&$:ƒ COPYRIGHT 1990 FALSOFT, INC&F:ƒBASIC ANALYZER TEST PROGRAM&_:ƒBY DENNIS H. WEIDE&f:ƒ&v • 200,16000&‘† 86,FF,B7,FF,40,20,F9&Ї€ XГ16384 Ѕ 16390&Л( A$:A$Г"&H"ЋA$&Ъ2’ X,џ‰(A$)&в<‹ X&чF€ XГ1 Ѕ 1000:‹ X&ѓPЂ 16384„&f† Fџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ00100 *** ANALYZER TEST PROGRAM *** 00110 *** THIS PROGRAM LOOPS *** 00120 *** THROUGH A ROUTINE TO *** 00130 *** WRITE 255 TO ADDRESS *** 00140 *** $FF40 *** 00150 *** BY DENNIS H. WEIDE *** 00160 00170 00180 00190 ORG $4000 PROGRAM RAM LOCATION 00200 DATA EQU $FF40 ADDRESS TO WRITE 00210 START LDA #$FF LOAD AREG WITH 255 00220 STA DATA STORE AREG AT $FF40 00230 BRA START LOOP AND DO AGAIN 00240 END џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ00100 *** ZEROBUF/ASM *** 00110 *** PROGRAM TO ZERO OUT *** 00120 *** THE DRAW BUFFER *** 00130 *** WRITTEN BY *** 00140 *** DENNIS H. WEIDE *** 00150 00160 00170 00180 00190 BUFFER EQU $3D00 00200 ENDBUF EQU $7CFF 00210 00220 00230 ORG $3BB0 00231 00232 00233 00240 CLRA SET AREG TO ZERO 00250 LDX #BUFFER GET START ADDR OF BUFFER 00260 LOOP STA ,X+ ZERO BUFFER OUT 00270 CMPX #ENDBUF IS THIS END OF BUFFER? 00280 BLE LOOP IF NO-BRANCH TO LOOP 00290 RTS IF YES-RETURN TO BASIC 00300 END џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ00100 *** MOVESRAM/ASM *** 00110 *** PROGRAM TO MOVE *** 00120 *** SRAM MEMORY TO *** 00130 *** DRAM BUFFER *** 00140 *** WRITTEN BY *** 00150 *** DENNIS H. WEIDE *** 00160 00170 00180 00190 00200 ORG $3BC0 00210 00220 00230 00240 START LDX #$3D00 START OF DRAM BUFFER 00250 CLRA ZERO AREG 00260 STA $FF41 SET TRIGGER LOW 00270 LDA $FF40 GET 1ST BYTE OF SRAM 00280 STA ,X+ STORE IN 1ST BYTE OF DRAM 00290 LOOP LDA #$4 SET TRIGGER HIGH 00300 STA $FF41 00310 CLRA SET TRIGGER LOW 00320 STA $FF41 00330 LDA $FF40 GET NEXT SRAM BYTE 00340 STA ,X+ STORE IT IN NEXT DRAM BYTE 00350 CMPX #$7CFF CHECK FOR LAST DRAM BYTE 00360 BLE LOOP 00370 RTS 00380 END џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ:„ … џ†(344)Г247 Ї ZГZЋ1 :„ 350/Eh… ZД179 Ї ZГ223 :„ … ZВ223 Ї ZГ179/PrЅ 340/d|Z$Гџ‹(Z):Ѕ 490/„†… џ†(344)Г191 Ї ч1,4:Ѕ 670/ч… џ†(343)Г247 Ї NXГЌ1 :„ … џ†(344)Г247 Ї NXГ1 :„ … џ†(342)Г247 Ї NYГ1 :„ … џ†(341)Г247 Ї NYГЌ10š… NXДВ0 Б NYДВ0 Ї 5100ЄIK$Гџ’:… IK$Г"" Ї 2600=Ў… IK$Г"g" А џ†(343)Г191 Ї 3300kИ… (IK$Г"@" А џ†(341)Г191) Б IK$Г"^" Ї 2600ƒТ… IK$ДВџ‹(12) Ї 4800БЬф0:ž5:‡"DO YOU WANT TO CLEAR FORM (Y/N)?"0њжIK$Гџ’:… IK$Г"Y" Б IK$Г"y" Ї 230 :„ … IK$Г"N" Б IK$Г"N" Ї 240 :„ 4701"р… IK$Д" " Б IK$В"z" Ї 260 :„ Z$ГIK$14ъ… DPГ0 Ї NXГ11Pєџ(LT$(YOЋY),XOЋX,1)ГZ$1’ўь(XX,YY)Ќ(XXЋ7,YYЋ7),1,Н:CLГXOЋX:RWГYOЋY:І 100:XГXЋNX:YГYЋNY1Љ… XД0 Ї XГ39:YГYЌ11Р… XВ39 Ї XГ0:YГYЋ11б… YД0 Ї YГ231т&… YВ23 Ї YГ02"0… DPГ1 Ї џ(LT$(YOЋY),XOЋX,1)ГZ$ :„ Z$Гџ(LT$(YOЋY),XOЋX,1)2B:CLГXOЋX:RWГYOЋY:І100:Ѕ2502юDч1,4:ф0:ž5:‡:‡" S = SAVE TO DISK":‡" L = LOAD FROM DISK":‡" R = RETURN TO SAME FORM":‡" N = START NEW FORM":‡" X = EXIT FROM PROGRAM":‡:‡"PRESS S, L, R, N, OR X KEY.";3ˆNIK$Гџ’:… IK$Г"R" Б IK$Г"r" Ї ’ 65497,0:Ѕ 240 :„ … IK$Г"N" Б IK$Г"n" Ї ’ 65497,0:Ѕ230 :„ … IK$Г"X" Б IK$Г"x" Ї ’ 65496,0:у і:• 500:‡:‡:‡" GOODBYE":Š3УX… IK$ДВ"S" А IK$ДВ"L" А IK$ДВ"s" А IK$ДВ"l" Ї 590 :„ ž4 b‡:‡"ENTER FILENAME: ";:Л‰ F$:… џ‡(F$)В8 Ї ‡" TOO LONG - REDO":Ѕ6104^l’ 65496,0:F$ГF$Ћ"/FMI":™"D",#1,F$,1:а#1,1 џЇ A$:RГ1:… IK$Г"L" Б IK$Г"l" Ї 6504Šv‡"SAVING ";F$:€ BГ1 Ѕ 66:ё0,4:‡"LINE";B4Ч€€ IГ1 Ѕ 80:д A$Гџ(LT$(B),I,1):Х#1,R:RГRЋ1:‹ I,B:š:Ѕ5804єŠ‡"LOADING ";F$:€ BГ1 Ѕ 66:ё0,4:‡"LINE";B5H”€ IГ1 Ѕ 80:Ф#1,R:RГRЋ1:џ(LT$(B),I,1)ГA$:‹ I,B:š:XOГ1:YOГ1:DOГ0:’ 65497,0:Ѕ2405žч1,4:ф0:ž5:‡:‡"DO YOU WANT TO PREVIEW FORM (Y/N)?"5УЈIK$Гџ’:… IK$Г"N" Б IK$Г"n" Ї 750 :„ … IK$ДВ"Y" А IK$ДВ"y" Ї 6806В‡:‡"PRESS TO CONTINUE AFTER EACH SECTION OF THE FORM.":€ BГ1 Ѕ 250­5:‹B68МXOГ1:€ YOГ1 Ѕ 43 Љ21:ф46iЦ€ YГ0 Ѕ 23:RWГYOЋY:… LT$(RW)ГџЁ(80,32) Ї 7306а€ XГ0 Ѕ 79:CLГXOЋX:Z$Гџ(LT$(RW),CL,1):І100:‹X6Бк‹Y: 10,5: 150,36ифIK$Гџ’:… IK$ДВџ‹(13) Ї 740 :„ ‹ YO7 юф0:ž5:‡:‡"PRINT FORM (Y/N)?";:XOГ1:YOГ1:DPГ07MјIK$Гџ’:… IK$Г"N" Б IK$Г"n" Ї 240 :„ … IK$ДВ"Y" А IK$ДВ"y" Ї 7607ѕž5:‡:‡"READY PRINTER AND SELECT BAUD RATE:":‡" 1) 300 BAUD":‡" 2) 600 BAUD":‡" 3) 1200 BAUD":‡" 4) 2400 BAUD":‡" 5) 4800 BAUD":‡" 6) 9600 BAUD"8 IK$Гџ’:… IK$Д"1" Б IK$В"6" Ї 7808M’ 65496,0:ˆ џ‰(IK$) Ѕ 800,810,820,830,840,8508` ’150,180:Ѕ8608r*’150,87:Ѕ8608„4’150,41:Ѕ8608–>’150,18:Ѕ8608ЇH’150,7:Ѕ8608ВR’150,18т\‡#Ќ2,џ‹(27);"U1";::ƒUNIDIRECTIONAL PRINTING9f€ BГ1 Ѕ 66:‡"PRINTING LINE";B99p… LT$(B)ГџЁ(80,32) Ї ‡#Ќ2,џ‹(13); :„ ‡#Ќ2,LT$(B)9Fz‹B:Ѕ5809d„† 24,24,24,24,24,24,24,249ƒŽ† 24,24,24,24,248,24,24,249Ѓ˜† 24,24,248,24,248,24,24,249ТЂ† 54,54,54,54,246,54,54,549нЌ† 0,0,0,0,254,54,54,549ћЖ† 0,0,248,24,248,24,24,24:Р† 54,54,246,6,246,54,54,54:8Ъ† 54,54,54,54,54,54,54,54:Uд† 0,0,254,6,246,54,54,54:qо† 54,54,246,6,254,0,0,0:ш† 54,54,54,54,254,0,0,0:Њђ† 24,24,248,24,248,0,0,0:Хќ† 0,0,0,0,248,24,24,24:р† 24,24,24,24,31,0,0,0:ќ† 24,24,24,24,255,0,0,0;† 0,0,0,0,255,24,24,24;5$† 24,24,24,24,31,24,24,24;M.† 0,0,0,0,255,0,0,0;l8† 24,24,24,24,255,24,24,24;ŠB† 24,24,31,24,31,24,24,24;ЈL† 54,54,54,54,55,54,54,54;УV† 54,54,55,48,63,0,0,0;п`† 0,0,63,48,55,54,54,54;ћj† 54,54,247,0,255,0,0,0<t† 0,0,255,0,247,54,54,54<6~† 54,54,55,48,55,54,54,54† 0,0,0,0,255,255,255,255>*(† 240,240,240,240,240,240,240,240>H2† 15,15,15,15,15,15,15,15>f<† 255,255,255,255,0,0,0,04=Šі† 24,24,255,24,255,24,24,24=І† 24,24,24,24,248,0,0,0=Р † 0,0,0,0,31,24,24,24=ц† 255,255,255,255,255,255,255,255>† 0,0,0,0,255,255,25џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџї&$:ƒ COPYRIGHT 1990 FALSOFT,INC&G :ƒ****************************&j :ƒ** FALLING LETTERS **&:ƒ** BY PAUL OLMSTEAD **&А:ƒ** AN ALTERNATIVE TO "CLS"**&г:ƒ** (C) 1990 FALSOFT, INC. **&і:ƒ****************************'’ &HFFD9,0'Œ T(128)'І 64'%COГ0':YГџ„(128):XГT(Y)'U … XДВ0 Ї COГCOЋ1:Ѕ 38'h"… COДВ128 Ї 30'y$’ &HFFD8,0:Š'‘&XГџ†(1151ЋY):T(Y)Г0'І(NГYЋ1151:’ N,223'Е*€ MГ1 Ѕ 11'Ф,PГџ†(NЋ32)'б.’ NЋ32,X(0… NЋ32В1471 А NЋ32Д1503 Ї ’ NЋ31,175:’ NЋ33,175:X1Г1:XГ223(+2… X1Г1 Ї € DГ1 Ѕ 4:‹ D(S4… X1Г1 Ї X1Г0:’ NЋ31,223:’ NЋ33,223(h6… NЋ32В1535 Ї 62(Ѓ8… NЋ32В1503 Ї ’ NЋ32,175:’ N,175:€ DГ1 Ѕ 8:‹ D:’ N,223(З:’ NЋ32,P:NГNЋ32(П<‹ M(Щ>Ѕ 34(а@ž6(чB‡ @128,џЁ(33,201);)D‡ @161," FALLING LETTERS TITLE SCREEN ";)/F‡ @191,џ‹(201);џ‹(201))TH‡ @197,"(C) 1990, FALSOFT INC.";)kJ‡ @223,џЁ(33,201);)‹L€ LГ1504 Ѕ 1535:’ L,175:‹ L)ЇN‡ @329,"RESS ANY KEY.";)ДPЂ &HADFB)дR€ LГ1353 Ѕ 1366:’ L,223:‹ L)№T€ LГ1 Ѕ 128:T(L)Г99:‹ L)іVING LEџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџg&$:ƒ COPYRIGHT 1990 FALSOFT, INC&O :ƒ************************************&z:ƒ* FORM MAKER *&Ѕ:ƒ* ========== *&а(:ƒ* for IBM Graphic and *&ћ2:ƒ* compatible printers *'&<:ƒ* by BENJAMIN W. BRUNOTTE *'QF:ƒ* COPYRIGHT 1989 *'|P:ƒ************************************'†ZЅ170'ždч1,4:… Z$Г" " Ї 150'ђn… Z$В" " А Z$ДГ"z" А CSГ0 Ї 150 :„ … Z$В" " А Z$ДГ"z" А CSГ1 Ї CSГ0:OFГ1:Ѕ 140(Yx… Z$ГВџ‹(179) А Z$ДГџ‹(223) А CSГ1 Ї 150 :„ … Z$ГВџ‹(179) А Z$ДГџ‹(223) А CSГ0 Ї CSГ1:OFГ46:Ѕ 140(Ÿ‚ф0:ž5:ё0,11:‡"CHARACTER ERROR !!!!":‡" CHARACTER #";џˆ(џŠ(Z$)):‘(ьŒ€ LГ0 Ѕ 44:€ BГ0 Ѕ 7:NГџŠ(џ(CS$(LЋOF),BЋ1,1)):’ (61605Ћ(L­8)ЋB),N:‹ B,L)9–… Z$ГВ" " А Z$ДГ"z" Ї ю(CLЌXO,RWЌYO),Z$ :„ ю(CLЌXO,RWЌYO),џ‹(џŠ(Z$)Ќ146))? )dЊ’ 65497,0:у0,63:у1,0:у2,63:у3,36)нДт40:ž5:•7000:Œ LT$(66),CS$(90):кˆ:э1,16:ˆ № Ѕ 580:ё0,7:‡" ";џЁ(36,"*"):‡" *";џЁ(12,32);"FORM MAKER";џЁ(12,32);"*"*sО‡" *";џЁ(12,32);"==========";џЁ(12,32);"*":‡" *";џЁ(8,32);"for IBM Graphic and";џЁ(7,32);"*":‡" *";џЁ(8,32);"compatible printers";џЁ(7,32);"*"*чШ‡" * by BENJAMIN W. BRUNOTTE *":‡" *";џЁ(10,32);"COPYRIGHT 1989";џЁ(10,32);"*":‡" ";џЁ(36,"*"):ё0,0+iв€ LГ1 Ѕ 90:CS$(L)Г"":‹ L:€ LГ0 Ѕ 44:€ BГ0 Ѕ 7:NГџ†(61605Ћ(L­8)ЋB):CS$(LЋ1)ГCS$(LЋ1)Ћџ‹(N): N:CS$(LЋ46)ГCS$(LЋ46)Ћџ‹(N):‹ B,L+„мч1,4:ф1:ы(0,0)Ќ(7,7),1+ецч1,4:ф1:XOГ1:YOГ1:DPГ0:€ BГ1 Ѕ 66:LT$(B)ГџЁ(80,32):‹ B:XГ0:YГ0:Z$Г" ":Ѕ 250,1№ч1,4:ф1:€ RWГYO Ѕ YOЋ23:€ CLГXO Ѕ XOЋ39:Z$Гџ(LT$(RW),CL,1):І 100:‹ CL,RW:XГ0:YГ0:DPГ0,њ 255,1:NXГ0:NYГ0:XXГX­8:YYГY­8:… DPГ1 Ї у3,36:ь(XX,YY)Ќ(XXЋ7,YYЋ7),1,Ј :„ у3,0:ь(XX,YY)Ќ(XXЋ7,YYЋ7),1,Ј,љ… џ†(341)Г191 Ї IK$Гџ’: 110,5:… DPГ0 Ї DPГ1:Z$Гџ(LT$(YOЋY),XOЋX,1):Ѕ510 :„ DPГ0:Ѕ510-… џ†(342)ДВ191 Ї 330-ˆф0:ž5:‡"PRESS AN ARROW KEY TO MOVE TO ANOTHER":‡"SECTION OF THE FORM OR":‡"PRESS TO STAY IN SAME SECTION"-І"IK$Гџ’:… IK$Гџ‹(13) Ї 240.,… IK$Гџ‹(8) Ї XOГXOЌ20 :„ … IK$Гџ‹(9) Ї XOГXOЋ20 :„ … IK$Гџ‹(10) Ї YOГYOЋ21 :„ … IK$Гџ‹(94) Ї YOГYOЌ21 :„ 290.a6… XOД1 Ї XOГ1 :„ … XOВ41 Ї XOГ41 :„ … YOД1 Ї YOГ1 :„ … YOВ43 Ї YOГ43.l@Ѕ 240.ŽJ… џ†(343)ДВ191 Ї 390 :„ ZГ179.ЯTч1,4:ь(XX,YY)Ќ(XXЋ7,YYЋ7),1,Н:Z$Гџ‹(Z):CLГXOЋX:RWГYOЋY:І100/^… џ’Гџ‹(13) Ї 380 :„ … џ†(343)Г247 Ї ZГZЌ1 џt&$:ƒ COPYRIGHT 1990 FALSOFT,INC&2:ƒSPIDERS&J:ƒBY JOSEPH PENDELL&e QГ5::ƒSPEED OF SPIDERS&{€IГ1Ѕ5:э I,700:‹I&Œ† 0,47,25,61'(†"BM122,99;R2;BR2;R2;BR2;R2;BR2;R2","BM122,99;NU1;M+6,+1;R2;M+6,-1;U1","BM124,100;U1;R8;D1;L8","BM122,100;M+6,-1;R2;M+6,+1","BM124,99;R8"'12€IГ0Ѕ3:C:у I,C:‹I'8<ф4'\F€IГ1Ѕ5:D(I)Гџ„(3):ѕ"C"Ћџˆ(D(I))'tPщ(128,96),15::ƒBODY'эZѕ"BM140,91;M+15,-5;M+15,+2;BM142,94;M+12,-3;M+15,+3;BM142,97;M+12,-2;M+15,+4;BM140,100;M+15,-1;M+15,+5"::ƒRIGHT LEGS(edѕ"BM116,91;M-15,-5;M-15,+2;BM114,94;M-12,-3;M-15,+3;BM114,97;M-12,-2;M-15,+4;BM116,100;M-15,-1;M-15,+5"::ƒLEFT LEGS(nѕ"BM124,94;NU1;NR1;NL1;ND1"::ƒLEFT EYE(Мxѕ"BM131,94;NU1;NR1;NL1;ND1"::ƒRIGHT EYE(ж‚ѕ"BM128,96;D1"::ƒNOSE(№Œѕ"BM128,89;U13"::ƒWEB)– M$:ѕ M$::ƒMOUTH) ы(85,76)Ќ(172,105),I)%Њц),Д‹I)fО€IГ1Ѕ5:A(I)Г0:ь((IЌ1)­130,0)Ќ((IЌ1)­130Ћ88,29),I,Н:‹I)ŽШIГџ„(5):A(I)ГA(I)ЋQ:…A(I)В162 Ї 240)Свь((IЌ1)­130,A(I)Ћ1)Ќ((IЌ1)­130Ћ88,A(I)Ћ30),I,Н)ђмь((IЌ1)­130,A(I))Ќ((IЌ1)­130Ћ88,A(I)Ћ29),I,Н)ќцЅ200*s№ц:ѕ"C"Ћџˆ(D(I))Ћ"BM320,90;U90":ь(276,85)Ќ(364,114),I,Н:€KГ1Ѕ10:JГџ„(63):€LГ1Ѕ4:у L,J:Щ"L255T255CDEFGAB":‹L,K:у і:Š)ГA(I)ЋQ:…A(I)В162 Ї 240)Свь((IЌ1)­130,A(I)Ћ1)Ќ((IЌ1)­130Ћ88,A(I)Ћ30),I,Н)ђмь((IЌ1)­130,A(I))Ќ((IЌ1)­130Ћ88,A(I)Ћ29),I,Н)ќцЅ200*sџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџс&5:ƒAGENDA' by Keiran Kenny, Sydney, 1989.&X:ƒ COPYRIGHT 1990 FALSOFT,INC&b Ѕ560&pŒDY$(366)&…џ†(&H15F)Г196ЇDVГ1:„DVГЌ1&л(…џ†(&HFFFE)­256Ћџ†(&HFFFF)Г&H8C1B ЇSPГ65497:SLГ65496:„SPГ65495:SLГ65494&х2Ѕ160&ѓ:ƒ NEW CARD:1H… RCГ1 Ї Ѕ 2150:]R€ IГ0 Ѕ 9: T$(I)ГџЁ(38," "): ‹: І 1730:o\І 2380: RCГ1:uf:|p:ƒ:z:ƒ EDIT MODE:Ѓ„… RCДВ1 Ї Ѕ 2200:ЏŽІ 2380:Е˜:МЂ:ƒ:ЮЌ:ƒ WRITE FILE:чЖ™ "O", #1, "ROLDATA":ћРй#1, HD, NU, TL;Ъ€ IГ0 Ѕ 499: й#1,P(I),Z$(I): ‹;$дš;*о;1ш:ƒ;Bђ:ƒ READ FILE;[ќ™ "I", #1, "ROLDATA";n ‰#1,HD, NU, TL;‘ € IГ0 Ѕ 499: ‰#1,P(I),Z$(I): ‹;Є PIГHD: І 1060;М $І 1250: І 1390: š;Т .;Щ 8:ƒ;п B:ƒ EDIT ON SCREEN;ѕ L… RCДВ1 Ї Ѕ 2510< VRГ6: CГ1: MD$Г"EDIT": І 2710<, `І 2540: І 2630 т:ƒ CURSOR DISPLAY> ью (C,R), џ‹(127)> і>' :ƒ>; :ƒ CURSOR ERASE>G І 2670>c ю (C,R),џ(T$(RЌ6),C,1)>i (>p 2:ƒ>… <:ƒ GET CHARACTER>Ђ FC$Гџ’: … C$Г"" Ї Ѕ 2630>Ј P>Џ Z:ƒ>П d:ƒ ERASE CP>х nь (C­8,R­8)Ќ((C­8)Ћ7,(R­8)Ћ7),1,Н>ы x>ђ ‚:ƒ>џ Œ:ƒ TITLE? –ю (1,22),"R*L*D*X PROGRAM"?<  ь (144,176)Ќ(318,183),1,Н?O Њю (18,22), MD$?a Дю (26,22), NU?x Ою (30,22), "CARDS"?~ ШCTER>Ђ FC$Гџ’: … C$Г"" Ї Ѕ 2630>Ј P>Џ Z:ƒ>П d:ƒ ERASE CP>х nь (C­8,R­8)Ќ((C­8)Ћ7,(R­8)Ћ7),1,Н>ы x>ђ ‚:ƒ>џ Œ:ƒ TITLEџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ}&$:ƒ COPYRIGHT 1990 FALSOFT, INC&? :ƒ CONFIG FILE CREATOR&dт 32:’ &H95C9,&H57:’ &HFF22,&H50&nІ 80&Х(‡" Please insert disk to save the configuration file.....":І 80:І 90:Ђ 44539' 2І 80:‡"Thank you! Saving configuration file now....":І 80:І 90'2<™ "O",#1,"SETUP":й #1,3,2,4,0,63:š'QFІ 80:‡"Done...."::І 80:Š'eP€ TГ1 Ѕ 8:‡:‹:'vZЩ"T10L10O4A"'|dinsert disk to save the configuration file.....":І 80:І 90:Ђ 44539' 2І 80:‡"Thank you! Saving configuration file now...."џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ&d:ƒ R*L*D*X PROGRAM&Bn:ƒ COPYRIGHT 1990 WILLIAM BARDEN, JR.&Yx:ƒ DATA DICTIONARY&r‚:ƒ A$=WORKING STRING&‹Œ:ƒ B$=WORKING STRING&Љ–:ƒ C=COLUMN FOR EDIT MODE&С :ƒ F$()=FIELD ARRAY&иЊ:ƒ HD=HEAD OF LIST&яД:ƒ I=WORKING INDEX'О:ƒ J=WORKING INDEX'Ш:ƒ K=WORKING INDEX'2в:ƒ MD$=MODE NAME'Nм:ƒ NU=NUMBER OF ENTRIES'~ц:ƒ P()=POINTER ARRAY LINKS AHEAD AND BEHIND'œ№:ƒ PA=ENTRY AFTER CURRENT'Лњ:ƒ PB=ENTRY BEFORE CURRENT'ю:ƒ PI=CURRENT ENTRY (ONE DISPLAYED COMPLETELY)( :ƒ PT=TEMPORARY POINTER(%:ƒ R=ROW FOR EDIT MODE(N":ƒ RC=REMOVE CARD, 1 IF CARD REMOVED(r,:ƒ T$=FIELD ARRAY FOR EDIT MODE(6:ƒ T1=TEMPORARY VARIABLE(Ќ@:ƒ T2=TEMPORARY VARIABLE(ЩJ:ƒ T3=TEMPORARY VARIABLE(рT:ƒ TL=TAIL OF LIST)^:ƒ Z$()=STRING ARRAY FOR CARDS)h• 10000)rэ 1,6500)(|э 2,680)6†Œ Z$(499))CŒ P(499))Kšф 4)QЄц)lЎы (321,88)Ќ(639,167),1)†Иы (321,72)Ќ(639,79),2)ТNUГ0)­ЬPIГ1023: PAГ1023: PBГ1023)ЗжRCГЌ1)ЩрMD$Г"COMMAND")уъ€ IГ1 Ѕ 499:P(I)ГЌ2:‹*4єP(0)Г1023­1024Ћ1023: Z$(0)Г"STARTING CARD!FIELD 1!FIELD 2!":HDГ0: NUГ1: TLГ0*YўPIГHD: І 1060: І 1250: І 1390*tMD$Г"COMMAND": І 2710*C$Гџ’: … C$Г"" Ї Ѕ 530*Ї… C$ДВ"R" Ї Ѕ 610*Р&MD$Г"READ?": І 2710*ђ0C$Гџ’: … C$Г"" Ї Ѕ 560 :„ … C$ДВ"R" Ї Ѕ 610+ :MD$Г"READ??": І 2710+>DC$Гџ’: … C$Г"" Ї Ѕ 580 :„ … C$ДВ"R" Ї Ѕ 610+VNMD$Г"READ": І 2710+jXІ 2300: Ѕ 520+Ÿb… C$Г"W" Ї MD$Г"WRITE": І 2710: І 2230: Ѕ 520+Йl… C$ДВџ‹(10) Ї Ѕ 650+сvІ 1060: … PAГ1023 Ї PIГHD :„ PIГPA+ў€І 1060: І 1390: Ѕ 520,Š… C$ДВџ‹(94) Ї Ѕ 680,@”І 1060: … PBГ1023 Ї PIГTL :„ PIГPB,]žІ 1060: І 1390: Ѕ 520,|Ј… C$Г"P" Ї І 1670: Ѕ 520,›В… C$Г"D" Ї І 1830: Ѕ 520,КМ… C$Г"I" Ї І 1900: Ѕ 520,йЦ… C$Г"N" Ї І 2120: Ѕ 520,ја… C$Г"E" Ї І 2380: Ѕ 520-к… C$ДВџ‹(8) Ї Ѕ 760-Eф€ IГ1 Ѕ 10: І 1060: … PAГ1023 Ї PIГHD :„ PIГPA-eюІ 1060: ‹: І 1390: Ѕ 520-~ј… C$ДВџ‹(9) Ї Ѕ 790-В€ IГ1 Ѕ 10: І 1060: … PBГ1023 Ї PIГTL :„ PIГPB-в І 1060: ‹: І 1390: Ѕ 520-нЅ 520-ф :ƒ-ј*:ƒ INSERT ENTRY.!4€ IГ0 Ѕ 499: … P(I)ГЌ2 Ї Ѕ 840 :„ ‹.5>PIГ1023: Ѕ 930.IHP(I)ГPA­1024ЋPB.`R… PBГ1023 Ї Ѕ 870.’\T1ГP(PB)Ќџ(P(PB)Ў1024)­1024: P(PB)ГI­1024ЋT1.Љf… PAГ1023 Ї Ѕ 900.аpT1Гџ(P(PA)Ў1024): P(PA)ГT1­1024ЋI.фzP(PA)ГT1­1024ЋI.њ„Z$(I)ГA$: NUГNUЋ1/ŽVГ1:C(7)ГC(17)Aeич9,0:ъ(0,164)Ќ(320,192),Н,BF:€IГ1Ѕ30:ѓ(џ„(320),168Ћџ„(24),7):‹:ъ(0,164)Ќ(320,164),ОA•тч15:€XГ10Ѕ280Љ62:ь(X,127)Ќ(XЋ55,146),1,Н:‹XAРь€XГ40Ѕ249Љ62:ь(X,96)Ќ(XЋ55,115),1,Н:‹XAъі€XГ72Ѕ218Љ62:ь(X,65)Ќ(XЋ55,84),1,Н:‹XBь(102,34)Ќ(157,53),1,Н:ь(164,34)Ќ(219,53),1,НBz ч11,0:XГ274:€YГ124Ѕ104ЉЌ4:І1360:‹:XГ56:€YГ92Ѕ72ЉЌ4:І1360:‹Y:XГ214:€YГ62Ѕ42ЉЌ4:І1360:‹YBœXГ150:€YГ156Ѕ142ЉЌ4:І1360:‹YBџщ(128,29),10,9:D$Г"R1G1D1L1U1E1":ѕ"BM124,25C9S8;XD$;":ш(128,29),6,9:щ(128,29),10,1:ѓ(128,38,0)C)(€IГ1Ѕ4:FX(I)ГFX(IЋ4):FY(I)ГFY(IЋ4):‹ICG2XГ12:YГ145:PNГ2:H1Г0:H2Г0Cf<ы(X,Y)Ќ(XЋ12,YЋ18),4:І770CІFч10,0:ъ(112,9)Ќ(212,14),Н,BF:ъ(111,8)Ќ(213,14),О,B:TMГ100:CдPъ(X,Y)Ќ(XЋ20,Y),О:ъ(X,YЋ1)Ќ(XЋ20,YЋ1),Н:CёZІ760:ц7:LVГ2:C(7)ГC(16)D_dIГ1:€YГ50Ѕ164Љ38:€XГ10Ѕ262Љ84:CX(I)ГX:CY(I)ГY:IГIЋ1:ь(X,Y)Ќ(XЋ43,YЋ17),9,Н:‹X,Y:CX(0)ГCX(15):CY(0)ГCY(15)Dnч0,11:€XГ22Ѕ274Љ84:€YГ70Ѕ150Љ38:І1440:‹Y,XDѕxч0,3:€IГ1Ѕ3:XГEX(I):YГEY(I)Ћ25:ъ(X,Y)Ќ(XЋ37,YЋ3),Н,BF:ъ(X,Y)Ќ(XЋ37,YЋ3),О,B:‹I:XГEX(3):YГEY(3)Ћ25EH‚щ(32,42),10,9:D$Г"R1G1D1L1U1E1":ѕ"BM28,38C9S8;XD$;":ш(32,42),6,9:щ(32,42),10,1ErŒ€IГ1Ѕ4:FX(I)ГFX(IЋ8):FY(I)ГFY(IЋ8):‹IE—–CГ1:EEГ1:XГ272:YГ152:PNГ3:Ѕ1340Eе €IГY ЅYЋ16Љ4:ъ(X,I)Ќ(XЋ20,I),О:ъ(X,IЋ1)Ќ(XЋ20,IЋ1),Н:‹I:FЊф2:І760:ц7:LVГ3:…MTДВ1ЇC(7)ГC(18):„C(7)Г5F?Д€XГ20Ѕ280Љ40:€YГ90Ѕ186Љ40:ь(X,Y)Ќ(XЋ23,YЋ22),13,Н:‹Y,XFЛОч13:ъ(32,150)Ќ(33,172),Н,B:ъ(272,110)Ќ(273,132),Н,B:€YГ155Ѕ168Љ2:ъ(26,Y)Ќ(39,Y),Н:‹Y:€YГ115Ѕ128Љ2:ъ(266,Y)Ќ(279,Y),Н:‹YFўШ€XГ319Ѕ60ЉЌ24:ь(XЌ23,56)Ќ(X,68),14,Н:ь(XЌ23,26)Ќ(X,38),14,Н:‹XG:вч13:ъ(32,64)Ќ(33,93),Н,B:€YГ64Ѕ89Љ2:ъ(26,Y)Ќ(39,Y),Н:‹YGVмь(246,42)Ќ(311,54),17,НG‚ц€IГ1Ѕ4:FX(I)ГFX(IЋ12):FY(I)ГFY(IЋ12):‹IGЁ№XГ272:YГ152:PNГ3:L1Г0:L2Г0GЌњЅ1340GЪІ760:ц7:І730:C(7)ГC(17)Gі€XГ0Ѕ320Љ24:ь(X,180)Ќ(XЋ23,192),14,Н:‹XH9ч13:ъ(0,55)Ќ(28,192),Н,BF:ч3:€IГ0Ѕ28:ъ(I,55)Ќ(I,55Ќџ„(3)),Н:‹IH„"ь(174,50)Ќ(217,67),9,Н:ь(54,134)Ќ(97,151),9,Н:ь(236,136)Ќ(279,153),9,НH,І770:Hќ6ч9,7:ъ(124,94)Ќ(202,104),О,BF:ю(16,12),"GAME OVER":€IГ1Ѕ4:Щ"V"Ћџˆ(I­7):€OГ5Ѕ1ЉЌ1:Щ"O"Ћџˆ(O)Ћ"BGEC":‹O,II@…џЊ(0)Г1Ї50:„1600I'JDFГ0:І760:ф2:ц3I—TD$Г"R3G1L1G1D3F2L2H1U4E2R3G1D2R2U1L1D1R1U1R1D1L1U2NH1U1F1D2R3F2L7;H1NR1ND1F1R5G1L5H1U1E1G1D1F1R2G1L4H1U4E2"Iј^щ(160,92),40,15,.75:щ(160,92),50,15,.75:ш(118,96),13,15:ш(160,92),7,15:ѕ"BM140,70C0S24;XD$;"Jbhш(140,107),0,0:ш(180,95),14,0:ш(146,89),9,0:ш(164,79),8,0:ш(172,79),8,0:ш(166,84),15,0:ш(174,84),15,0J–rч7:ъ(142,68)Ќ(143,72),Н,BF:ъ(140,70)Ќ(145,70),НK |ч0:ю(13,5),"PENGUIN ICARUS":ю(16,17),"(C)1990":ю(12,18),"by Nick Bradbury":ю(10,20),"press 'fire' to begin":І770K)†у13,џ„(63):…џЊ(0)Г0Ї1670K>NPГ4:І1230:Ѕ60KJš 20,4:K^Єі:’65496,0:ф0:Š0J–rч7:ъ(142,68)Ќ(143,72),Н,BF:ъ(140,70)Ќ(145,70),НK |ч0:ю(13,5),"PENGUIN ICARUS":ю(16,17),"(C)1990":ю(12,18),"by Nick Bradbury":ю(10,20),"press 'fire' to22) HORROR"," (27) SCROLL"," (29) QUEENS"," (32) SCRNDMP"," (36) SCRNDMPS"," (38) LP78DMPS"," (39) TESTSCRN"," (46) ENERGY" 1020 DATA " (50) GRAFTRAN"," (63) DESKTOPL"," (68) DESKTOPH"," (72) GENFONT1"," (75) GENFONT2"," (78) FUNFACE"," (79) MARTIAN"," (80) COCOART"," (81) MIRORPIX" 1030 DATA " (82) P178&GL"," (82) WINDCHIL"," (83) FOOTBALL"," (95) CCBLITZ"," (99) MENUGEN"," (99) COCODRAW","(103) 3DLETTER","(107) READPROG","(118) ANIMATE","(124) PICTBOOK" 9999 DATA END ," (78) FUNFACE"," (79) MARTIAN"," (80џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€IГ5Ѕ1ЉЌ1:Щ"O"Ћџˆ(I)Ћ"FDEC":‹I:І730:€IГ1Ѕ600:‹I:І1370:Ѕ60/nИJГ3:JCГJCЋ1:…JCВ7ЇJCГ1:JMГ0:Ѕ360:„YГYЌ3:Ѕ360/ОТ…YВ154ЇNPГNPЌ1:€IГ5Ѕ1ЉЌ1:Щ"O"Ћџˆ(I)Ћ"FDEC":‹I:І730:€IГ1Ѕ450:‹I:І1690:Ѕ60/ѕЬ…XВ259ЇSCГSCЋ50:І730:ЩP2$:€IГ1Ѕ500:‹I:І1230:Ѕ600ж…GLГ1Ї500:„…џ„(8)Г1Ї4900рЅ800AъGLГ1:GYГ140:GXГ262:Щ"O3V31BAGFEDC"0єь(GX,GY)Ќ(GXЋ12,GYЋ12),22,Н:GXГGXЌ8Ќ(DF­2):…GXД0ЇGLГ0:Ѕ80:„ь(GX,GY)Ќ(GXЋ12,GYЋ12),21,Н1ў…XДGXЋ12АXВGXЌ10АYДGYЋ12АYВGYЌ18ЇЩ"O1V31CDEFGO2GFEDCDCDC":NPГNPЌ1:€IГ1Ѕ600:‹I:І730:І1690:Ѕ601 Ѕ801Z…YВ172ЇNPГNPЌ1:€IГ5Ѕ1ЉЌ1:Щ"O"Ћџˆ(I)Ћ"FDEC":‹I:І730:€IГ1Ѕ600:‹I:І1450:Ѕ601 AXГ20Ћџ„(5)­40:AYГ50Ћџ„(3)­40Ћџ„(2)Ќ2:ь(AX,AY)Ќ(AXЋ23,AYЋ22),13,Н1М&…L1Г1Ї600:„…џ„(3)Г1Ї5801а0…XВ242АYД44Ї6401й:Ѕ802 DL1Г1:LYГ17:Щ"O3V28EO1A":LCГLCЋ1:…LCВ10ЇLCГ022NLXГ60ЋLC­18:ы(LX,LY)Ќ(LXЋ5,LYЋ19),162ЉXь(LX,LY)Ќ(LXЋ5,LYЋ19),16,Н:LYГLYЋ18Ћ(DF­3):…LYВ192ЇL1Г0:Ѕ560:„ы(LX,LY)Ќ(LXЋ5,LYЋ19),16:ь(LX,LY)Ќ(LXЋ5,LYЋ19),15,Н2аb…LXВXЌ3АLXДXЋ12АLYДYЋ17АLYВYЌ9Ї6302кlЅ56034vNPГNPЌ1:€IГ30Ѕ5ЉЌ3:Щ"V"Ћџˆ(I)Ћ"O4FEDO3FEDO2FEDO1FED":‹I:І730:€IГ1Ѕ400:‹I:І1450:Ѕ603f€ЩP2$:SCГSCЋ250:І730:€IГ1Ѕ100:‹I:ЩP3$:NPГNPЋ13„ŠDFГDFЋ1:І1540:…DFВ3ЇDFГ33ё”€IГ234Ѕ30ЉЌ2:у6,џ„(63):AГџ„(2):ь(I,96ЋA)Ќ(IЋ84,118ЋA),18,Н:‹I:Щ"O1V30GFEDEV25ADEAV18EFAV12EFAAV6EDAEV31"4Mžч7:ъ(54,109)Ќ(67,118),Н,BF:ь(30,98)Ќ(95,110),17,Н:XГ58:YГ109:ы(X,Y)Ќ(XЋ12,YЋ18),4:AГ1.44УЈу6,џ„(63):€IГ1Ѕ95:‹I:ь(X,Y)Ќ(XЋ12,YЋ18),4:YГYЋA:…YВ192Ї690:„ы(X,Y)Ќ(XЋ12,YЋ18),4:ь(X,Y)Ќ(XЋ12,YЋ18),3:AГAЋ1:Ѕ6805В’65496,0:Щ"O1GFEDC":€IГ1Ѕ450:‹I:Щ"T3L3FEDL2CL255T255":’65497,0:€IГ1Ѕ990:‹I:І1230:Ѕ605(МЅ7005ŽЦTQГTQЋ1:…TQД3Ї:„TQГ0:ч7:ъ(112ЋTM,8)Ќ(112ЋTM,15),Н:TMГTMЌ1:…TMД0Їч9:ю(15,10),"OUT OF TIME":Ѕ15905”а6к…NPД0Ї1590:„ч9,7:ь(22,1)Ќ(34,19),3,Н:ъ(38,7)Ќ(48,17),О,BF:ю(4,1),NP:SC$Гџˆ(SC):S$Г"0":LГџ‡(SC$):SC$Гџ(SC$,LЌ1)6?ф…џ‡(SC$)Д5ЇSC$ГS$ЋSC$:Ѕ740:„ъ(58,6)Ќ(105,16),О,BF6Pюю(8,1),SC$:6fј€IГ0Ѕ15:уI,0:‹I:6€IГ0Ѕ15:уI,C(I):‹I:6В €IГ0Ѕ36:C(I):‹I:…MTГ1Ї€IГ0Ѕ18:C(I)ГC(IЋ19):‹I7† 0,32,1,33,36,9,63,11,44,63,7,40,20,4,38,16,10,11,9,0,56,2,16,38,5,34,5,9,63,33,47,34,32,38,7,10,1175 €IГ1Ѕ3:EX(I),EY(I):‹7O*† 222,35,138,35,54,347k4€IГ5Ѕ16:FX(I),FY(I):‹I7Ц>† 86,116,240,86,118,86,148,56,102,40,186,40,186,40,270,40,98,80,58,118,180,118,220,1587яHP1$Г"O2V31DEFV20DEFV15DEFV10DEFV5DEF8RP$Г"CDEFGAB":€IГ1Ѕ4:P2$ГP2$Ћ"O"Ћџˆ(I)ЋP$:‹I8m\P3$Г"O2T3L8;DD#EL4O+CO-L8EO+L4CO-L8EO+L2C;L8EFF#GEFL4GL8DL4FL2E;L255T255"8„fP4$Г"O2CEDFEGFAGB"8Еpф2:ц7:D$Г"D3R10U3NL10D1G1H1G1H1G1H1G1H1G1H1"8юzѕ"BM100,100S12C0;XD$;":ш(108,101),9,0:ш(120,107),8,09„ы(88,96)Ќ(143,115),19cŽD$Г"U2R2D2NL2E1U2G1L2E1R2":ѕ"BM40,40;C8S16;XD$;":ш(44,37),9,8:ш(46,30),9,8:ш(50,34),8,89}˜ч8:ъ(43,34)Ќ(43,37),Н9ЊЂч8:ъ(43,34)Ќ(43,37),Н:ы(40,28)Ќ(52,40),59ђЌц7:ѕ"BM100,100C9S12;E1F1E1F1E1F1E1F1E1F1E1F1D3L12U3":ш(116,103),8,9:<Жч8:ъ(100,98)Ќ(100,109),Н:ъ(100,109)Ќ(136,109),Н:ы(100,90)Ќ(136,109),8:’Рц7:D$Г"E1R1E1R2E1R2F1R2F1R1F1D1L2G1L1H1G1L2H1G1L1H1L2U1;R2F1R1R2NH1R1NE1R2R1E1R3":шЪѕ"BM100,100C8S12;XD$;":ш(122,96),9,8:ш(134,101),8,8:ш(118,104),8,8:ш(102,101),8,8;дч8:ъ(100,99)Ќ(100,103),Н:ы(100,90)Ќ(143,107),9;1оы(0,0)Ќ(38,35),10;Šшц7:ѕ"BM100,100C6S12;XD$;":ш(122,96),9,6:ш(134,101),6,6:ш(118,104),6,6:ш(102,101),6,6;Ођч6:ъ(100,99)Ќ(100,103),Н:ы(100,90)Ќ(143,107),11;чќц7:щ(100,100),10,10:ш(100,100),11,10<^ч7:ъ(96,90)Ќ(102,91),Н,B:ъ(96,109)Ќ(102,110),Н,B:ѓ(96,96,9):ѓ(98,96,9):ѓ(95,98,9):ѓ(97,98,9):ы(88,89)Ќ(111,111),13<дц7:D$Г"E1R1E1R3F1R1F1D1L2H1G1L1H1G1L1H1D1F1R1E1F1R1E1F1R1E1":ѕ"BM100,100C0S12;XD$;":ш(116,97),1,0:ш(122,104),15,0<яы(102,94)Ќ(125,106),14=T$ц7:D$Г"R2F1L1D2R1E1NL2H1R1D2L1D1F1D2R2U1H1L1D3NL3R1D1L2NU1L3E1U2NH1R2U1H1L1H1U2E1L1G1D2G1D4G1R3"=n.ѕ"S8C0BM100,100;XD$;"=М8ш(99,114),0,0:ш(101,102),9,0:ш(106,115),9,0:ш(111,112),0,0:ш(100,101),0,0> Bш(108,117),11,0:ш(104,117),11,0:ш(106,103),11,0:ш(106,105),11,0:ѓ(103,102,0)>KLч7:ъ(96,106)Ќ(96,126),Н:ѓ(98,118,7):ы(98,100)Ќ(110,118),2>VXXГ112:€XГ94Ѕ112:€YГ100Ѕ118:PГџЋ(X,Y):ѓ(XX,YЋ20,P):‹Y:XXГXXЌ1:‹X>Њ`ы(96,120)Ќ(108,138),3>§jц7:D$Г"R1D1R1D1G1F1G1D2H1U1E1L1U1E1L1U2":ѕ"BM100,100C0S12;XD$;":ш(104,105),6,0?tы(100,100)Ќ(105,119),15?Ћ~ц7:D$Г"F1D1G1L2H1L1H1L1H2R5F1R2;F1R3D1L3U1BU1BR4;R2E1R5G2L1G1L1G1L2H1U1E1":ѕ"BM100,100C6S12;XD$;":ш(98,105),4,6:ш(116,105),4,6:ш(108,104),6,6?Хˆы(74,97)Ќ(139,109),17?у’ь(100,97)Ќ(112,97Ћ18),3,Н@œы(74,96)Ќ(158,118),18:ы(38,40)Ќ(67,52),20@†ІD$Г"R1F1E1R3F2D1L3NU1G1U2D1L1H1G1L1E1U1H1":ѕ"BM40,40C2S12;XD$;":ш(54,43),3,2:ч9:ъ(58,44)Ќ(60,45),Н,BF:ѓ(60,45,0)@žАы(38,40)Ќ(67,52),19@ъКы(194,14)Ќ(206,26),22:щ(200,20),6,0:ш(200,20),6,0:ы(194,14)Ќ(206,26),21@№ФA ЮІ760:ц7:L (50) CHASE"/ѓ† " (50) BIRD"/4є† " (51) FALLING"/Kѕ† " (65) FORMAKER"/aі† " (68) 3DGRAPH"/xї† " (80) ANALYZER"/Žј† " (82)+ZEROBUF"/Ѕљ† " (82)+MOVESRAM"/Књ† " (84)+FACTOR"/аћ† " (84) TESTBAS"/цќ† " (84)+TESTBIN"/ћ§† " (85) VOWELS"0ў† " (88) WINDMILL"0(џ† "(108)+COPYASM"0>† "(108)*COPYASM"0Q† "(109) COPY"0f† "(109) ALLRAM"0{† "(116) MARKUP"0’† "(118) MUSIC102"0žа† "END"M"/Књ† " (84)+FACTOR"/аћ† " (84) TESTBAS"/цќ† " (84)+TESTBIN"/ћ§† " (85) VOWELS"0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ%_&$:ƒ COPYRIGHT 1990 FALSOFT, INC&j і:ˆ№ Ѕ1700:’65497,0:’&HE6C6,0:ŒC(38),CX(20),CY(20),FX(16),FY(16)&оž:‡@103,"SELECT MONITOR TYPE:":‡@135,џЁ(20,"-"):‡@195,"(1) RGB (2) COMPOSITE/TV":‡:‰A:…AД1БAВ2Ї20:„MTГA:І760'\э1,560:э2,133:э3,133:э4,133:э5,91:э6,91:э7,91:э8,380:э9,396:э10,720:э11,396:э13,276:э14,156:э15,60:э16,60:э17,450:э18,993'†(э19,201:э20,201:э21,101:э22,101:І780' 2Щ"V31L255T255":Ѕ1610'И TO CONTINUE";+\JX$Гџ’:…X$Г""Ї330+lT…X$Г" "Ї370+†^€IГ1Ѕ14:…X$ГB$(I)Ї500+“h‹I:Ѕ330+™rž+Р|‡ " (XX)= PAGE NUMBER OF LISTING"+Ц†‡+ё€PГ15Ѕ21:‡B$(P)A$(P),B$(7ЋP)A$(PЋ7):‹P,•‡:‡" + ASSEMBLY LANGUAGE SOURCE",<–‡ " * MACHING LANGUAGE PROGRAM",š‡:‡ " PRESS TO RETURN TO FIRST PAGE OF MENU",ЉЄ‡ " PRESS ^ (UP ARROW) FOR ";,СЎXX$Гџ’:… XX$Г""Ї430,иИ…XX$Гџ‹(94)Ї ž:Ю:–,щТ…XX$Г" "Ї240-Ь€IГ15Ѕ NP:…XX$ГB$(I)Ї500-ж‹I:Ѕ430-"р…XX$ДВЇ430-,ъЅ240-LєQ$ГA$(I):…џ(Q$,1)ДВ"*"Ї540-“ўž:‡@138,"SORRY, BUT":‡:‡Є8)Q$:‡:‡" IS A MACHINE LANGUAGE PROGRAM."-і‡:‡" THE MENU PROGRAM HAS NOW BEEN CLEARED SO YOU MAY THE PROGRAM BY ITS FILENAME."-ќ–.QГџ‡(Q$):QГQЌ6:SL$Гџ(Q$,Q).(&г SL$,R.6ш† "APRIL".Lщ† " (14) PENGUIN"._ъ† " (18) DEMO".vы† " (22) CALCULAT".ь† " (26) COLRBASE".Ђэ† " (32) CONFIG".Ию† " (40) R*L*D*X".Ья† " (48) WATER".т№† " (48) SPIDERS".їё† " (49) AGENDA"/ ђ† "рМПМНКПМНКДНОИ€ПММПЕОМПДНОМПЕМПМК€ПАЕКП€ЕК€ЕК€АП€АПЕКАПАЕКАПЕАПАК€џ€€€џ№ѕњ€ѕњ€€џ€№џѕњаџ€ѕњ€ќѕ№џ№њ€џ€€№џ€ѕњ€ѕњ€€џ№€џѕњаџ€ѕњ€€€€џ€€€Ÿ№•šŸ€•š€•š€€Ÿ€А•šŸ€•šŸ€€Ÿ€€€ŸœšŸœš€•š€€œœœŸ•šŸ•žœŸрŸ€€€€€€€…Š€…Š€€€€…Š€€…Š€€р€€€€€€€€…Š€…Š€€€€…Š€€…Š€€€€€€€Џ€€€Џ€ЅЊ€ЅЊЁЂЏ €ЏЅЊ€Џ ЅЊ€€€€Џ€€€Џ€€€Џ№ЅЊ€ЅЊЅЊЏ€€ЏЅЊ€Џ€ЅЊ€€€€Џ€€уяуруяхытчычъяууяхыуясчыт€€сят€РРРРРрРРРРРР РРРРРРРРРРРРРРРРРР€РРРРРРРРРРРРР€РРР€РРРРРРРРРРРРР€РРРРРРРР€РР€РРР€РР€РРРРР€РР€РРР€РРР€РРРЈЈРЈЈЈРРРРРЈУЈЈџ€…Š€…Š€€€€…Š€€…Š€€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрьяьэъяьэъфэюш€яььяхюьяфэюьяхьяьъ€яАхъя€хъ€хъ€Ая€АяхъАяАхъАяхряАъ€Џ€€€Џ№ЅЊ€ЅЊ€€Џ€№ЏЅЊаЏ€ЅЊ€ЌЅ№Џ Њ Џ€€№Џ€ЅЊ€ЅЊ€€Џ№ ЏЅЊаЏ€ЅЊ€€€€Џ€€€№…Š€…Š€…Š€€€А…Š€…Š€€€€€ŒŠŒŠ€…Š€€ŒŒŒ…Š…ŽŒр€€€Ÿ€€€Ÿ€•š€•š€€Ÿ€€Ÿ•š€Ÿ€•š€€р€Ÿ€€€Ÿ€€€Ÿ€•š€•š€€Ÿ€Ÿ•š€Ÿ•š€€€€Ÿ€€€џ€€€џ€ѕњ€ѕњёђџ €џѕњ€џ ѕњ€€€€џ€€€џ€€€џ№ѕњ€ѕњѕњџ€€џѕњ€џ€ѕњ€€€€џ€€ГПГАГПЕЛВЕЛЗКПГГПЕЛГПБЗЛВ€€БПВ€РРРРРрРРРРРР РРРРРРРРРРРРРРРРАР€РРРРРРРРРРРРР€РРР€РРРРРРРРРРРРР€РРРРРРРР€РР€РРР€РР€РРРРР€РР€РРР€РРР€РРРЈЈРЈЈЈРРРРРЈУЈЈџŸ€•š€•š€€Ÿ€Ÿ•š€Ÿ•š€€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ#ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџMEMSCAN BAS"‡RESENTS!ъRAINBOW" ON # DISK  ENU BASЄENGUIN BASbEMO BAS&{ALCULATBAS'§OLRBASEBAS)!ONFIG BAS€*L*D*X BAS‚ATER BAS/rPIDERS BASwGENDA BASфHASE BAS0IRD BAS1ƒALLING BASњORMAKERBASjDGRAPH BAS2WNALYZERBAS4EROBUF ASMџ OVESRAMASMџ ИACTOR ASMџ7ьESTBAS BAS їESTBIN ASMџ ГOWELS BAS8ГINDMILLBAS9ЄOPYASM ASMџаOPYASM BIN:ЛOPY BAS;#LLRAM BAS ARKUP BASоUSIC102BAS<Nџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ„&pЅ8:memscan(C)1983 BY DEAN RECTOR QUESTIONS MAY BE DIRECTED Ѕ CIS#71575,1706&‘…AВ127ЇAГAЌ128:„…AД0ЇAГ128ЋA&ѓDГA:€BIГ0Ѕ6:BY(BI)ГDЌ(џ(DЎ2))­2:DГџ(DЎ2):‹:€BIГ0Ѕ6:…BY(BI)Ї’65479Ћ2­BI,0:‹:„’65478Ћ2­BI,0:‹&љ'–ž:€VГ1Ѕ3:‡:‡" memscan (C)1983":‹:‡" V 1.0":‡@324,">> PRESS h FOR HELP <<":‡:‡" ROM VISIBLE ONLY IN ALL RAM":‡@480,"COPY FREELY / RETAIN THIS COVER";'щ ‡@115,"BY D.DEAN":‡@151,"RECTOR":‡@211,"MIDLAND,TX";:AГ2:BГ512:CSГ1:LГ24:І120'ё І2(; …S1 Ї30:„I$Гџ’:…I$Г""Ї12:„IГџ‰(I$):…IВ0Ї40:„ACГџŠ(I$):…ACВ95ЇACГACЌ32(ž…ACГ10БACГ9ЇAГAЋ1:Ѕ10:„…ACГ93БACГ91ЇS1Г2:Ѕ30:„…ACГ94БACГ8ЇAГAЌ1:Ѕ10:„…ACГ21БACГ95ЇS1Г1:Ѕ30(Ф…ACГ70ЇLГ0:Ѕ12:„…ACГ83ЇLГ24:Ѕ12(ѕ…ACГ72Ї64:„…ACГ44ЇAГ0:Ѕ10:„…ACГ46ЇAГ64:Ѕ10),…ACГ78Ї44:„…ACГ74Ї44:„…ACГ77ЇAГM:Ѕ10:„…ACГ67ЇІ28)r…ACГ80Ї52:„…ACГ64Ї54:„…ACГ71Ї74:„…ACГ84ЇGRГ0:RГR1:R1ГR2:R2ГR:Ѕ84) …ACГ82ЇGRГR1:R1ГR2:R2ГGR:…GRГ14ЇІ136:„84)ЉЅ12)іSCГџ†(&HFF22):SDГSC А247:…SCГSD Ї’&HFF22,SC Б8:CSГ1::„’&HFF22,SD:CSГ0:*7€DEГ1ЅL:I$Гџ’:…I$Гџ‹(64)Ї54:„…I$Гџ‹(70)ЇLГ0:„…I$Гџ‹(83)ЇLГ24*` …I$Гџ‹(12)БI$Гџ‹(92)ЇS1Г0:I$Гџ’:Ѕ10*"‹DE:…S1Г1ЇAГAЌ1:„…S1Г2ЇAГAЋ1*Š&Ѕ10*Й(I$Гџ’:…I$Г""Ї40:„ …џ‰(I$)В0Ї IГџ‰(I$):Ѕ40+ *…I$Гџ‹(9)БI$Гџ‹(10)ЇAГAЋI:Ѕ10:„…I$Гџ‹(8)БI$Гџ‹(94)ЇAГAЌI:Ѕ10:„…џŠ(I$)Ї12:„40+|,ž:‡@98,"JUMP TO PAGE CONTAINING":‡" WHAT ADDRESS":‡@236,"( DECIMAL OR HEX )":‡@175,"";:‰J:JГџ(JЎ512):AГJ+‹.…ACГ78ЇMГJ+˜/…CS І28+З0…GRГ14ЇІ136:Ѕ10:„…GR Ї84+Р2Ѕ10+ћ4ž:‡@97,"JUMP TO WHAT PAGE #";:‰A:…GRГ14ЇІ136:Ѕ10:„84,"6LBГA­512ЋBЌ1:…LBВ65536ЇLBГLBЌ65536,Ў8ž:‡:‡" SCREEN START -PAGE ";A:‡" -ADDRESS ";A­512:‡:‡" SCREEN END -PAGE ";џ(LBЎ512):‡" -ADDRESS ";LB-:‡:‡:‡" BYTES/SCREEN - ";B:‡:‡" COLORSET - ";CS:‡:‡" DISPLAY MODE - ";:‡:‡џЁ(15,32);GR$;:…CS І28-JЅ10.@ž:‡"ARROW KEYS SHIFT DISPLAY WINDOW":‡"<#> JUMPS BY # OF PAGES":‡" AUTO-INC/DEC PAGES";:‡" FAST/SLOW AUTO-INC/DEC":‡" STOPS AUTO-INC/DEC.›B‡" GRAPHICS DISPLAY MODE MENU":‡" TOGGLE LAST 2 GR.MODES SET":‡" TOGGLE COLORSET":‡" TEXT DISPLAY MODE":‡", JUMP DISPLAY TO ADDRESS"/ID‡" JUMP TO LAST LOCATION":‡"

JUMP TO PAGE (X)":‡"<,> JUMP TO PAGE 0 (SCRATCHPAD)":‡"<.> JUMP TO PAGE 64(BASE OF ROM)";:‡"<@> DISPLAY INFORMATION":‡"";:…CS І28/rFI$Гџ’:…џ†(&H152)Г253Ї70:„…GR Ї84:„10/‹HSCГ4БCL:’&HFF22,SC:/ЙJBГ512:ž:‡" FOR MODE BELOW, SELECT # BELOW0uL‡@64," (PMODE 4) 6R => 1":‡" (PMODE 3) 6C => 2":‡" (PMODE 2) 3R => 3":‡" (PMODE 1) 3C => 4":‡" (PMODE 0) 2R => 5":‡" 2C => 6"12N‡" 1R => 7":‡" 1C => 8":‡" ALPHA-SEMIGR. 4 => 9 TEXT":‡" ALPHA-SEMIGR. 6 => 10":‡" ALPHA-SEMIGR. 8 => 11":‡" ALPHA-SEMIGR. 12 => 12"1ІP‡" ALPHA-SEMIGR. 24 => 13":‡" UNKNOWN => 14";:‡@56," ";:‰GR:…GRВ14 Ї 74 :„ … GRДВ0 Ї R1ГR2:R2ГGR1НR:ƒIFR1=0 THENR1=R21ЬT…GRГ0ЇGRГ92VˆGR І 88,92,96,100,104,108,112,116,120,124,128,130,132,134:LГ0:Ѕ102CXGR$Г"6R (PMODE 4)":…CS ЇCLГ&HF8 :„CLГ&HF02wZІ72:’&HFFC0,0:’&HFFC3,0:’&HFFC5,0:BГ6144::ƒ6R2Ѕ\GR$Г"6C (PMODE 3)":…CS ЇCLГ&HE8 :„CLГ&HE02й^І72:’&HFFC0,0:’&HFFC3,0:’&HFFC5,0:BГ6144::ƒ6C3`GR$Г"3R (PMODE 2)":…CS ЇCLГ&HD8 :„CLГ&HD03;bІ72:’&HFFC1,0:’&HFFC2,0:’&HFFC5,0:BГ3072::ƒ3R3idGR$Г"3C (PMODE 1)":…CS ЇCLГ&HC8 :„CLГ&HC03fІ72:’&HFFC0,0:’&HFFC2,0:’&HFFC5,0:BГ3072::ƒ3C3ЫhGR$Г"2R (PMODE 0)":…CS ЇCLГ&HB8 :„CLГ&HB03џjІ72:’&HFFC1,0:’&HFFC3,0:’&HFFC4,0:BГ1536::ƒ2R4#lGR$Г"2C":…CS ЇCLГ&HA8 :„CLГ&HA04WnІ72:’&HFFC0,0:’&HFFC3,0:’&HFFC4,0:BГ2048::ƒ2C4{pGR$Г"1R":…CS ЇCLГ&H98 :„CLГ&H904ЏrІ72:’&HFFC1,0:’&HFFC2,0:’&HFFC4,0:BГ1024::ƒ1R4гtGR$Г"1C":…CS ЇCLГ&H88 :„CLГ&H805vІ72:’&HFFC1,0:’&HFFC2,0:’&HFFC4,0:BГ1024::ƒ1C58xGR$Г"ASG 4 (TEXT MODE)":…CS ЇCLГ&H8 :„CLГ&H05nz’&HFFC0,0:’&HFFC2,0:’&HFFC4,0:І72:BГ512::ƒA-SG45•|GR$Г"ASG 6":…CS ЇCLГ&H1F :„CLГ&H175Ь~І72:BГ512:’&HFFC0,0:’&HFFC2,0:’ &HFFC4,0::ƒA-SG66€CLГ0:І72:GR$Г"ASG 8":’&HFFC0,0:’&HFFC3,0:’&HFFC4,0:BГ2048::ƒA-SG 86_‚CLГ0:І72:GR$Г"ASG 12":’&HFFC0,0:’&HFFC2,0:’&HFFC5,0:BГ3072::ƒA-SG126Љ„CLГ0:І72:GR$Г"ASG 24":’&HFFC0,0:’&HFFC3,0:’&HFFC5,0:BГ6144::ƒA-SG247†ž:‡@34,"SET SAM CONTROL BITS":‡:‡"SELECT":‡ :‡" OPTION (1) OPTION (2)":‡" NO BIT SET SET BIT 16":‰SB79ˆ…SBДВ2ЇSBГ1:CLГ0:„CLГ167|ŠІ72:GR$Г"UNKNOWN":’&HFFC1,0:’&HFFC3,0:’&HFFC5,0:BГ8192:ZZГ0: џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ WANT";:‡@290,"GRAIN COSTS ";:‡Э"$$#.##";GC;:‡" PER 100 BU.";:‡@130,"";:‰"(IN BUSHELS)";X: 150,1:M(T,10)ГM(T,10)ЋX:M(T,0)ГM(T,0)Ќ(XЎ100)­GC:Ѕ57#>ž:‡@98,"HOW MUCH GRAIN ARE YOU";:‡@290,"GRAIN COSTS ";:‡Э"$$#.##";GC;:‡" PER 100 BU.";:‡@130,"";:‰"SELLING (IN BUSHELS)";X: 150,1:…XВM(T,10)Ї64W?M(T,10)ГM(T,10)ЌX:M(T,0)ГM(T,0)Ћ(XЎ100)­GC:Ѕ57@ž:‡@98,"YOU DON'T HAVE THAT MUCH!!":€XГ1Ѕ1000:‹:Ѕ62SA…M(T,9)Ў150ГДM(T,5)Ї15:„Y2ГM(T,9)Ў150ЌM(T,5):…џ„(3)ВY2 Ї15:„X3Г2:X$Г"RAIDERS!":І172:ž3:‡@64,"YOU HAVE BEEN ATTACKED BY A GROUP OF RAIDERS. YOU DROVE THEM OFF, BUT TOOK HUGE LOSSES."АB‡"THE MINISTER OF DEFENSE SAYS HE NEEDS MORE SOLDIERS TO PROTECT THIS MUCH LAND.":K$Гџ’:CІ173:M(T,5)Г(M(T,5)Ћ1)Ќџ„(M(T,5)Ћ1):M(T,11)ГM(T,11)Ќџ˜(џ„(M(T,11)Ў4)):M(T,10)ГM(T,10)Ќџ„(M(T,10)):…M(T,3)В1ЇM(T,3)ГM(T,3)Ќџ„(M(T,3))aD…M(T,4)В2ЇM(T,4)ГM(T,4)Ќџ„(M(T,4))ˆE…M(T,6)В2ЇM(T,6)ГM(T,6)Ќџ„(M(T,6))‘FЅ156G’346,168:І181:‡@66,"YOU HAVE ";:‡Э"$$###,###.##-";M(T,0);:‡@97,џЁ(30,42);:‡@132,"INVESTMENT POSSIBILITIES";:‡@161,џЁ(30,42);:‡@194,"1. FERRET";:‡@216,"$50.00";мH‡@226,"2. FISHING BOAT";:‡@247,"$500.00";:‡@258,"3. ARMORY";:‡@277,"$2,500.00";:‡@290,"4. MARKET";:‡@309,"$1,250.00";:‡@322,"5. TRAIN 5 GUARDS";:‡@343,"$300.00";€I‡@354,"6. ADD ONTO HALL";:‡@373,"$8,000.00";:‡@386,"7. TEMPLE";:‡@404,"$14,000.00";:‡@418,"8. LAND (PER ACRE)";:‡@439,Э"$$##.##";LC;:‡@450,"9. CONTINUE";:K$Гџ’ЯJK$Гџ’:KГџ‰(K$):…KД1БKВ9Ї74:„ 150,1:…KГ9ЇЅ16:„ˆK Ѕ75,76,77,78,79,80,81,85љKM(T,1)ГM(T,1)Ћ1:M(T,0)ГM(T,0)Ќ50:Ѕ82:LM(T,15)ГM(T,15)Ћџ„(3):M(T,2)ГM(T,2)Ћ1:M(T,0)ГM(T,0)Ќ500:Ѕ82’MM(T,13)ГM(T,13)Ћџ„(2):M(T,14)ГM(T,14)Ћџ„(3):M(T,3)ГM(T,3)Ћ1:M(T,0)ГM(T,0)Ќ2500:Ѕ82дNM(T,14)ГM(T,14)Ћџ„(4):M(T,4)ГM(T,4)Ћ1:M(T,0)ГM(T,0)Ќ1250:Ѕ82 O…M(T,11)Д6Ї83:„M(T,5)ГM(T,5)Ћ5:M(T,0)ГM(T,0)Ќ300:M(T,11)ГM(T,11)Ќ5:Ѕ82‰P…M(T,22)Д3Ї84:„M(T,13)ГM(T,13)Ћџ„(4):M(T,12)ГM(T,12)Ћџ„(3)Ќ1:M(T,6)ГM(T,6)Ћ1:M(T,0)ГM(T,0)Ќ8000:Ѕ82лQ…M(T,22)Д5Ї84:„M(T,7)ГM(T,7)Ћ1:M(T,12)ГM(T,12)Ћџ„(4):M(T,0)ГM(T,0)Ќ14000:Ѕ82 R‡@66,"YOU HAVE ";:‡Э"$$###,###.##-";M(T,0);:K$Гџ’:Ѕ74 SSž:‡@97,"YOU DON'T HAVE ENOUGH THRALLS!":€XГ1Ѕ1000:‹:Ѕ71 ŽTž:‡@97,"YOU HAVEN'T GOT ENOUGH RANK!":€XГ1Ѕ1000:‹:Ѕ71 пUž:‡@98,"LAND EXCHANGE - ARE YOU:":‡@166,"1. BUYING":‡@198,"2. SELLING":K$Гџ’!VK$Гџ’:KГџ‰(K$):…KД1БKВ2Ї86:„ 150,1:ˆK Ѕ87,88!ЋWž:‡@98,"LAND PRICE IS ";:‡Э"$$##.##";LC:‡@162,"";:‰"BUY HOW MANY ACRES";K: 150,1:M(T,0)ГM(T,0)Ќ(LC­K):M(T,9)ГM(T,9)ЋK:M(T,11)ГM(T,11)Ћ(џ˜(KЎ25)):Ѕ71"ZXž:‡@98,"LAND PRICE IS ";:‡Э"$$##.##";LC:‡@162,"";:‰"SELL HOW MANY ACRES";K: 150,1:…M(T,9)Ќ(100­(M(T,22)­M(T,22)))ДK Ї‡@322,"YOU DON'T HAVE ENOUGH LAND!!":€XГ1Ѕ1000:‹:Ѕ88"žYM(T,9)ГM(T,9)ЌK:M(T,0)ГM(T,0)Ћ(LC­K):M(T,11)ГM(T,11)Ќ(џ˜(KЎ25))"ЙZ…M(T,11)Д10ЇM(T,11)Г10"Т[Ѕ71#q\ž:‡@5,"STANDINGS - YEAR";DT:‡џЁ(32,42);:‡" TREASURY LAND GUARDS":‡џЁ(32,42);:€XГ1ЅNP:‡PT$(X);PN$(X):‡Э"$$##,###.##-";M(X,0);:‡" ";:‡Э"#####";M(X,9);:‡" ";#‡]‡Э"####";M(X,5):‹$6^K$Гџ’:І173:ž:‡" THRALLS SAILORS TRADERS":‡џЁ(32,42);:€XГ1ЅNP:‡PT$(X);PN$(X):‡" ";:‡Э"#####";M(X,11);:‡" ";:‡Э"####";M(X,15);:‡" ";:‡Э"####";M(X,14)$а_‹X:K$Гџ’:І173:ž:‡"  NOBLES PRIESTS":‡џЁ(32,42);:€XГ1ЅNP:‡PT$(X);PN$(X):‡" ";:‡Э"####";M(X,13);:‡" ";:‡Э"####";M(X,12):‹X:K$Гџ’$м`І173:%zaž0:‡@4,"boats";:‡@12,џ‹(239);:’1034,61:‡@17,"markets";:‡@27,џ‹(218);:’1049,61:‡@36,"armory";:‡@45,џ‹(246);:’1067,61:‡@49,"temple";:‡@58,џ‹(151);:’1080,61%Ђb‡@75,"hit";:‡@79,"any";:‡@83,"key";%ЮcYГM(T,9):…YД501ЇY1Г10:Y2Гџ(YЎ20):Ѕ105%ђd…YД1001ЇY1Г19:Y2Гџ(YЎ40):Ѕ105&e…YД3001ЇY1Г30:Y2Гџ(YЎ120):Ѕ105&<f…YД6001ЇY1Г39:Y2Гџ(YЎ240):Ѕ105&bg…YД14001ЇY1Г50:Y2Гџ(YЎ560):Ѕ105&†hY1Г59:Y2Гџ(YЎ960):…Y2В25ЇY2Г25&›i…Y2Д9ЇY2Г8:Ѕ108&Вj…Y2Д13ЇY2Г12:Ѕ108&Щk…Y2Д17ЇY2Г16:Ѕ108'lY2Г32ЌY2:€XГ0ЅY1:œ(X,Y2,3):‹:€XГY2 Ѕ31:œ(Y1,X,3):‹''m…M(T,2)Г0Ї111:„YГM(T,2):…YВ15ЇYГ15'?nY1Г480:Y9Г239:І130'fo…M(T,4)Г0Ї113:„YГM(T,4):…YВ15ЇYГ15'~pY1Г416:Y9Г218:І130'Ѕq…M(T,3)Г0Ї115:„YГM(T,3):…YВ15ЇYГ15'НrY1Г352:Y9Г246:І130'фs…M(T,7)Г0Ї117:„YГM(T,7):…YВ15ЇYГ15'ќtY1Г288:Y9Г151:І130(!u…M(T,6)Г0Ї128:„YГM(T,6):…YВ9ЇYГ9(NvˆY Ѕ127,126,125,124,123,122,121,120,119(pw€XГ13Ѕ15:œ(X,9,8):œ(X,10,8):‹(ˆx€XГ9Ѕ15:œ(16,X,2):‹(Ђyœ(21,12,7):œ(24,12,7)(Лz€XГ21Ѕ24:œ(X,13,6):‹(д{€XГ23Ѕ26:œ(X,14,5):‹(э|€XГ25Ѕ28:œ(X,15,5):‹)}€XГ19Ѕ22:œ(X,14,5):‹)~€XГ21Ѕ24:œ(X,15,5):‹)8€XГ17Ѕ20:œ(X,15,5):‹)B€K$Гџ’)aK$Гџ’:…K$Г""Ї129:„ 150,1:)†‚€Y2Г1ЅY:‡@Y1,џ‹(Y9);:Y1ГY1Ћ2:‹:*<ƒІ177:’346,191:І181:XJГџƒ1(XJ):‡@75,"YEAR";DT;:‡@97,џЁ(30,42);:‡@130,"TAX TYPE LEVEL REVENUE";:‡@161,џЁ(30,42);:‡@194,"1. HEAD";:‡@207,Э"###";M(T,16);:‡@215,Э"######";HT;*є„‡@226,"2. IMPORT";:‡@239,Э"###";M(T,17);:‡"%";:‡@247,Э"######";IT;:‡@258,"3. PROFIT";:‡@271,Э"###";M(T,18);:‡"%";:‡@279,Э"######";PT;:‡@290,"4. SALES";:‡@303,Э"###";M(T,19);:‡"%";+Ц…‡@311,Э"######";ST;:‡@322,"5. COURTS";:‡@335,J$(T);:‡@343,Э"######";CT;:TRГHTЋITЋPTЋSTЋCT:‡@354,"TOTAL REVENUE";:‡@375,Э"######";TR;:‡@418,"TO MAKE CHANGES, KEY YOUR";:‡@450,"CHOICE, OR KEY '6' TO GO ON.";+а†K$Гџ’,%‡K$Гџ’:KГџ‰(K$):…KД1БKВ6Ї XJГџƒ2(XJ):Ѕ 135::„ 150,1:ˆK Ѕ137,139,140,141,142,136,ЗˆM(T,0)ГM(T,0)ЋTR:X5Г(M(T,16)­10ЋM(T,17)ЋM(T,18)ЋM(T,19)Ћ(M(T,20)Ќ1)­10):M(T,21)ГM(T,21)Ћ(.1Ќ(X5Ў1300)):І152:X5ГX5ЋM(T,23)­7:І161:І148:Ѕ18,п‰ž:‡@98,"NEW HEAD TAX? (1-6)";:K$Гџ’-ŠK$Гџ’:KГџ‰(K$):…KД1БKВ6Ї138:„ 150,1:M(T,16)ГK:Ѕ131-e‹ž:‡@98,"";:‰"NEW IMPORT TAX (0-100)";K:…KВ100Ї139:„ 150,1:M(T,17)ГK:Ѕ131-БŒž:‡@98,"";:‰"NEW PROFIT TAX (0-50)";K:…KВ50Ї140:„ 150,1:M(T,18)ГK:Ѕ131-ќž:‡@98,"";:‰"NEW SALES TAX (0-25)";K:…KВ25Ї141:„ 150,1:M(T,19)ГK:Ѕ131.‘Žž:‡@98,"SELECT THE TYPE OF JUSTICE";:‡@130,"DISPENSED IN YOUR COURTS.":‡@198,"1. LENIENT":‡@230,"2. FAIR":‡@262,"3. FIRM":‡@294,"4. CRUEL":K$Гџ’.иK$Гџ’:KГџ‰(K$):…KД1БKВ4Ї143:„ 150,1:M(T,20)ГK:ˆK Ѕ144,145,146,147.ђJ$(T)Г"LENIENT":Ѕ131/ ‘J$(T)Г"FAIR":Ѕ131/ ’J$(T)Г"FIRM":Ѕ131/8“J$(T)Г"CRUEL":Ѕ1310”…X5Д160Ї:„X6Гџ„(273):…X5ДX6 Ї:„X3Г3:X$Г"REVOLT!!":І172:ž0:€XГ1Ѕ1000:‹:‡@96," THRALLS REVOLT!!! YOU PUT THE REVOLT DOWN ONLY AFTER MUCH LOSS OF LIFE AND PROPERTY. YOUR ADVISORS TELL YOU THE"0­•‡@224," PEOPLE JUST WON'T PUT UP WITH THESE HIGH TAXES!!!!!":M(T,5)ГM(T,5)Ќџ„(M(T,5)):M(T,11)ГM(T,11)Ќџ˜(џ„(M(T,11)Ў2)):…M(T,3)В0ЇM(T,3)Гџ˜(M(T,3)Ќџ„(M(T,3)))0д–…M(T,4)В0ЇM(T,4)ГM(T,4)Ќџ„(M(T,4))0ц—K$Гџ’:І173:1Є˜’346,226:І181:‡@75,"YEAR";DT;:‡@98,"TO PROVIDE YOUR PEOPLE WITH";:‡@130,"A SUBSISTANCE LEVEL DIET,";:‡@162,"YOU MUST DISTRIBUTE AT LEAST";:‡@194,Э"#,###,###";GD;:‡" BUSHELS OF GRAIN.";1ф™‡@226,"YOU HAVE ";:‡Э"#,###,###";M(T,10);:XSГџ˜(M(T,10)Ў10)2jšX8Г0:X7Г0:‡" BUSHELS,";:‡@258,"BUT MUST KEEP";XS;:‡@290,"FOR SEED. HOW MUCH WILL YOU";:‡@322,"";:‰"DISTRIBUTE";X8:… X8ДГ0 Ї X8Г12~›  150,1:ž:Ѕ1592˜œX7ГGDЎX8­2:…X7В5ЇX7Г52Љ…X7Д.5ЇX7Г.52ЭžM(T,10)ГM(T,10)ЌX8:M(T,23)ГX7:3=Ÿ…X8ЋXSЌ1ГДM(T,10)Ї156:„ž:…X8Ќ1ВM(T,10)Ї‡@98,"YOU DON'T HAVE THAT MUCH!!!":„‡@98,"YOU MUST KEEP AT LEAST";XS3S €XГ1Ѕ1000:‹:Ѕ1523њЁX4ГM(T,22)­3000­Ќ1:…M(T,0)ГВX4 Ї162:„ž:X3Г7:X$Г"BANKRUPT":І172:M(T,0)Г0:M(T,2)Г1:M(T,3)Г0:M(T,4)Г0:M(T,6)Г0:M(T,7)Г0:M(T,9)Г200:M(T,10)Г2000:M(T,23)Г2:M(T,11)Г504Ђ…M(T,0)Д0ЇM(T,0)ГM(T,0)­1.254!Ѓ4мЄZ5Г0:ZZГџ(M(T,0)Ў3000):І169:ZZГM(T,2):І169:ZZГM(T,3):І169:ZZГM(T,4):І169:ZZГџ(M(T,5)Ў30):І169:ZZГM(T,6):І169:ZZГM(T,7):І169:ZZГџ(M(T,9)Ў4000):І169:ZZГџ(M(T,11)Ў400):І1695EЅZ6Гџ(Z5ЎLP):…M(T,22)ГВZ6 Ї19:„І175:€XГ1ЅZ6:PT$(T):‹::M(T,22)ГZ6:…Z6Д7ЇЩ"T12O3L2CL2.FL2CL1A":Ѕ195ЪІX3Г8:X$Г"GAME OVER":І172:€XГ1Ѕ300:‹:ž4:‡@98,PT$(T);PN$(T);" WINS!!";:І171:І92:І97:ž0:‡@98,"WANT TO PLAY AGAIN? (Y/N)";:K$Гџ’5ёЇK$Гџ’:…K$ДВ"Y"АK$ДВ"N"Ї167:„ 150,16Ј…K$Г"Y"ЇŽ1:„ž:Š6Љ…ZZВLP ЇZZГLP6&ЊZ5ГZ5ЋZZ:6ЮЋЩ"T4O2L2GL4.AL8BO3L2CO2L4.BL8AL4.GL8AL4GEL2DCGO3L4.CL8DL2EL4.DL8CL4.DL8CL4.DL8EL1DO2L2GL4.AL8BO3L2CO2L4.BL8AL4.GL8AL4GEL2DCGO3L4.CO2L8BL4AO3CO2GEL2GO3L4.CL8DL1C":7!Ќ€XГ1Ѕ8:ž(X3):‡@203,X$;:€YГ1Ѕ10: 10,1:‹:ž(џ„(8)):‡@203,X$;:€YГ1Ѕ10: 15,1:‹Y,X:7@­‡@458,"HIT ANY KEY";:K$Гџ’7zЎ… џ’Г"" Ї XJГџƒ2(XJ):Ѕ 174::„ Щ"T255O4L255CDEFGAB":7‰Џ…Z6В7ЇZ6Г77ЊА…M(T,8)Г1Ї:„€YГ1Ѕ7:X$:‹Y:8yБHTГ(M(T,11)ЋM(T,13)ЋM(T,14)ЋM(T,15)ЋM(T,5))­M(T,16):ITГ(M(T,4)­300ЋM(T,14)­30ЋM(T,13)­9ЋM(T,12)­9)­(M(T,17)Ў100)­(M(T,21)):PTГ(M(T,2)­300ЋM(T,3)­900ЋM(T,4)­(M(T,11)Ћ(M(T,11)Ў8)))­(M(T,18)Ў100)­(M(T,21))8рВSTГ(M(T,2)­80ЋM(T,3)­90ЋM(T,4)­(M(T,11)ЋM(T,11)Ў8))­(M(T,19)Ў100)­(M(T,21)):CTГ(M(T,11)­M(T,20))­28їГ…M(T,20)Г4ЇCTГCT­28§Д9!Еž:XГџƒ(0):‡@34,PT$(T);PN$(T);:9YЖЩ"T4O3L4.CL8DL4.EL8DL4CO2AAGO3L4.DL8CL4O2BO3CL3D":џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ;‡@434,"T":‡@437,Э N$;ST-4<‡@384,"T":‡@387,Э N$;ST-O=‡@480,"E 0.00"-{>… X$Г"Y"Ї ‡#Ќ2,Э N$;ST;:‡#Ќ2," T"џ‹(10)-™?PГ0:Z0$Г"0":CГ1:BГ0:Ѕ 34-Е@‡@434,"S":‡@437,Э N$;ST-ТA‡@384,""-нB‡@480,"E 0.00"-їCZ0$Г"0":PГ0:CГ1:Ѕ 18.DPГ0:Z0$Г"0":STГ0:CГ0:BГ0.QE… X$Г"Y"Ї ‡#Ќ2," CLEAR"џ‹(10):‡#Ќ2,Э N$;P;:‡#Ќ2," T".ZFЅ14.iG… CГ1 Ї 76.H… Z$Гџ‹(46) Ї BГ0.ЭIBГBЋ1:… BГ9 Ї ‡@0,"*ONLY 8 DIGETS LEFT OF DECIMAL*": 100,10: 150,10:Ѕ 64.цJZ0$ГZ0$ЋZ$:PГџ‰(Z0$)/K‡@448,"E":‡@451,Э N$;P:Ѕ 18//L‡@0," USE MATH SIGN FIRST + - * /"/GM 100,10: 150,10:CГ0/PNЅ18/КO‡@0,"YOU CAN NOT DEVIDE BY ZERO ENTER NUMBER <1> NOW TO SAVE YOUR PREVIOUS ENTRIES, AND CONTINUE"/гP 100,10: 150,10:Ѕ52/яQ…X$Г"Y"Ї X$Г"N":„X$Г"Y"/љRЅ 18 N$28)'Ќ ‡џ‹(252)џ‹(255)џ‹(252)џ‹(253)џ‹(250)џ‹(159)џ‹(156)џ‹(157)џ‹(154)џ‹(164)џ‹(173)џ‹(174)џ‹(168)R$џ‹(191)џ‹(188)џ‹(188)џ‹(191)џ‹(213)џ‹(222)џ‹(220)џ‹(223)џ‹(228)џ‹(237);(f ‡џ‹(238)џ‹(236)џ‹(239)џ‹(133)џ‹(140)џ‹(143)џ‹(140)џ‹(138)R$џ‹(255)R$џ‹(245)џ‹(250)џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)џ‹(208)џ‹(223)R$џ‹(229);) ‡џ‹(234)R$џ‹(239)џ‹(133)R$џ‹(143)R$џ‹(138)R$џ‹(255)R$R$R$џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)џ‹(208)џ‹(223)R$џ‹(229);)Ј‡џ‹(234)R$џ‹(236)џ‹(133)R$џ‹(143)R$џ‹(138)R$џ‹(255)R$R$R$џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)џ‹(208)џ‹(223)R$џ‹(229);*D‡џ‹(234)R$R$R$R$џ‹(143)R$R$R$џ‹(255)џ‹(240)џ‹(245)џ‹(250)џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(191)R$R$џ‹(176)џ‹(213)џ‹(218)R$џ‹(223)R$џ‹(229);*є‡џ‹(234)R$џ‹(239)R$R$џ‹(143)R$R$R$џ‹(255)џ‹(252)џ‹(253)џ‹(250)џ‹(159)џ‹(156)џ‹(157)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(188)џ‹(188)џ‹(188)џ‹(191)џ‹(213)џ‹(218)R$џ‹(223)R$џ‹(229);+‡џ‹(238)џ‹(236)џ‹(239)џ‹(224)R$џ‹(143)R$R$R$џ‹(255)R$R$R$џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)R$џ‹(223)R$џ‹(229);,'‡џ‹(234)R$R$џ‹(224)R$џ‹(143)R$џ‹(105)R$џ‹(255)R$R$R$џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)R$R$џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)R$џ‹(223)R$џ‹(229);,У‡џ‹(234)R$R$R$R$џ‹(143)R$џ‹(110)R$џ‹(255)R$R$R$џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)џ‹(161)џ‹(162)џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)R$џ‹(223)R$џ‹(229);-^‡џ‹(234)R$R$R$R$џ‹(143)R$џ‹(99)R$џ‹(255)R$R$R$џ‹(159)R$џ‹(149)џ‹(154)R$џ‹(165)џ‹(170)џ‹(165)џ‹(170)џ‹(191)R$R$џ‹(191)џ‹(213)џ‹(218)R$џ‹(223)R$џ‹(229);."‡џ‹(234)R$R$R$R$џ‹(143)R$R$џ‹(243)џ‹(255)џ‹(243)R$џ‹(147)џ‹(159)џ‹(145)џ‹(151)џ‹(155)џ‹(146)џ‹(167)џ‹(171)џ‹(167)џ‹(170)џ‹(191)џ‹(179)џ‹(179)џ‹(191)џ‹(213)џ‹(219)џ‹(211)џ‹(223)џ‹(225)џ‹(231);.Т‡џ‹(235)џ‹(226)R$R$џ‹(129)џ‹(143)џ‹(130)R$џ‹(195)џ‹(195)џ‹(195)џ‹(194)џ‹(195)џ‹(195)џ‹(195)џ‹(195)џ‹(193)џ‹(195)џ‹(195)џ‹(194)џ‹(195)џ‹(195)џ‹(195)џ‹(193);/l‡џ‹(195)џ‹(195)џ‹(194)џ‹(195)џ‹(194)џ‹(193)џ‹(195)џ‹(195џ5&$:ƒ COPYRIGHT 1990 FALSOFT, INC&/• 5000&; І 2300&EЅ 60&В… џ†(341)Г247 Ї YГYЌ1:::„ … џ†(342)Г247 Ї YГYЋ1:::„ … џ†(343)Г247 Ї XГXЌ1:::„ … џ†(344)Г247 Ї XГXЋ1:&С(… COГ1 Ї '2€ TZГ1 Ѕ 1:€ TXГ338 Ѕ 345:’ TX,255:‹ TX,TZ:A$Гџ’:… A$Г"" Ї 50 :„ 'х<:ƒ ColorBase v1.00 Written by Shane Messer Copyright (c) 1989, All Rights Reserved'ьF:ƒ'ѓP:ƒ(•ZР1:б 1,400:Œ CX(100),CY(100),CN(100),DF$(23),FM$(24),N$(100),S$(100),SF$(75),K$(100):DWГ1 :ƒ0= REGULAR DIRECTORY, 1= WIDE DIRECTORY WITH NAMES AND EXTENSIONS(Ѕdˆ я Ѕ 2990(ЬnFF$Гџ‹(12) :ƒ FORMFEED FOR DMP-132(№x’ 150,40 :ƒ HALF YOUR BAUD RATE)@‚LOГ65496:HIГ65497:FWГ32::ƒTHIS WILL BE THE WIDTH OF THE SCREEN UPON EXITING)їŒ€M2Г1 Ѕ 24:FM$(M2)ГџЁ(80," "):‹M2:KKГ1:і:І 1960:€ M1Г32 Ѕ 122:AC$ГAC$Ћџ‹(M1):‹:џ(AC$,63,1)Гџ‹(127):І2340:т 80:žS1:ј S2,S3:у 10,S4:у 4,S5:… KKГ1 Ї Щ"T255L255O1":K$Г"C"::„ K$Г""*J–:ƒ----------------------------------------------------------------------------*Q :ƒ*]ЊІ 1980*{ДІ 2150:… џŠ(A$)Г12 Ї 220*›ОІ 2160:… M1В0 Ї 200 :„ 180*ЙШˆ M1 Ѕ 220,950,1670,1900*лв:ƒ---------------------------*шм:ƒCREATE*ћц’ HI,0:І 2090+#№І 2150:І 2160:… M1В0 Ї 250 :„ 240+5њ… M1Г10 Ї 160+eˆ M1 Ѕ 270,390,430,460,510,550,610,690,750+w:ƒCREATE FORM+ёž:€ M1Г0 Ѕ 22:‡ FM$(M1Ћ1);:‹:ё 0,23:‡" Use Arrow keys to move around page. Press 'CLEAR' to return to menu.";+џ"XГ40:YГ11,,І 30:… џŠ(A$)Г12 Ї 220,7-… A$Гџ‹(13) Ї XГ1:YГYЋ1,V6… џ†(342)Г191 Ї A$Гџ‹(127),Ј@… џž(AC$,A$)В0 Ї х 442368Ћ(XЌ1)­2ЋY­160,џŠ(A$):џ(FM$(YЋ1),X,1)ГA$:XГXЋ1:Щ K$,ЙJ… XВ80 Ї XГ1,кT… YВ22 Ї YГ0 :„ … YД0 Ї YГ22,ы^… XД1 Ї XГ80,їhё XЌ1,Y-rЅ 300- |Ѕ 230-†:ƒDIRECTORY-S… DWГ0 Ї ž:’ LO,0:Ю:‡"Free ->";џЃ(0):І 50:’ HI,0-hš… DWГ1 Ї І 2770-sЄЅ 230-€Ў:ƒVERIFY-ХИ’ LO,0:€ M1Г0 Ѕ 34:€ M2Г1 Ѕ 18:п DR,M1,M2,M1$,M2$:‹ M2,M1:’ HI,0-аТЅ 230-рЬ:ƒKILL FORM-ћжM$Г"Kill Form":І 2140.рІ 2180:… F$Г"" Ї 230.uъ‡" Kill "F$" Are you sure";:Л‰"? Y/N ->";C$:… C$Г"Y" Ї ’ LO,0:в F$:’ HI,0:Ѕ 230 :„ 230.€єЅ 230.’ў:ƒRENAME FORM.Ч‡:‡:‡" SOURCE:":І 2180:… F$ДВ"" Ї 530 :„ 540/J$ГF$:‡:‡:‡" DESTINATION":І 2180:… F$ДВ"" Ї ж J$ Ѕ F$/Ѕ 230/ &:ƒSAVE FORM/;0M$Г"Save Form":І 2140/U:І 2180:… F$Г"" Ї 230/lD’ LO,0:™ "O",#1,F$/’N€ TГ1 Ѕ 23:й #1,FM$(T):‹:š:’ HI,0/XЅ 230/­b:ƒLOAD FORM/ШlM$Г"Load Form":І 2140/тvІ 2180:… F$Г"" Ї 230/љ€’ LO,0:™ "I",#1,F$0Š€ TГ1 Ѕ 23:‰ #1,FM$(T):‹:š:’ HI,00*”Ѕ 23005žЅ 2300@ЈЅ 2300QВ:ƒERASE FORM0uМM$Г"Erase Current form":І 21400ОЦ‡" Do you really wish to erase the current form? Y/N"0раІ 2150:… A$Г"Y" Ї 730 :„ 2301 к€ TГ0 Ѕ 22:FM$(T)ГџЁ(80," "):‹T:Ѕ 2301фЅ 2301*ю:ƒMAKE DATABASE1MјFCГ0:M$Г"Make Database":І21401˜‡" Converting data to database form. Please wait ..."1Ї € TГ1 Ѕ 231иNГџž(FM$(T),џ‹(127)):… NГ0 Ї DF$(T)ГFM$(T):‹2R … NВ0 Ї NIГNIЋ1:CX(NI)ГN:CY(NI)ГT:€ WAГN Ѕ 79:… џ(FM$(T),WA,1)Гџ‹(127) Ї CN(NI)ГCN(NI)Ћ1:џ(FM$(T),WA,1)Г" ":‹ WA::„2c*… TГ24 Ї 8302n4Ѕ 7902л>€ TГ1 Ѕ NI:FCГFCЋCN(T):‹ T:… FCВ255 Ї ‡" Sorry! You have too many entries! Please re-edit!":І 50:Ѕ 2303H‡:‡" Done!"3^R‡:‡" You are ready to save your database form. (DEFAULT is DATAFORM.DAT)3†\І 2180:… F$Г"" Ї F$Г"DATAFORM.DAT"3Аf‡:‡" Save "F$" to disk? Y/N ->";3аpЛ‰ A$:… A$Г"Y" Ї 890 :„ 2303цz’ LO,0:™"O",#1,F$48„й #1,NI:€ TГ1 Ѕ NI:й #1,CX(T),CY(T),CN(T):‹:€ TГ1 Ѕ 23:й #1,DF$(T):‹:š:’ HI,04ѓŽЛ‰" Use form to create a database? Y/N ->";A$:… A$Г"Y" Ї ’ LO,0:™"O",#1,"MISC.DAT":й #1,0:š:І 912:І 2180:… F$Г"" Ї F$Г"DATABASE.DAT":™"O",#1,F$:š:Ѕ 230::„ ™"O",#1,F$:š:Ѕ 2304ўЅ 9205L‡" You are ready to create your database. (DEFAULT is DATABASE.DAT)":5W˜Ѕ 2305bЂЅ 2305„Ќ:ƒ---------------------------5“Ж:ƒMAINTAIN6РSWГ0:‡" Please enter then name of your database form (DEFAULT is DATAFORM.DAT)":І2180:… F$Г"" Ї D1$Г"DATAFORM.DAT" :„ D1$ГF$6›Ъ‡" Please enter the name of your database file (DEFAULT is DATABASE.DAT)":І 2180:… F$Г"" Ї D2$Г"DATABASE.DAT" :„ D2$ГF$6ЇдІ 23506Еоš:І 20606зш‡:‡:‡M$"No. of records ->";NF7ђІ 2150:І 2160:… M1В0 Ї 1020 :„ 10107ќ… M1Г6 Ї 16077ˆ M1 Ѕ 1040,1210,1370,1540,15907A:ƒADD7MІ 23607j$ž:€ TГ1 Ѕ 23:‡ DF$(T);:‹7Ї.‡" Press 'CLEAR' to leave.";7Џ8CГ17аB… CД1 Ї CГ1::„ … CВNI Ї CГNI7мLІ 23807іV… N$(C)В"" Ї ‡ N$(C);8`І 508}j… џŠ(A$)Г13 Ї ё CX(C)Ќ1,CY(C)Ќ1:‡ џЁ(CN(C)," ");:ё CX(C)Ќ1,CY(C)Ќ1:‡ N$(C);:‡џ(DF$(CY(C)),CX(C)ЋCN(C),1);:CГCЋ1:Ѕ 10908t… џŠ(A$)Г94 Ї CГCЌ1:Ѕ 10908Д~… џŠ(A$)Г12 Ї 24008эˆ… џž(AC$,A$)В0 А џ‡(N$(C))ДRM Ї ‡ A$;:N$(C)ГN$(C)ЋA$9R’… џŠ(A$)Г8 А џ‡(N$(C))В0 Ї N$(C)ГџŽ(N$(C),џ‡(N$(C))Ќ1):І 2380:‡ џЁ(CN(C)," ");:І 2380:‡ N$(C);9^œЅ 11209iІЅ 9909ŠА:ƒ--------------------------9—К:ƒSEARCH9 ФSWГ09ЖЮІ 2360:ž:І 26009ли… XXД1 Ї XXГ1 :„ … XXВNF Ї XXГNF:FтSWГSWЋ1:… SWГ1 Ї І 2570::„ Ф #1,XX:V$(1)ГK$(1):І 2850:€ TГ1 Ѕ NI:ё CX(T)Ќ1,CY(T)Ќ1:‡ S$(T);:‹:’ HI,0:Xь… SWГ1 Ї 1250:Ѕіё 0,23:‡" for Commands. To quit. Rec no.->";XX;:ЏІ 50;4 … џŠ(A$)Г94 Ї XXГXXЋ10:Ѕ 1240::„ … џŠ(A$)Г10 Ї XXГXXЌ10:Ѕ 1240::„ … џŠ(A$)Г8 Ї XXГXXЌ1:Ѕ 1240 :„ … џŠ(A$)Г9 Ї XXГXXЋ1:Ѕ 1240;л… A$Г"S" Ї ё 0,23:‡ џЁ(78," ");:ё 0,23:Л‰ "Search for what string? ->";S$:… S$Г"" Ї A$Г" ":І 2880:І 5000:Ѕ 1302 :„ … S$ДВ"" Ї І 2880:І 5000:… REC В NF Ї 1302<‹… ZВNF Ї 1302 :„ …A$Г"S"Їё0,23:‡"Press to go to next occurence or to exit. RECORD:";Z;:Ђ44539:Z$Гџ’:…Z$Г" "ЇXXГXXЋ1:… XXВNF Ї 1302 :„ І2880:І5000:Ѕ 1301<Ѓё 0,23:‡џЁ(75," ");=`… A$Г"K" Ї ё0,23:‡ џЁ(78," ");:ё 0,23:‡" Delete current record? Are you sure?";:І 50:… A$Г"Y" Б A$Г"y" Ї І 2570:… TГNF Ї І 3000 :„ € TГXX Ѕ NFЌ1:Ф#1,TЋ1:Х #1,T:‹:NFГNFЌ1:І =˜(… A$Г"F" Ї XXГ1:Ѕ 1240::„ … A$Г"L" Ї XXГNF:Ѕ 1240=Ў2… џŠ(A$)Г12 Ї 990=а<… џŠ(A$)Г13 Ї І 2610:Ѕ 1240=мFЅ 1240=§P:ƒ-------------------------->Z:ƒEDIT>Odё 0,18:Л‰"Which record to edit? ->";E$:EГџ‰(E$):… EД1 Б EВNF Ї 990>—nІ 2360:І 2570:Ф #1,E:V$(1)ГK$(1):І 2850:€ TГ1 Ѕ NI:N$(T)ГS$(T):‹>оxž:€ TГ1 Ѕ 23:‡ DF$(T);:‹:€ TГ1 Ѕ NI:ё CX(T)Ќ1,CY(T)Ќ1:‡ N$(T);:‹ T?"‚ё 0,23:‡" Press 'CLEAR' to leave.";?*ŒCГ1?K–… CД1 Ї CГ1::„ … CВNI Ї CГNI?W І 2380?qЊ… N$(C)В"" Ї ‡ N$(C);?{ДІ 50?јО… џŠ(A$)Г13 Ї ё CX(C)Ќ1,CY(C)Ќ1:‡ џЁ(CN(C)," ");:ё CX(C)Ќ1,CY(C)Ќ1:‡ N$(C);:‡џ(DF$(CY(C)),CX(C)ЋCN(C),1);:CГCЋ1:Ѕ 1430@Ш… џŠ(A$)Г94 Ї CГCЌ1:Ѕ 1430@7в… џŠ(A$)Г12 Ї OOГ1:Ѕ 2400@pм… џž(AC$,A$)В0 А џ‡(N$(C))ДRM Ї ‡ A$;:N$(C)ГN$(C)ЋA$@ец… џŠ(A$)Г8 А џ‡(N$(C))В0 Ї N$(C)ГџŽ(N$(C),џ‡(N$(C))Ќ1):І 2380:‡ џЁ(CN(C)," ");:І 2380:‡ N$(C);@с№Ѕ 1460@ьњЅ 990@ќ:ƒDIRECTORYA9… DWГ0 Ї ’ HI,0:ž:Ю:‡"Free ->";џЃ(0):І 50:’ LO,0:Ѕ 990AN… DWГ1 Ї І 2770AY"Ѕ 990Ad,Ѕ 990Ap6:ƒPRINTAз@ž:M$Г"Print record(s)":І 2140:‡:‡:‡:Л‰"WHICH RECORD TO PRINT ('*' FOR ALL) ->";N$:… N$Г"*" Ї 1620AљJ… џ‰(N$)Д1 Б џ‰(N$)ВNF Ї 1650B8TЛ‰"FORMFEEDS? ->";YF$:‡"PRESS ANY KEY TO BEGIN.....":І 50Bh^… N$Г"*" Ї € FFГ1 Ѕ NF:І 2900:‹ FF:Ѕ 1650B~hFFГџ‰(N$):І 2900B‰rЅ 990BЋ|:ƒ---------------------------BЗ†:ƒSETUPBУІ 2020BэšІ 2150:І 2160:… M1В0 Ї 1700 :„ 1690BўЄ… M1Г3 Ї 160CЎˆ M1 Ѕ 1720,1850C&И:ƒSET DISPLAYC9ТCOГ1:XГS4:YГS5CXЬM$Г"Setup Display":І 2140Cvжё 10,5:‡"Foreground ->"S4C”рё 10,6:‡"Background ->"S5CЙъё 15,8:‡"Press 'ENTER' to exit."Cиє… џ’Гџ‹(13) Ї COГ0:Ѕ 1680CьўІ 30:S4ГX:S5ГYD… S5В63 Ї S5Г0 :„ … S5Д0 Ї S5Г63D6… S4В63 Ї S4Г1 :„ … S4Д0 Ї S4Г63DDXГS4:YГS5DW&у 4,S5:у 10,S4Dc0Ѕ 1750Dv::ƒSAVE DEFAULTDЏD’ LO,0:™ "O",#1,"SETUP":й #1,S1,S2,S3,S4,S5:š:’ LO,0DЛNЅ 1670DЦXЅ 160Dшb:ƒ---------------------------Dѓl:ƒEXITELvM$Г"Exit":І 2140:‡" Do you really wish to exit? (Y/N) ->":І 2150Ek€… A$Г"Y" Ї ž:т FW:Š::„ 160EvŠЅ 160EЩ”:ƒ----------------------------------------------------------------------------FЈ’ LO,0:™"I",#1,"SETUP":‰ #1,S1,S2,S3,S4,S5:š:’ HI,0:FВ:ƒPRINT MENU 1F3МM$Г" Main Menu ":І 2140FEЦM$ГџЁ(30," ")FРа‡ M$"C - Create Database":‡M$"M - Maintain Database":‡M$"S - Screen Dafault":‡M$"X - Exit Program to BASIC":SL$Г"CMSX"FЦкFйф:ƒPRINT MENU 2G^юM$Г"Setup Display":І 2140:M$ГџЁ(30," "):‡M$"C - Customize Display":‡M$"S - Save Default":‡M$"X - Exit to Main Menu":SL$Г"CSX":GdјGw:ƒPRINT MENU 3H< M$Г"Maintain Database":І 2140:M$ГџЁ(30," "):‡M$"A - Add Record":‡M$"S - Search records":‡M$"E - Edit Record":‡M$"D - Directory":‡M$"P - Print Record":‡M$"X - Exit to Main Menu":SL$Г"ASEDPX":HBHU :ƒPRINT MENU 4I *M$Г"Create Database":І 2140:M$ГџЁ(30," "):‡M$"C - Create Form":‡M$"D - Directory":‡M$"V - Verify Disk":‡M$"K - Kill Form":‡M$"R - Rename Form":‡M$"S - Save Form":‡M$"L - Load Form":SL$Г"CDVKRSLEMX"It4‡M$"E - Erase current form":‡M$"M - Make Database":‡M$"X - Exit to main menu":Iz>IH:ƒPRINT MENU 5I“RIћ\ј 2,4:ž:M1Гџ‡(M$):M1Г80ЌM1:M1Гџ(M1Ў2):ј 3,2:‡џЁ(M1Ќ1," ");:ј S2,S3,U:‡M$" ";:ј 3,2:‡:‡:ј 2,4:‡:‡:JfЂ 44539:A$Гџ’:Щ"T10L10O4A":J0pM1Гџž(SL$,A$):Jz:ƒ--------------------------------------------------------------------------JЌ„Л‰" PLEASE INPUT THE FILENAME->";F$JМŽ… F$Г"" Ї Jм˜INГџž(F$,"."):IMГџž(F$,"/")KЂ… (IN Б IM)Д1 А џ‡(F$)В8 Ї 2280K!Ќ… (IN Б IM)Д1 Ї F$ГF$Ћ".DAT"K>Ж… IMВ1 Ї џ(F$,IM,1)Г"."K_Р… џ‡(F$)Ќџž(F$,".")В3 Ї 2280KyЪ… џž(F$,"/")В0 Ї 2280KдK…оKЌш‡ " BAD FILENAME":  1,2:Ѕ 2180K§ђ:ƒ--------------------------------------------------------------------------LGќ’ 65497,0:т 40:ž3:ј 2,4:ž:ё 0,3:€ SГ1 Ѕ 8: C1$:І 2320:‡:‹:’ 65496,0LM L} LГџ‡(C1$):LГ40ЌL:LГџ(LЎ2):‡џЁ(L," ");C1$:M( † ColorBase v1.20,For 128k CoCo with disk drive,Written By Shane Messer,"Copyright (c), 1989",Modified 1/16/90,All Rights Reserved,Configuring Program,Please Wait ...M“ $ё 0,17:‡:ё0,17:C1$Г"Done.":І 2320:‡:C1$Г"Press any key to continue ...":І2320:Щ"L20T10O3A":Ђ 44539:MЧ .š:’ LO,0:™ "I",#1,"MISC.DAT":‰ #1,NF:š:’ HI,0:N0 8š:’ LO,0:™ "I",#1,D1$:‰#1,NI:€ TГ1 Ѕ NI:‰ #1,CX(T),CY(T),CN(T):‹:€ TГ1 Ѕ 23:‰ #1,DF$(T):‹:š:’ HI,0:N B:ƒ--------------------------------------------------------------------------N— Lё CX(C)Ќ1,CY(C)Ќ1NЋ VRMГCN(C):LMГ1:O! `ё 0,23::‡" Do you wish to save this record? ";P. œ€ TГ1 Ѕ NI:N$(T)Г"":‹Pb ІІ 50:… A$Г"N" Ї 990::„ … A$Г"Y" Ї 1060 :„ 2470Px А… OOДВ1 Ї NFГNFЋ1P– Кš:’ LO,0:™ "D",#1,D2$,255Pг ФS$Г"":€ QГ1 Ѕ NI:І 2860:S$ГS$ЋN$(Q):‹:а #1,255 џЇ K$(1)Pт Юд K$(1)ГS$Q и… OOГ1 Ї Х#1,E:š:’ HI,0 :„ Х #1,NF:š:’ HI,0Q т:ƒQ? ьš:™"O",#1,"MISC":й #1,NF:š:’ HI,0QE іQ– :ƒ--------------------------------------------------------------------------QЧ š:’ LO,0:™ "D",#1,D2$,255:а #1, 255 џЇ K$(1)QЭ R :ƒ--------------------------------------------------------------------------R; (€ TГ1 Ѕ 23:‡ DF$(T);:‹:R\ 2:ƒ--------------------------Rf <ё 0,0RО F€ TГ1 Ѕ 23:‡ џЁ(80," ");:‹:ё 0,0:M$ГџЁ(20," "):‡" "M$"SEARCH COMMANDS":‡:‡Rє P‡M$" - Takes you to this menu"S2 Z‡M$" - To take you out of search mode"Sq d‡M$" - Takes you ten records backwards"SЎ n‡M$" - Takes you ten records forward"Sц x‡M$" - Takes to back one record"T" ‚‡M$" - Takes you forward one record"T[ Œ‡M$" - Delete the current record"T” –‡M$" - Takes you to first record"TЬ  ‡M$" - Takes you to last record"U Њ‡M$" - Searches for entered string"UD Д‡:‡:‡:‡M$" Press any key to return to search mode ...":UX ОІ 50:І 2600:UЉ Ш:ƒ--------------------------------------------------------------------------V' в’ LO,0:IГ0:SГ0:TГ0:ž:€ TГ3Ѕ11:п0,17,T,A$,B$:C$ГA$ЋџŽ(B$,127):€QГ1Ѕ255Љ32:…џ(C$,Q,1)Гџ‹(0)Ї2790:„…џ(C$,Q,1)Гџ‹(255)Ї2800VH мSF$(IЋTЌ3)Гџ(C$,Q,11):IГIЋ1VR ц‹ Q,TVЭ №’ HI,0:€ SГ0 Ѕ IЋ3:SF$(S)ГџŽ(SF$(S),8)Ћ"."Ћџ(SF$(S),9,3):‹S:€ SГ0ЅIЋ3:… џ‡(SF$(S)) ДВ 1 Ї ‡ " ";SF$(S);" ";::„ 2810Vѕ њ‹S:‡:’ LO,0:‡"Free ->";џЃ(0):’ HI,0W € SГ0 Ѕ IЋ3:SF$(S)Г"":‹W І 50W! Ww "’ 65497,0:PSГ1:€ TГ1 Ѕ NI:S$(T)Гџ(V$(1),PS,CN(T)):PSГPSЋCN(T):‹:PSГ0:’ 65496,0:WГ ,… џ‡(N$(Q))ДCN(Q) Ї N$(Q)ГN$(Q)ЋџЁ(CN(Q)Ќџ‡(N$(Q))," ")WЙ 6X @І 2570:… XXВNF Ї  :„€ ZГXX Ѕ NF:Ф #1,Z:… џž(K$(1),S$)В0 Ї XXГZ:X J‹ Z:ё 0,23:‡ џЁ(79," ");:ё 0,23:  1,1:ј 2,4,B:€ TГ1 Ѕ 10:‡:‹ T:‡" SPCIFIED STRING IS NOT ABLE TO BE LOCATED!":Ђ 44539:ј 2,4:A$Г" ":XЎ T:ƒPRINT OUTSXу ^SFГ1:І 2360:І 2570:Ф #1,FF:V$(1)ГK$(1):І 2850Xќ h’ 65497,0:€ TГ1 Ѕ 23Y/ r… CY(SF)ВT Б SFГВNI Ї ‡ #Ќ2,DF$(T):‹ T:Ѕ 2970YF |€ KГ1 Ѕ џ‡(DF$(T))Y  †… CX(SF)ГK А CY(SF)ГT Ї ‡ #Ќ2,S$(SF);:KГKЋџ‡(S$(SF)):SFГSFЋ1::„ ‡ #Ќ2,џ(DF$(T),K,1);Y­ ‹:‡#Ќ2:‹YЭ š… џŽ(YF$,1)Г"Y" Ї ‡ #Ќ2,FF$Yг ЄZC Ўт 40:ž:‡"SYSTEM ERROR!!":  1,1:‡"ERROR #";џЌ" IN LINE ";џ­:Л‰"RERUN PROGRAM? ->";Y$:… џŽ(Y$,1)Г"Y" Ї Ž :„ ŠZ| ИA$ГџЁ(255," "):д K$(1)ГA$:Х #1,1:š:NFГNFЌ1:І 2540:ZПˆ’ 65497,0:ž:І 2600:’ 65496,0:… XXВNF Ї RECГNFЋ1: :„ RECГNFЌ1[‰Ф #1,XX:V$(1)ГK$(1):І 2850:’ 65497,0:€ TГ1 Ѕ NI:ё CX(T)Ќ1,CY(T)Ќ1:‡ S$(T);:’ 65496,0:‹:RAM? ->";Y$:… џŽ(Y$,1)Г"Y" Ї Ž :„ ŠZ| ИA$ГџЁ(255," "):д K$(1)ГA$:Х #1,1:š:NFГNFЌ1:І 2540:ZПˆ’ 65497,0:ž:І 2600:’ 65496,0:… XXВNF Ї RECГNFЋ1: :„ RECГNFЌ1[‰Ф #1,XX:V$(1)ГK$(1):І 2850:’ 65497,0:€ TГ1 Ѕ NI:ё CX(T)Ќ1,џo&$:ƒ COPYRIGHT 1990 FALSOFT,INC&G :ƒWATRBIL BY ROGER SEVERS 9/89&nBГ3000:ƒBASE AMOUNT OF CONSUMPTION&‘DГ16.5:ƒDOLLAR AMOUNT FOR BASE&Џ(RГ.00175:ƒRATE PER GALLON&Ы2LCГ.1:ƒLATE CHARGE RATE&б<ž&ьF‰" PREVIOUS READING";P'P‰" PRESENT READING";PR'$ZCГPRЌP:‡" CONSUMPTION";C'=dCTГCЋCT:… CДB Ѕ 120'On… CВГB Ѕ 130'_xFCГ0:Ѕ 140'p‚CГCЌB:FCГC­R'ŒTГDЋFC:‡" NET CHARGE IS ";T'Б–‡" TOTAL CONSUMPTION IS ";CT'з ‰" IS THERE A LATE CHARGE Y/N";L$'№Њ… L$Г"Y" Ї 180 :„ 60(Д‰" ENTER LAST MONTH'S WATER BILL ";LT(BОFCГLT­LC:‡" 10% LATE CHARGE IS ";FC(rШ‰" WAS LAST MONTH'S WATER BILL PAID Y/N";M$(Œв… M$Г"N" Ї 250 :„ 220(Њм‡" TOTAL CHARGE IS ";TЋFC(бц‰" TO START A NEW BILL ENTER A";G$(ы№… G$Г"A" Ї Ѕ 60 :„ Š)њ‰" ENTER UNPAID BILL";U)NTГTЋFCЋU)0‡" TOTAL CHARGE IS";NT)W‰" TO START A NEW BILL ENTER A";G$)n"… G$Г"A" Ї 60 :„ Š$(Œв… M$Г"N" Ї 250 :„ 220(Њм‡" TOTAL CHARGE IS ";TЋFC(бц‰" TO START A NEW BILL ENTER A";G$(ы№… G$Г"A" Ї Ѕ 60 :„ Š)њ‰" ENTER UNPAIDџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§&$:ƒ COPYRIGHT 1990 FALSOFT,INC&1’65497,0&;ф2:ц8&Vъ(60,20)Ќ(260,171),Н,B&qъ(62,22)Ќ(257,168),Н,B&‚ш(61,21),1,1&­XГ160:YГ95:XXГ160:YYГ95:FLГ1:INГ9:CTГ0&ЯIN$Гџ’:… IN$ДВ"" Ї INГџŠ(IN$)'!XXГX:YYГY:… INГ94 Ї YГYЌ1 :„… INГ10 Ї YГYЋ1 :„… INГ9 Ї XГXЋ1 :„… INГ8 Ї XГXЌ1'? … FLГ0 Ї … џЋ(X,Y)Г1 Ї 14'H FLГ0'` ѓ(X,Y,6):ѓ(XX,YY,1)'l CTГCTЋ1't Ѕ7'‘ч2,8:ю(9,10),"THAT'S IT"'Ею(9,15),"SCORE IS ":ю(20,15),CT'рю(9,20),"PRESS TO END":Л ‰ IN$'щч1,8'і’65496,0'ќŠ :„… INГ9 Ї XГXЋ1 :„… INГ8 Ї XГXЌ1'? … FLГ0 Ї … џЋ(X,Y)Г1 Ї 14'H FLГ0'` ѓ(X,Y,6):ѓ(XX,YY,1)'l CTГCTЋ1't Ѕ7'‘ч2,8:ю(9,10),"THAT'S IT"'Ею(9,15),"SCORE IS ":ю(20,15),CT'рю(9,20),"PRESS TO END":Л ‰ IN$'щч1,8'і’65496,0'ќŠџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€&$:ƒ COPYRIGHT 1990 FALSOFT,INC&3:ƒBIRDHUNT&F:ƒKATHY RUMPEL&]:ƒROUTE 1 BOX 67-A&u:ƒARCADIA, WI 54612&…ї:ˆ № Ѕ 39&’ 65497,0:SCГ0:џŸГ0&Ќф2:ц8:ч4,8&Фъ(10,55)Ќ(305,55),Н' A$Г"S12R5F2D3GF3E3DRDRDL5G2L7H2U2EHU3E2BF2BD2FGHEBD2RFD2GL2HU2ERBH2LBR5R"'A B$Г"S4R2BRR2BRBDL7DR7DL7BDBRR5BDBLL3BDBRR"'Y C$Г"U25E2R2F2D25L6"'n … џŸВ1900 Ї І39'€ HOГ150:VEГ200'˜ѕ"BM=HO;,=VE;C6"ЋC$'ЋHГџ„(250):VГ20'а… HВ250 Ї HГ250 :„ … HД50 Ї HГ50'цѕ"BM=H;,=V;C2"ЋA$'їHГHЋ4:VГVЋ22( ѕ"BM=H;,=V;C3"ЋB$($I$Гџ’:… I$Г"" Ї 20(<ѕ"BM=HO;,=VE;C8"ЋC$(V… I$Гџ‹(8) Ї HOГHOЌ10(p… I$Гџ‹(9) Ї HOГHOЋ10(ˆ… I$Гџ‹(94) Ї І 31(ž… HOВ300 Ї HOГ300(В… HOД10 Ї HOГ10(Ъѕ"BM=HO;,=VE;C6"ЋC$(дЅ 20)ч4,8:ъ(10,55)Ќ(305,55),Н:ѕ"BM=H;,=V;C8"ЋB$) Ѕ 12)3€ SHГVEЌ10 Ѕ 35 ЉЌ35:ѓ(HOЋ5,SH,4))K ъ(10,55)Ќ(305,55),О)\!HГHЌ4:VГVЌ22)r"ѕ"BM=H;,=V;C8"ЋA$)ƒ#HГHЋ4:VГVЋ22)Б$… џЋ(HOЋ5,SH)Г8 Ї І 38 :„ ѓ(HOЋ5,SH,8):‹)Р%Ѕ 29:Ѕ12*&ц8:Щ"T255O4DCAE":SCГSCЋ100:ч4,8:ю(12,1),"SCORE:":ю(20,1),SC:ч4,8:*G'€XГ1Ѕ5:Щ"T255O4DCAE":‹X:ч3,8:ю(9,15),"ANOTHER ROUND? (Y/N)"*^(I$Гџ’:… I$Г"" Ї 40*)… I$Г"Y" Ї Ž :„ ’65496,0:ž:Š2)Б$… џЋ(HOЋ5,SH)Г8 Ї І 38 :„ ѓ(HOЋ5,SH,8):‹)Р%Ѕ 29:Ѕ12*&ц8:Щ"T255O4DCAE":SCГSCЋ100:ч4,8:ю(12,1),"SCORE:":ю(20,1),Sџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ T&$:ƒ COPYRIGHT 1990 FALSOFT, INC&.•7000&AŒ P(52),V$(13)&Oˆ № Ѕ144&aї:т40:ž4:ј3,3&Њ ‡"This is 3-D Graphing program. There are three main options to it."&т ‡:‡"1)Regular size graph":‡"2)Expanded scale graph"' ‡"3)Printing of either type of graph"'e‡:‡"**Note that you can plot from 1-31 points (range=0 to 99999) use -1 to end"'mAГ1'Пё0,15:‡"Enter number ":ё13,15:‡A:ё16,15:‡"to plot";:‰ P(A):ё24,15:‡" "'д… P(A)Д0А AГ1Ї20'я… P(A)ГЌ1 Ї AГAЌ1:Ѕ30( … P(A)В99999 Б P(A)Д0Ї 20(.AГAЋ1:… AВ52Ї AГAЌ1:Ѕ30:„20(K:ƒ**** INITIALIZING ****(| SMГP(1):LGГP(1):€ QГ1Ѕ A:… P(Q)ВLG Ї LGГP(Q)(”"… P(Q)ДSM Ї SMГP(Q)(Ѕ$‹:QГQЌ1:FLГ1(Н&EXГ0:ZГЌ2:… LGГ0Ї Ž(ы(Y2Г(53ЌQ)­2:SCГ(180ЌY2)ЎLG:PCГ(182ЌY2)ЎLG)*GГ(295ЎQ)­2:G2ГGЎ2),:ƒ**** SET SCREEN ****)7.ф4:ч1:у3,63:у2,3:у0,0)F0ˆ № Ѕ 144)S2’65497,0)j4ъ(40,0)Ќ(40,180),Н)6€ LГ180 Ѕ 0 ЉЌ16)Л8VГ(180ЌL)ЎSCЋEX:… VД1000Ї VГџ(VЎ.1Ћ.5)­.1:„ VГџ(VЋ.5))х:V$Гџˆ(V):UГџ‡(V$):V$Гџ(V$,UЌ1):AГAЋ1)ѕ<ю(0,LЎ8),V$*>€ BГ44Ѕ630Љ G:ъ(BЌ4,L)Ќ(B,L),Н:‹* @‹*sBю(0,23),"=expansion

=printer =regular size nother plot =quit"*D:ƒ**** PLOT BARS *****•FAГ1*ПH€ XГ44Ѕ630Љ G:YГџ(180ЌP(A)­SCЋ.5):ч3*ЮJ… XВ630Ї88*щLъ(X,183)Ќ(XЋG2,Y),Н,BF+^Nъ(X,Y)Ќ(XЋG2­.66,YЌG2­.13),Н:ъ(XЋG2,Y)Ќ(XЋG2ЋG2­.66,YЌG2­.13),Н:ъ(XЋG2,183)Ќ(XЋG2ЋG2­.66,183ЌG2­.13),Н:ƒ///lines+УPъ(XЋG2­.66,YЌG2­.13)Ќ(XЋG2ЋG2­.66,YЌG2­.13),Н:ъ(XЋG2ЋG2­.66,183ЌG2­.13)Ќ(XЋG2ЋG2­.66,YЌG2­.13),Н+зRш(XЋG2,YЌ1),2,3+эTш(XЋG2Ћ1,181),2,3+љVAГAЋ1:‹,.XA$Гџ’:… A$Г"P"Ї98:„ … A$Г"R"Ї96:„ … A$Г"A"Ї ф0:Ž,?Z… A$ДВ"E"Ї88,…\… FLГ2Ї88:„ ц:€ AГ1Ѕ Q:P(A)ГP(A)ЌSM:‹:LGГLGЌSM:EXГSM:… LGГ0Ї LGГ1,“^FLГ2:Ѕ40,Ю`… FLГ1Ї88:„ € AГ1Ѕ Q:P(A)ГP(A)ЋSM:‹:LGГLGЋSM:FLГ1:Ѕ38,юb:ƒ**** PRINTER ROUTINE ****-d’65496,0:’150,18-fR$Гџ‹(28)Ћџ‹(6)-=hG$Гџ‹(18):N$Гџ‹(30)Ћџ‹(27)Ћџ‹(20)-RjP$Гџ‹(27)Ћџ‹(16)-hlLF$Гџ‹(27)Ћџ‹(51)-{nSPГџ†(65314)А1-тp… SPВ0Ї Щ"V2;L100;C":’ &HE6E4,&HE6:ф0:’ &HE6E4,&HE7:т40:ј2,3:‡"TURN THE PRINTER ON !!!":Ѕ110:„116. rA$Г"":’ &HE6E4,&HE6:ф4:’ &HE6E4,&HE7.UtDГ0:€ AГ182Ѕ0ЉЌ14:VГ(182ЌA)ЎPC:… VД100Ї VГџ(VЎ.1Ћ.5)­.1:„ VГџ(VЋ.5).‡vV$Гџˆ(VЋEX):UГџ‡(V$):V$(D)Гџ(V$,UЌ1):DГDЋ1:‹.™xDГ14:€ AГ0Ѕ26.уz… AЎ2Гџ(AЎ2)Ї DГDЌ1:‡#Z,N$;:‡#Z,Э"% %";V$(D);:‡#Z,џЁ(Q­2Ћ1,".");.џ|TГ1:€ JГ45Ѕ(Q­14Ћ35)Љ14/1~… JВ255Ї F1Гџ(JЎ256):FГJЋ1ЌF1­256:„ F1Г0:FГJ/i€YYГџ(182ЌP(T)­PCЋ.5):… A­7ДYY Б YYВ181Ї NNГ0:Ѕ138/…‚… A­7ГYY Ї NNГ128:Ѕ136/Ѓ„… A­7ВYYЋ7 Ї NNГ255:Ѕ136/п†NNГ0:D2Г7Ќ(A­7ЌYY):€ KГD2 Ѕ 6:NNГNNЋџ(2ЏK):‹:NNГNNЋ1280ˆ‡#Z,N$;P$;џ‹(F1);џ‹(F);G$;R$;џ‹(NN);0ŠTГTЋ1:‹:‡#Z,G$;LF$0)ŒTГ0:‹0;Ž’65497,0:Ѕ880Sф0:ї:т40:’65496,0:Š YYВ181Ї NNГ0:Ѕ138/…‚… A­7ГYY Ї NNГ128:Ѕ136/Ѓ„… A­7ВYYЋ7 Ї NNГ255:Ѕ136/п†NNГ0:D2Г7Ќ(A­7ЌYY):€ KГD2 Ѕ 6:NNГNNЋџ(2ЏK):‹:NNГNNЋ1280ˆ‡#Z,N$;P$;џ‹(F1);џ‹(F);G$;Rџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ&$:ƒ COPYRIGHT 1990 FALSOFT, INC&Bd:ƒ DIGITAL LOGIC ANALYZER&Wn:ƒ BASIC PROGRAM&yx:ƒ WRITTEN BY DENNIS H. WEIDE&€‚:ƒ&ВŒ•150,&H3B00:’150,1:’&HFF43,145::ƒPROGRAM 8255&л–ž:‡" DIGITAL LOGIC ANALYZER PROGRAM"&ј ‡Є7)"BY DENNIS H. WEIDE"'ЊŒ GR(20),BL(5),B1(13)';Д† 4F,8E,3D,0,A7,80,8C,7C,FF,2F,F9,39'ŸО† 8E,3D,0,4F,B7,FF,41,B6,FF,40,A7,80,86,4,B7,FF,41,4F,B7,FF,41,B6,FF,40,A7,80,8C,7C,FF,2F,ED,39'уШ† BE,3B,AE,10,8E,3C,0,B6,3B,AD,A4,80,A7,A0,10,8C,3C,EF,2F,F3,39'њв€XГ&H3BB0 Ѕ &H3BBB( мA$:A$Г"&H"ЋA$(ц’X,џ‰(A$):‹X(5№€XГ&H3BC0 Ѕ &H3BDF(HњA$:A$Г"&H"ЋA$(Y’X,џ‰(A$):‹X(p€XГ&H3BE6 Ѕ &H3BFA(ƒA$:A$Г"&H"ЋA$(”"’X,џ‰(A$):‹X(Ј,€XГ0Ѕ9:N$(X):‹)6† U8R5D8NL5BR3,R2LU8NGBR4BD8,NR5UE5U2L5NDR5BR3BD8,NUR5U4NL4U4L5DUBR8BD8,BU4NU4R5U4D8BR3)f@† UDR5U5L5U3R5BR3BD8,R5U4L5D4U8R5DBR3BD7,UE5U2L5NDBR8BD8,NR5U4NR5U4R5D8BR3,NUR5U8L5D4R5BR3BD4)JЂ&H3BB0:’&HFF41,2::ƒZEROBUF & CLR FF)ЏT‡:‡Є7)"ENTER CLOCK SPEED":‡*^‡Є10)"0. DIV BY 1":‡Є10)"1. DIV BY 2":‡Є10)"2. DIV BY 4":‡Є10)"3. DIV BY 8":‡Є10)"4. DIV BY 16"*-h‡Є10)"";:‰"SPEED >";S*ZrS$Г"&H"Ћџœ(S)Ћ"0":SГџ‰(S$):’&HFF42,SЋ128*y|‡:‡Є7)"SET SWITCH TO OCLK"*Ѓ†‡Є5)"";:Л‰"PRESS TO BEGIN";B$*Ъ’&HFF41,9::ƒENABLE FF & SRAM WRITE*ѓšI$(1)Г"BM104,190;NR5U8R5D8BR3R2LU8G"+ЄI$(2)Г"BM104,190;R2LU8NGBR4R5D8L5U8"+#Ў:ƒ+CИ:ƒ CALCULATE START OF TRACE+JТ:ƒ+UЬ€XГ0Ѕ7+wжP$(X)Г"BM15,"Ћџˆ(22­XЋ20)Ћ";"+~р‹X+…ъ:ƒ+Їє:ƒ WAIT FOR HALT & ENTER INFO+Ўў:ƒ+к…џ†(&HFF42)А1Ї530:„520::ƒCHECK FOR HALT, ’&HFF42,S:ž:‡:‡Є6)"SYSTEM HALT DETECTED":‡:‡,;’&HFF41,2:€XГ1Ѕ1000:‹::ƒCLR SRAM WRITE & FF,X&‡Є7)"SET SWITCH TO CCLK",q0‡Є9)"PRESS ";,–:Л‰B$:Ђ&H3BC0::ƒMOVE SRAM TO DRAM,ШD‡:‡Є6)"";:Л‰"ENTER TIME SLOT>";TS$:TSГџ‰(TS$),фN…TSД0БTSВ16144ЇTSГ16144,ќXШ4,1:М5:С0:’65495,0-bФ(10,10)Ќ(23,20),BL,G-4lФ(143,181)Ќ(182,191),B1,G-;v:ƒ-^€:ƒ DRAW A-H INPUT DESIGNATIONS-eŠ:ƒ-€”Ц"BM0,18;U4E2F2D4U2L4"-žЦ"BM0,40;U6R3D3NL3RD3L4"-ЗЈЦ"BM0,62;R4NUL4U6R4D"-аВЦ"BM0,84;U6R3FD4GL3"-ьМЦ"BM0,106;NR4U3NR3U3R4".ЦЦ"BM0,128;U3NR3U3R4".$аЦ"BM0,150;R4U2NLD2L4U6R4D".@кЦ"BM0,172;U6BR4D3NL4D3".kфЦ"BM20,190;NUR5U4L5U4R5DBD2BR3R3BD2L3".”юЦ"BM90,190;R4L2U8NL2R2BR3BD3R3BD2L3".ПјЦ"BM200,190;NR5U4NR4U4R5BR3BD3R3BD2L3".щЦ"BM130,190;R5UDL5U8R5DBR3BD2R3BD2L3"/ Ц"BM144,190;":TГ0:І1390/#Ц"BM34,190;":TГTS:І1390/E Ц"BM215,190;":TГTSЋ239:І1390/X*IГ1:Ц"XI$(1);"/_4:ƒ/‚>:ƒ DRAW LOGIC LEVEL INDICATORS/‰H:ƒ/™RA$Г"R2LU5G"/Ћ\B$Г"U5R3D5L3"/Жf€XГ0Ѕ7/иpC$Г"BM10,"Ћџˆ(22­XЋ12)Ћ";"ЋA$/љzD$Г"BM9,"Ћџˆ(22­XЋ22)Ћ";"ЋB$0 „Ц"XC$;":Ц"XD$;"0Ž‹0˜:ƒ0<Ђ:ƒ CALCULATE TIME SLOT OFFSET0CЌ:ƒ0‚ЖTSГTSЋ15616:T1Гџ(TSЎ256):T2Г(TSЎ256)Ќџ(TSЎ256):T2ГT2­2560‰Р:ƒ0ЏЪ:ƒ LOAD MEMORY WITH ML PARAMETERS0Жд:ƒ0ро’&H3BAE,T1:’&H3BAF,T2::ƒPASS TIMESLOT0ыш€YГ0Ѕ71 ђ’&H3BAD,2ЏY::ƒPASS POWER OF 21(ќЂ&H3BE6::ƒFIND BIT SET11П1,11N…џ†(&H3C00)В0ЇLAГ1:„LAГ01]Ц"XP$(Y);"1d$:ƒ1†.:ƒ READ BUFFER AND DRAW TRACE18:ƒ1ŸB…LAГ1ЇЦ"BU10"1ЕL€XГ&H3C00 Ѕ&H3CEF1СVAГџ†(X)1Ю`…AВ0ЇAГ11сj…AГ1АLAГ1ЇЦ"R"1їt…AГ1АLAГ0ЇЦ"U10R"2 ~…AГ0АLAГ0ЇЦ"R"2 ˆ…AГ0АLAГ1ЇЦ"D10R"2)’LAГA2;œ‹X,Y:’65494,02BІ:ƒ2_А:ƒ COMMAND INPUT SECTION2fК:ƒ2pФI$Гџ’2€Ю…I$Г""Ї12202‘и…I$Г"C"Ї15002Єт…I$Гџ‹(8)Ї15902Зь…I$Гџ‹(9)Ї16802Ыі…I$Г"A"Їž:Ѕ3302п…I$Г"T"Ї‡:Ѕ5802№ …I$Г"E"Ї18202ў…I$Г"X"Ї‘3…I$Г"I"Ї1320:„12203-(… IГ1 Ї IГ10 :„ IГ13K2Х(103,180)Ќ(116,190),BL,Б3p<… IГ1 Ї Ц"XI$(1);" :„ Ц"XI$(2);"3{FЅ12203‚P:ƒ3™Z:ƒ PRINT TIMESLOTS3 d:ƒ3ИnM$Гџˆ(T):MГџ‡(M$)Ќ13ШxM$Гџ(M$,M)3й‚M$Г"0000"ЋM$3щŒM$Гџ(M$,5)3є–€RГ1Ѕ54  VГџ‰(џ(M$,R,1))4ЊЦ"XN$(V);"4!Д‹R:4(О:ƒ4KШ:ƒ DISPLAY CURSOR ON C COMMAND4Rв:ƒ4kмG1Г127:G2Г129:L1Г1284…цФ(G1,0)Ќ(G2,180),GR,G4œ№Л(L1,0)Ќ(L1,180),Н4КњХ(143,181)Ќ(182,191),B1,Б4ЬІ1770:Ѕ12204зЅ12204о:ƒ4і":ƒ MOVE CURSOR LEFT4§,:ƒ56Х(G1,0)Ќ(G2,180),GR,Б53@G1ГG1ЌI:G2ГG2ЌI:L1ГL1ЌI5SJ… G1Д14 Ї G1Г14:G2Г16:L1Г155mTФ(G1,0)Ќ(G2,180),GR,G5„^Л(L1,0)Ќ(L1,180),Н5–hІ1770:Ѕ12205r:ƒ5Ж|:ƒ MOVE CURSOR RIGHT5Н†:ƒ5зХ(G1,0)Ќ(G2,180),GR,Б5ѓšG1ГG1ЋI:G2ГG2ЋI:L1ГL1ЋI6Є… G1В253 Ї G1Г253:G2Г255:L1Г25461ЎФ(G1,0)Ќ(G2,180),GR,G6HИЛ(L1,0)Ќ(L1,180),Н6ZТІ1770:Ѕ12206aЬ:ƒ6ж:ƒ UPDATE CURSOR LOCATION6†р:ƒ6ЄъХ(143,181)Ќ(182,191),B1,Б6бєTГTSЋG1Ќ15616Ќ14:Ц"BM144,190;":І 1390:6иў:ƒ6ь:ƒ ERASE CURSOR6ѓ:ƒ7 Х(G1,0)Ќ(G2,180),GR,Б7`&TГ0:G1Г127:G2Г129:L1Г128:Х(143,181)Ќ(182,191),B1,Б:Ц"BM144,190;":І1390:Ѕ12207€0’65497,0:€XГ&H3D00 Ѕ &H7CFF7’:’X,џ†(&HFF40)7ЊD’&HFF41,4:’&HFF41,07ЛN‹:’65496,0:7мX’&HFF41,0:€XГ&H3D00 Ѕ &H7CFF7ђb‡џ†(X),џ†(&HFF40)8 l’&HFF41,4:’&HFF41,08v‹Г0:G1Г127:G2Г129:L1Г128:Х(143,181)Ќ(182,191),B1,Б:Ц"BM144,190;":І1390:Ѕ12207€0’65497,0:€XГ&H3D00 Ѕ &H7CFF7’:’X,џ†(&HFF40)7ЊD’&HFF41,4:’&HFF41,07ЛN‹:’65496,0:7мX’&HFF41,0:€XГ&H3D00 Ѕ &H7CFF7ђb‡џ†(X),џ†(&HFF40)8 l’&HFF41,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ00100 *** FACTOR/ASM *** 00110 *** PROGRAM TO FIND WHICH *** 00120 *** MEMORY BITS ARE SET *** 00130 *** AND STORE RESULTS IN *** 00140 *** BUFFER FOR GRAPHICS *** 00150 *** PROGRAM *** 00160 *** WRITTEN BY *** 00170 *** DENNIS H. WEIDE *** 00180 00190 00200 BUFFER EQU $3C00 00210 BUFEND EQU BUFFER+$EF 00220 FACTOR EQU $3BAD 00230 TIMSLT EQU $3BAE 00240 00250 00260 ORG $3BE6 00261 00262 00263 00270 START LDX TIMSLT GET TIMESLOT FROM BASIC 00280 LDY #BUFFER GET START OF DRAM BUFFER 00290 LOOP LDA FACTOR GET POWER OF 2 FROM BASIC 00300 ANDA ,X+ DETERMINE IF THIS 00310 STA ,Y+ BIT IS SET AND SAVE RESULTS 00320 CMPY #BUFEND IS THIS END OF BUFFER? 00330 BLE LOOP 00340 RTS 00350 END џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџА& ‚"CHOOSING VOWEL SOUNDS"&W‚ "STEVE BLYN,COMPUTER ISLAND,STATEN ISLAND,NY,1990"&t(AГ15:Œ A$(A),B$(A),C$(A)&›2€ BГ 1 Ѕ A: A$(B),B$(B),C$(B):‹ B&Х<ž5:Щ"O4L70GEGFEDC":RRГџ„(ЌџŸ):RГџ„(A)&ђF€ NГ 1 Ѕ 3:‡@37,"choosing vowel sounds";'P‡@96,A$(R):‹ N'&Z‡@198,"which vowel is it ?";'Gd‡@262,"PRESS a,e,i,o OR u ";'RnEN$Гџ’'Žx… EN$Г"A" Б EN$Г"E" Б EN$Г"I" Б EN$Г"O" Б EN$Г"U" Ї 140'Ё‚… EN$Г"" Ї 110'ЦŒ  100,1:… EN$ГB$(R) Ї 150 :„ 110'т–Щ"O4L30CEDCEDDD":І 260( ‡@323,"IS THE ";B$(R);" lONG OR sHORT ?";(ЊEN$Гџ’(9Д… EN$Г"L" Б EN$Г"S" Ї 200(LО… EN$Г"" Ї 160(}Ш… EN$ГC$(R) Ї Щ"L70GFEDCCC" :„   10,2:Ѕ 160(šвІ 260:‡@384,џЁ(32,255);(Шм‡@448,"press ENTER to go on or E to end";(гцEN$Гџ’)№… EN$Гџ‹(13) Ї 60 :„ … EN$Г"E" Ї 250 :„ 230) њž:Š):€ TГ1Ѕ500:‹ T:П0,1:€ TГ1Ѕ100:П0,0:П0,1:‹ T)T€TГ1Ѕ3: 1,1:‹ T:П 0:)Š† I ASKED THEM TO STAY FOR D-NNER ON FRIDAY..,I,S)П"† HIS MOTHER ASKED HIM TO BUY H-R SOME MILK.,E,S)џ,† HER GRANDFATHER BOB C-ME TO THISCOUNTRY FROM ENGLAND.,A,L*@6† MANY PEOPLE WENT TO SEE THEIR CHERRY TR-ES IN BLOOM.,E,L*|@† WE VISITED THE Z00 ON A CL-SS TRIP LAST SPRING.,A,S*ДJ† THE TEACHER READ TO -S A STORY ABOUT GIANTS.,U,S*фT† PAPER CAN BE M-DE FROM WOOD AND RAGS.,A,L+^† ONE POLICEMAN WR-TE A NOTE TO THE OTHER.,O,L+Ph† NEW YORK IS A CITY ON THAT M-P ON THE WALL.,A,S+ˆr† ONE GOOD H-LIDAY IN NOVEMBER IS THANKSGIVING.,O,S+С|† MY LITTLE D-G IS VERY SMART AND VERY CUTE TOO.,O,S+ј†† I BIT INTO A N-T AND IT HURT MY TEETH A LOT.,U,S,:† THE RAILROAD STATION IS ON THE OTHER S-DE OF OUR TOWN.,I,L,rš† THE HOUSE IS B-TWEEN A LARGE ANDA SMALL TREE.,E,L,ЏЄ† YOUR MOTHER WANT-D YOU TO COME HOME AT 5:00 ЅDAY.,E,SY CUTE TOO.,O,S+ј†† I BIT INTO A N-T AND IT HURT MY TEETH A LOT.,U,S,:† џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЁ&:ƒLISTING1&*:ƒGOTO500'ON THE LINE&D:ƒGOTO600'ON THE BIAS&] TГџ„(2): ˆ T Ѕ10,11&s Ш4,1:М:П1,O:Ѕ100&ƒ Ш4,1:М:П1,1&™dA$Г"U3R3G3L3U3E3"&ЃeЅ220&ЧfЦ"BM0,96R128NR128ND96U96":Ѕ220&йh€ AГ3 Ѕ O ЉЌ1&юi€ SГ 44 Ѕ 4 Љ Ќ4&џnB$Г"S"Ћџˆ(S)'sD$Г"A"Ћџˆ(A)',xЦ "C4BM128,96"ЋD$ЋB$ЋA$'6‚‹ S,A'IШ€ ZГ 1 Ѕ 200:‹'TЭМ:Ѕ 9'cм€ AГ 0 Ѕ 3'vц€ SГ 4 Ѕ 44 Љ4'”№B$Г"S"Ћџˆ(S):D$Г"A"Ћџˆ(A)'­њЦ"BM128,96"ЋD$ЋB$ЋA$'З‹ S,A'р:ƒFOR Z= 1 TO 2000: NEXT:PCLS:GOTO 9'њ€ ZГ 1 Ѕ 600:‹:Ѕ 104( єШ4,1:М:П1,1(+ўЦ"BM128,96NL128NR128NU96D96"(E:ƒA$="EFRE2F2G2H2LGH"(_ :ƒA$="E2F2REFGHLG2H2"({ :ƒA$="EFE2F2EFGHG2H2GH"(— :ƒA$="EFEM+3,1M-3,1HGH"(Ы :ƒA$="M+4,-2R2M-1,2M+3,-1FGM-3,-1M+1,2L2M-4,-2"(ї :ƒA$="BR2U2H2M+6,2G2GHL4F2M-6,2E2U2BL2")6:ƒA$="BRHM+1,-2M+6,2NM-3,1M+3,1M-3,1NM-3,-1M-6,2M-1,-2EBL")b:ƒA$="BRUHM+2,-1BD2R3FGL3BD2M-2,-1EUBR")Š:ƒA$="REFERULDRM+4,1M-4,1LDRULHGHL")œ€ XГ4 Ѕ 44 Љ4)ГЦ"S=X;BM128,96"ЋA$)Ш‹ X:€ ZГ1Ѕ2000:‹)вЅ532)мЅ100)њX:ƒPMODE4,1:PCLS:SCREEN1,1*bЦ"BM0,96R128NR128NU96D96"*2l:ƒA$="UREU2R2D2L2GDL"*Nm:ƒA$="EU2RU2FRDFL2DL2G"*au€ XГ44 Ѕ 4 ЉЌ4*xvЦ"S=X;BM128,96"ЋA$*Œw‹ X:€ZГ1Ѕ2000:‹*–xЅ632* yЅ100S=X;BM128,96"ЋA$)Ш‹ X:€ ZГ1Ѕ2000:‹)вЅ532)мЅ100)њX:ƒPMODE4,1:PCLS:SCREEN1,1*bџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџБUQOŽUXПТsкYѕYіYђYє–ыЗYѓЗYђŽ LІ *' Œ W&є~:O_Ѕ'OCЗYєЦЅНВoЅР€0%e"_ЗYђŸНЅЧŽWПYюНЧНЙXЬ—ьзъЦзэŽŸюНжђІ„'EC'sŽ LІЄ*'ЁР&0Œ S'1!~Uи0Ž TІЄ*'#ЁР'0 Œ V& 1!~Uї0ˆ Œ&­\С #ž90444 Ц ОYюZС'І€Ї  ѕПYю5 55 ЭŽWПY№ОY№МYю'vŽ LІ Ї€Œ W&їПY№НVЃЖYѕ &|YіYѕ|YѕНVˆЖYє&Нг&~VMЖYѓ—ы} ЖYє4ЖYђ—ы|ќНЪщ}3Ž LЦНЙЂ† ­Ÿ ЦНЙЂ† ­Ÿ 9FILE(S) COPIED !ŽVН† ­Ÿ ЖYі‹0­Ÿ YіЖYѕ‹0­Ÿ Yѕ† ­Ÿ ЦІ€­Ÿ ZС&ѕ9џUQŒ V& 1!~Uї0ˆ Œ&­\С #ž90444 Ц ОYюZС'І€Ї  ѕПYю5 55 ЭŽWПYџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ &$:ƒ COPYRIGHT 1990 FALSOFT, INC&< :ƒ*****************&T:ƒ* COPY USING *&l:ƒ* WILDCARDS *&„(:ƒ* BY R. ESTRADO *&œ2:ƒ*****************&Ѓ<:ƒ&жA:ƒ NOTE, ON RUNNING SN ERROR WILL OCCUR IN 190&нC:ƒ'nF† 79,142,85,88,191,194,17,23,115,218,127,89,245,127,89,246,127,89,242,127,89,244,150,235,183,89,243,183,89,242,16,142,9,76,166,160,129,42,39(UP† 9,16,140,9,87,38,244,22,126,58,79,95,157,165,39,31,79,67,183,89,244,198,165,189,178,111,157,165,192,2,128,48,16,37,1,101,129,3,16,34,1,95,183,89,242,157,159,189,165,199,142,87,2,191,89,238,189,199,157,189,185,88,204,17,2,151)3Z† 236,215,234,198,3,215,237,142,6,0,159,238,189,214,242,31,19,166,132,39,69,67,16,39,0,115,16,142,9,76,166,164,129,42,16,39,0,15,161,192,38,48,16,140,9,83,39,5,49,33,126,85,216,48,8,31,19,16,142,9,84,166,164,129,42,16* d† 39,0,35,161,192,39,4,48,24,32,13,16,140,9,86,38,2,32,19,49,33,126,85,247,48,136,32,140,7,0,38,173,92,193,11,35,158,57,48,24,52,4,52,16,52,32,198,12,16,190,89,238,90,193,0,39,6,166,128,167,160,32,245,16,191,89*ѓn† 238,53,32,53,16,53,4,32,205,142,87,2,191,89,240,16,190,89,240,16,188,89,238,39,118,142,9,76,166,160,167,128,140,9,87,38,247,16,191,89,240,189,86,163,182,89,245,129,10,38,6,124,89,246,127,89,245,124,89,245,189,86,136,182,89,244+мx† 38,3,189,211,38,126,86,77,182,89,243,151,235,23,125,9,182,89,244,52,2,182,89,242,151,235,23,124,252,189,202,233,22,125,51,142,9,76,198,8,189,185,162,134,32,173,159,160,2,198,3,189,185,162,134,13,173,159,160,2,57,70,73,76,69,40,О‚† 83,41,32,67,79,80,73,69,68,32,33,142,86,189,134,13,173,159,160,2,182,89,246,139,48,173,159,160,2,127,89,246,182,89,245,139,48,173,159,160,2,127,89,245,134,32,173,159,160,2,198,16,166,128,173,159,160,2,90,193,0,38,245,57,ХŒ:ƒ,е‘• 450,21841,э–€ A Г 21841 Ѕ 22273,ј :  X-Њ: ’ A,X- Д‹ A-ОЂ 21841-ШŠ2,182,89,246,139,48,173,159,160,2,127,89,246,182,89,245,139,48,173,159,160,2,127,89,245,134,32,173,159,160,2,198,16,166,128,173,159,160,2,90,193,0,38,245,57,ХŒ:ƒ,е‘• 450,21841,э–€ A Г 21841 Ѕ 22273,ј :  X-Њ: џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџK&"‚***************************&C‚* MUSIC 102:READING G CLEF*&d‚* COPYRIGHT (C) 1990 *&…‚* BY FRED B. SCERBO *&І‚* 60 HARDING AVENUE *&Ч‚* NORTH ADAMS, MA 01247 *&ш‚***************************'•5000:XXГџ„(ЌџŸ):NNГ17'< ž0:‡џЁ(32,220);џЁ(32,204);:€IГ1Ѕ224:A:‡џ‹(AЋ128);:‹'X ‡џЁ(32,195);џЁ(32,211);'z‡@390," READING G CLEF ";'К‡@422," BY FRED B.SCERBO ";:‡@454," COPYRIGHT (C) 1990 ";(†61,60,60,62,60,61,48,61,,,,62,48,62,60,60,60,61,48,61,56,53,60,60,60,61,48,,,,,(F†53,,,58,,53,,53,,,,58,48,58,,,,,,53,,53,,,,,,,,,,(‹#†53,,,58,,53,,53,,,,58,48,58,,,,,,53,,53,,,71,,78,76,77,68,76,77(д(†53,,,58,,53,,53,,,,58,,60,60,60,60,61,,53,,53,,,69,,74,,69,69,76,76)-†53,,,58,,53,,53,,,,58,,,,,,53,,53,,53,,,76,72,76,76,76,68,76,76)P2†53,,,,,53,,53,,,,58,,50,,,,53,,53,,53,,,,49,,,,,,)Ÿ7†60,56,,,,60,56,52,60,60,60,56,,60,60,60,60,60,,60,56,52,60,60,60,60,,,,,,)И>>"+Ћ_‡:‡џЁ(32,"=");+ыdX$Гџ’:XГџ„(ЌџŸ):…X$Г"A"Ї355:„…X$Г"B"Ї105:„…X$Г"C"Ї1000:„100+њiž0:Ш0,1:М1,nЛ(0,0)Ќ(254,170),О,B,,sЛ(6,4)Ќ(122,82),О,BF,FxЛ(128,4)Ќ(248,82),О,B,`}Л(6,86)Ќ(122,164),О,B,|‚Л(128,86)Ќ(248,164),О,B-_‡Ц"BM26,188C0NU10R10NU10BR6R10U6L10U4R10BR6NR10D4NR10D6R10BR12BU6NE4D2F4BR6R10U6L10U4R10BR6ND10R10D4NL10BR6NR10D6U10R10D10BR6NR10U10R10BR6NR10D4NR10D6R10BR10U10NL4R10D4NL10D6NL14BR6U10R10D4NL10D6BR6U10R10D4L10R4F6BR6E4U2H4"-Œ†130,6,246,80,6,86,120,162,130,86,246,162-Ё‘У(2,2),0,0:Ч1Ѕ3-­–Ш0,4:М1-Ч›Л(0,0)Ќ(254,170),О,BF-р Л(8,6)Ќ(120,80),Н,BF-ѓЅЧ4Ѕ2:Ш0,1:П1,1.>Њ†"BM2,8C1","BM130,8C0","BM2,90C0","BM130,90C0","BM2,48C0","BM130,48C0".KЏ€IГ1Ѕ NN.jДA(I)Гџ„(NN):…N(A(I))Г1Ї180.‰ЙN(A(I))Г1:‹I:€YГ1Ѕ NN:С1,0.”О€IГ2Ѕ4.ДУB(I)Гџ„(3)Ћ1:…N(B(I))Г0Ї195.еШN(B(I))Г0:‹I:€IГ1Ѕ4:N(I)Г1:‹.№ЭBГџ„(NN):…BГA((Y))Ї205/вCГџ„(NN):…CГB Б CГA((Y))Ї210/)зЦ A$(1):ЦP$(A(Y),1)/JмЦ A$(B(2)):ЦP$(B,2):ЦP$(B,3)/kсЦ A$(B(3)):ЦP$(C,2):ЦP$(C,3)/’цЦ A$(B(4)):ЦP$(A(Y),2):ЦP$(A(Y),3)/›ыС1,0/Ѓ№ZГ0/ЌѕШ0,4/ЩњЦ A$(1)Ћ"C0":ЦP$(A(Y),1)/яџЦ A$(B(2))Ћ"C1":ЦP$(B,2):ЦP$(B,3)0Ц A$(B(3))Ћ"C1":ЦP$(C,2):ЦP$(C,3)0A Ц A$(B(4))Ћ"C1":ЦP$(A(Y),2):ЦP$(A(Y),3)0OШ0,1:П1,10gЛ(8,6)Ќ(120,80),Н,B0‹X$Гџ’:…X$Г" "Ї290:„…X$Г"@"Ї10100ЎС1,0:Л(8,6)Ќ(120,80),О,B:Ѕ2750С"ZГZЋ1:…ZГ4ЇZГ10ч'С1,0:Л(C(Z),D(Z))Ќ(E(Z),F(Z)),Н,B1,X$Гџ’:…X$Г" "Ї290:„…X$Гџ‹(13)Ї310:„…X$Г"@"Ї10101G1С1,0:Л(C(Z),D(Z))Ќ(E(Z),F(Z)),О,B:Ѕ2951Y6…ZЋ1ГB(4)Ї3201”;NWГNWЋ1:€KГ1Ѕ5:Ш0,4:П1,1: 10,3:Ш0,1:П1,1: 1,3:‹K:Ѕ2951ј@NCГNCЋ1:Ш0,4:М1:Л(0,40)Ќ(256,126),О,B:Л(6,44)Ќ(124,122),О,B:Л(130,44)Ќ(248,122),О,B:У(2,42),0,02EЦ A$(5):ЦP$(A(Y),1)24JЦ A$(6):ЦP$(A(Y),2):ЦP$(A(Y),3)2=OП1,12WTX$Гџ’:…X$ДВџ‹(13)Ї3402`YШ0,12}^Ч3Ѕ1:П1,1:Ч2Ѕ4:‹Y:Ѕ10102оcШ0,2:М1:П1,1:Л(0,40)Ќ(256,126),О,B:Л(6,44)Ќ(124,122),О,B:Л(130,44)Ќ(248,122),О,B:У(2,42),0,02ќh€IГ1Ѕ NN:Ц A$(5):ЦP$(I,1)3mЦ A$(6):ЦP$(I,2):ЦP$(I,3)34rX$Гџ’:…X$ДВџ‹(13)Ї3703pwС1,0:Л(8,46)Ќ(122,120),Н,BF:Л(132,46)Ќ(246,120),Н,BF:‹I3v|Ž3Й†"BR64BD24NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2"40††"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL48L8U12R8"4Г‹†"BR64BD24NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2BH6BL2D14BL4U14D4L4R12L4D6R4L12BD24BR30D14BL4U14D4L4R12L4D6R4L12"5†"BR26BD50R8U6L8U6R8BR6D12U6R8U6D12BR6U12R8D6NL8D6BR6U12R8D6L8R2F6BR6U12R8D6L8BU18BL22L8U12R8"5{•†"BR64BD18NU36ND2BL14E4R6F4D4G4L6H4U2BL22BU2U36E4R6F4D4G4L6H4U2BH6BL4D14E4U2H4BD30BR24D14E4U2H2"5бš†"BR36BD50U6NR8U6R8BR6D12R8BR7U12R8D6NL8D6BR10U12L4R8BL32BU12R8NU12L10R2U12L2R10"6Ÿ†"BR64BD18NU36ND2BL14E4R6F4D4G4L6H4U2BL22BU2U36E4R6F4D4G4L6H4U2"6—Є†"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL48NU12L10R2U12L2R10"7Љ†"BR64BD18NU36ND2BL14E4R6F4D4G4L6H4U2BL22BU2U36E4R6F4D4G4L6H4U2BH6BL2D14BL4U14D4L4R12L4D6R4L12BD24BR30D14BL4U14D4L4R12L4D6R4L12"7‹Ў†"BR26BD50R8U6L8U6R8BR6D12U6R8U6D12BR6U12R8D6NL8D6BR6U12R8D6L8R2F6BR6U12R8D6L8BU18BL30R8NU12L10R2U12L2R10"7юГ†"BR64BD14NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2BH6BL4D14E4U2H4BD30BR24D14E4U2H2"8<И†"BR36BD50U6NR8U6R8BR6D12R8BR7U12R8D6NL8D6BR10U12L4R8BL26BU12L8U6NR8U6R8"8Н†"BR64BD14NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2"8њТ†"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL48L8U6NR8U6R8"9<Ч†"BR64BD8NU36ND2BL14E4R6F4D2G4L6H4BL22BU2U36E4R6F4D4G4L6H4U2"9ЕЬ†"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL56U6NR8U6R8":7б†"BR64BD8NU36ND2BL14E4R6F4D2G4L6H4BL22BU2U36E4R6F4D4G4L6H4U2BH6BL2D14BL4U14D4L4R12L4D6R4L12BD24BR30D14BL4U14D4L4R12L4D6R4L12":œж†"BR26BD50R8U6L8U6R8BR6D12U6R8U6D12BR6U12R8D6NL8D6BR6U12R8D6L8R2F6BR6U12R8D6L8BU18BL30U6NR8U6R8":ўл†"BR64BD4NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2BH6BL4D14E4U2H4BD30BR24D14E4U2H2";Pр†"BR36BD50U6NR8U6R8BR6D12R8BR7U12R8D6NL8D6BR10U12L4R8BL26BU12NU6L8U12R8BD6L2";’х†"BR64BD4NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2"<ъ†"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL48NU6L8U12R8BD6L2"<“я†"BR64BD4NU36R4L24R2E6R6F4D4G4L6H4BL22BU4U34E4R6F4D2G4L6H4U2BH6BL2D14BL4U14D4L4R12L4D6R4L12BD24BR30D14BL4U14D4L4R12L4D6R4L12"<ўє†"BR26BD50R8U6L8U6R8BR6D12U6R8U6D12BR6U12R8D6NL8D6BR6U12R8D6L8R2F6BR6U12R8D6L8BU18BL22NU6L8U12R8BD6L2"=cљ†"BR64BU2NU32ND2BL14E4R6F4D2G4L6H4BL22BU2U32E4R6F4G4L6H4NL6NR18BH6BL4D14E4U2H4BD30BR24D14E4U2H2"=Вў†"BR36BD50U6NR8U6R8BR6D12R8BR7U12R8D6NL8D6BR10U12L4R8BL26BU12U12L8D6NR8D6"=і†"BR64BU2NU32ND2BL14E4R6F4D2G4L6H4BL22BU2U32E4R6F4G4L6H4NL6R18">r†"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL48U12L8D6NR8D6">ї †"BR64BU2NU32ND2BL14E4R6F4D2G4L6H4BL22BU2U32E4R6F4G4L6H4NL6NR18BH8BL2D14BL4U14D4L4R12L4D6R4L12BD24BR30D14BL4U14D4L4R12L4D6R4L12"?_†"BR26BD50R8U6L8U6R8BR6D12U6R8U6D12BR6U12R8D6NL8D6BR6U12R8D6L8R2F6BR6U12R8D6L8BU18BL22U12L8D6NR8D6"?У†"BR64BU6NU30R4L24R2E6R6F4D4G4L6H4BL22BU4U30E4R6F4G4NR6L6NL8H4BH6BL4D14E4U2H4BD30BR24D14E4U2H2"@†"BR36BD50U6NR8U6R8BR6D12R8BR7U12R8D6NL8D6BR10U12L4R8BL26BU12L10R2U6NR8U6L2R10D12"@^!†"BR64BU6NU30R4L24R2E6R6F4D4G4L6H4BL22BU4U30E4R6F4G4NR6L6NL8H4"@у&†"BR12BD50U12F12NU12BR6U12R8D6NL8D6BR10U12L4R8BR6D12R8NU12BR6U12R8D6L8R2F6BR6U12R8D6NL7D6BR6NU12R8BU24BL48NU12L10R2U6NR8U6L2R10"Aшž0:€IГ1Ѕ NN:TEM$ГP$(I,1):P$(I,1)ГP$(I,2):P$(I,2)ГTEM$:‹A)эЅ105Amђž:‡@101,"YOU TRIED"NCЋNW"TIMES &":‡@165,"ANSWERED"NC"CORRECTLY"Aї‡@229,"WHILE DOING"NW"WRONG."AЉќNQГNCЋNW:… NQГ0Ї NQГ1AОMSГџ(NCЎNQ­100)Aо‡@293,"YOUR SCORE IS"MS"%."B ‡@357,"ANOTHER TRY (Y/N/C) ?";BX$Гџ’:…X$Г"Y"Ї ŽB&…X$Г"N"Їž:ŠB?…X$Г"C" А YДГ17 Ї270BJЅ1040&":‡@165,"ANSWERED"NC"CORRECTLY"Aї‡@229,"WHILE DOING"NW"WRONG."AЉќNQГNCЋNW:… NQГ0Ї NQГ1AОMSГџ(NCЎNQ­100)Aо‡@293,"YOUR SCORE IS"MS"%."B ‡@357,"ANOTHER TRY (Y/N/C) ?џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ