write.max function

Write a SaTScan max file