Sub MAIN
Insert "[WINFLASH]"
InsertPara
For x = 1 To 300
Insert "Q" + LTrim$(Str$(x)) + "="
InsertPara
Insert "A" + LTrim$(Str$(x)) + "="
InsertPara
Next x
End Sub

