home *** CD-ROM | disk | FTP | other *** search
/ PC World 2003 February / PCWorld_2003-02_cd.bin / Software / TemaCD / Sms / Defs / eurotel_cz.mls < prev    next >
Text File  |  2002-09-05  |  483b  |  16 lines

  1. if $send_as_email = 0
  2.   set len = (length "$email")
  3.   if $length <= (149 - $len)
  4.     set msgnum = 1
  5.     set msgleft = (149 - $len - $length)
  6.     set msgcount = $length + $len
  7.   else
  8.     set msgnum = (($length - 150 + $len) div 149) + 2
  9.     set msgleft = 149 - $len + (149 * ($msgnum - 1)) - $length
  10.     set msgcount = 149 - $msgleft
  11.   endif
  12. else
  13.   set msgnum = (($length - 1) div 130) + 1
  14.   set msgleft = (130 * $msgnum) - $length
  15.   set msgcount = 130 - $msgleft
  16. endif