توجه : واتس اپ ( WhatsApp ) در فرمت جاوا ( JAVA ) ، فقط برای بعضی گوشی های S40 قدیمی نوکیا یا سامسونگ پشتیبانی می شود و برای همه گوشی های جاوا ، نسخه جاوای واتس اپ وجود ندارد . لینک دریافت نسخه جاوا واتس اپ ( WhatsApp ) در همین صفحه قرار گرفته است . در ابتدا مطمئن شوید که گوشی شما توسط واتس اپ پشتیبانی می شود ، لیست گوشی هایی که توسط واتس اپ پشتیبانی می شوند : اپل ( آیفون ) – اندروید - نوکیا – ویندوز موبایل ( ویندوز فون ) – نوکیا S40 – بلک بری دانلود واتس اپ : دانلود مستقیم WhatsApp برای اندروید دانلود مستقیم WhatsApp برای نوکیا سیمبین دانلود WhatsApp برای آیفون از وب سایت رسمی اپل ( iTunes ) سفارش ساخت اپل آیدی ( Apple ID ) دانلود WhatsApp برای بلک بری از وب سایت رسمی بلک بری دانلود WhatsApp برای ویندوز فون از وب سایت رسمی مایکروسافت دانلود WhatsApp برای نوکیا S40 > اطمینان حاصل کنید گوشی شما به اینترنت متصل است . سپس با مرورگر گوشی به این آدرس بروید : http://www.whatsapp.com/s40
Public Sub Window_OnLoad() 'Set LoadChar = AgentControl.Characters.Load ("Merlin", _ ' "C:Windowsmsagentcharsmerlin.acs") 'Change to proper root depending on OS. Set LoadChar = AgentControl.Characters.Load ("Merlin") On Error Resume Next Set Merlin = AgentControl.Characters ("Merlin") Merlin.Show Merlin.Speak ("jomleye shoma") Merlin.MoveTo 100,500 Merlin.GestureRight Merlin.Speak ("jomleye shoma") Merlin.MoveTo 500,10 Merlin.Speak ("jomleye shoma") Merlin.MoveTo 200,10 Merlin.Speak ("jomleye shoma") Merlin.MoveTo 300,300 Merlin.Speak ("jomleye shoma") Merlin.MoveTo 200,450 Merlin.Speak ("adrese maile shoma") Merlin.MoveTo 500,10 Merlin.Speak ("adrese webloge shoma") End Sub Sub AgentControl_DragStart (ByVal ID, ByVal Button, ByVal Shift,ByVal x, ByVal y) Merlin.Play ("Alert") Merlin.Speak ("Pau=800vol=65535darde eshgh hamishe marashekast dad ") End Sub Sub AgentControl_DragCOmplete (ByVal ID, ByVal Button, ByVal Shift,ByVal x, ByVal y) Merlin.Play ("RestPose") End Sub