sub Activity_create(FirstTime As Boolean)
If FirstTime Then
admin.Initialize("admin")
serial1.Initialize("serial1")
Timer1.Initialize("Timer1",200)
'*************************************************************************************************
End If
end sub