'Simplest Possible WizFi360 Example
' 542 bytes !!

$regfile = "attiny2313.dat"
$crystal = 3686400
$hwstack = 40
$swstack = 16
$framesize = 32

$baud = 115200
DDRB  = &B00000000         ' PortB = input
PORTB = &B11111111         ' Pull UPs
DDRD  = &B11110000         ' PD4-7 = output

dim i as byte
dim temp as byte


Waitms 2000

if PINB.0=0 then                 ' button 0 is pressed during startup so entering configuration mode
   print "AT+RESTORE=1"
   waitms 1000
   print "AT+CWMODE_CUR=2"
   waitms 1000
   print "AT+WIZ_NETCONFIG"
   do
   loop             ' halt executing program to prevent mess with configuration
endif

' START A SOCKET CONNECTION
print "AT+CIPSTART={034}TCP{034},{034}192.168.1.10{034},5000" ' AT+CIPSTART="TCP","192.168.1.10",5000
Waitms 1000
print "AT+CIPMODE=1"                                  ' change to singe connection mode
waitms 1000
print "AT+CIPSEND"
waitms 1000
print                                               ' immediatly send "return" means enter transparent mode

' Start a Program just like use a "true serial"
' "program" is send ascii 1 = togle pin PD4 2 = toggle PD5, 3 = Toglle PD6, 4 = return Portb status in ASCII
do
   i = waitkey()
   Select case i
     case 49 : toggle PORTD.4
     case 50 : toggle PORTD.5
     case 51 : toggle portD.6
     case 52 : print bin(PINB)
   end select
loop

'Simplest Possible WizFi360 Example
' 542 bytes !!

$regfile = "attiny2313.dat"
$crystal = 3686400
$hwstack = 40
$swstack = 16
$framesize = 32

$baud = 115200
DDRB  = &B00000000         ' PortB = input
PORTB = &B11111111         ' Pull UPs
DDRD  = &B11110000         ' PD4-7 = output

dim i as byte
dim temp as byte


Waitms 2000

if PINB.0=0 then                 ' button 0 is pressed during startup so entering configuration mode
   print "AT+RESTORE=1"
   waitms 1000
   print "AT+CWMODE_CUR=2"
   waitms 1000
   print "AT+WIZ_NETCONFIG"
   do
   loop             ' halt executing program to prevent mess with configuration
endif

' START A SOCKET CONNECTION to smtp2go
print "AT+CIPSTART={034}TCP{034},{034}103.2.140.82{034},2525" ' smtp2go europe's ip
Waitms 1000
print "AT+CIPMODE=1"                                  ' change to singe connection mode
waitms 1000
print "AT+CIPSEND"
waitms 1000
print                                               ' immediatly send "return" means enter transparent mode

'
print "EHLO" '
waitms 50
print "AUTH LOGIN" ' start authentication
print "MTIzNDU2" ' thats base64 encoded username (123456 in this example)
print "MTIzNDU2" ' thats base64 encoded password (123456 in this example)
print "mail from:you@yourverifieddomain.com"
print "rcpt to:me@email.com"
print "DATA"
print "Message in e-mail's body"
print "."
print "quit"