Hi, I am new to Applescript and after messing around with it have a few questions.

Question

Firstly, I love applescript so far and have made an alarm clock, simple get weather app and applescript app that announces the time and date. i would like to be able to use this as a jarvis like combined app where i can have all of these built into one applescript. secondly i would like a better version of my weather app to be included that can give me weather based on my location (not the location i have it set too). lastly it would also be a miracle if someone could give me a way to make a simple chat like bot that can talk back because i have tried setting up eliza (chat bot from apple) but because it uses ichat things are much more difficult for me as a novice to set up properly.  for instance type hi in a display dialog box and have the text returned open up in messages and be able to communicate with my chat bot that would have predefined responses for what i type. like if i type weather it would know to tell me the weather.  anyway ill have my codes listed below and if anyone can help with any part of this that would be fantastic and greatly appreciated. also just a note i will never sell this thing if someone helps me by giving me coding to get this idea working.  i just want it because i could greatly use having a virtual assistant and to use personally.  thanks in advance for all people who do help.
--codes for getting date
set {year:y, month:m, day:d} to (current date)
y --> 2006
m --> April
d --> 15
-- note that the month given above is not text unless coerced to text. "April" is a word in the AppleScript lexicon.
-- these results can also be obtained directly, one at a time:
month of (current date) --> April
-- or as a list:
{year, month, day} of (current date) --> {2006, April, 15}
-- and finally, the day of the week can be extracted:
weekday of date "Saturday, April 15, 2006 4:29:04 PM" --> Saturday
say date string of (current date)
--codes for getting time
set currentDate to current date
set amPM to "AM"
set currentHour to (currentDate's hours)
set currentMinutes to currentDate's minutes
if (currentHour ≥ 12 and currentHour < 24) then
          set amPM to "PM"
else
          set amPM to "AM"
end if
--  make minutes below 10 sound nice
if currentMinutes < 10 then
          set currentMinutes to ("0" & currentMinutes) as text
end if
--  ensure 0:nn gets set to 12:nn AM
if currentHour is equal to 0 then
          set currentHour to 12
end if
--  readjust for 12 hour time
if (currentHour > 12) then
          set currentHour to (currentHour - 12)
end if
set currentTime to (currentHour as text) & ":" & ((currentMinutes) as text) & " " & amPM as text
say currentTime
--alarm with weather
-- prompt the user for the desired wake up time
set targetTime to the text returned of (display dialog "Enter the wake-up time:" default answer "7:00 AM")
say "Goodnight sir…"
-- wait until we reach the target date/time
repeat while (current date) is less than date targetTime
  -- should be 60
  delay 2
end repeat
say "It is " & getTimeInHoursAndMinutes()
on getTimeInHoursAndMinutes()
  -- Get the "hour"
          set timeStr to time string of (current date)
          set Pos to offset of ":" in timeStr
          set theHour to characters 1 thru (Pos - 1) of timeStr as string
          set timeStr to characters (Pos + 1) through end of timeStr as string
  -- Get the "minute"
          set Pos to offset of ":" in timeStr
          set theMin to characters 1 thru (Pos - 1) of timeStr as string
          set timeStr to characters (Pos + 1) through end of timeStr as string
  --Get "AM or PM"
          set Pos to offset of " " in timeStr
          set theSfx to characters (Pos + 1) through end of timeStr as string
          set theHours to hours of the (current date)
          if theHours > 18 then
                    say "good Evening"
          else if theHours > 12 then
                    say "good Afternoon"
          else if theHours > 6 then
                    say "good Morning"
          else if theHours > 0 then
                    say "good Morning"
          end if
          return (theHour & ":" & theMin & " " & theSfx) as string
end getTimeInHoursAndMinutes
tell application "Mail" to launch
tell application "Calendar" to launch
tell application "iTunes" to launch
set CityCode to 2353736
set t_format to "F"
set v_format to "S"
set a_format to "Y"
set IURL to "http://weather.yahooapis.com/forecastrss?w=" & CityCode
set file_content to (do shell script "curl " & IURL)
--looking for the line with actual condition
set theText to text ((offset of "yweather:condition" in file_content) + 1) thru -1 of file_content
set sub_1 to text ((offset of "\"" in theText) + 1) thru -1 of theText
set actual_condition to text 1 thru ((offset of "\"" in sub_1) - 1) of sub_1
set sub_1a to text ((offset of "temp=" in sub_1)) thru -1 of sub_1
set sub_1b to text ((offset of "\"" in sub_1a) + 1) thru -1 of sub_1a
set actual_temp to text 1 thru ((offset of "\"" in sub_1b) - 1) of sub_1b
if t_format is equal to "C" then
          set actual_temp to (5 / 9) * (actual_temp - 32) as integer
end if
set theText to text ((offset of "yweather:forecast" in file_content) + 1) thru -1 of file_content
set sub_2 to text ((offset of "\"" in theText) + 1) thru -1 of theText
set today_min_temp to word 9 of sub_2
set today_max_temp to word 12 of sub_2
if t_format is equal to "C" then
          set today_min_temp to (5 / 9) * (today_min_temp - 32) as integer
          set today_max_temp to (5 / 9) * (today_max_temp - 32) as integer
end if
set sub_3 to text ((offset of "text" in sub_2) + 1) thru -1 of sub_2
set sub_4 to text ((offset of "\"" in sub_3) + 1) thru -1 of sub_3
set today_forecast to text 1 thru ((offset of "\"" in sub_4) - 1) of sub_4
set sub_5 to text ((offset of "yweather:forecast" in sub_4) + 1) thru -1 of sub_4
set sub_6 to text ((offset of "\"" in sub_5) + 1) thru -1 of sub_5
set tomorrow_min_temp to word 9 of sub_6
set tomorrow_max_temp to word 12 of sub_6
if t_format is equal to "C" then
          set tomorrow_min_temp to (5 / 9) * (tomorrow_min_temp - 32) as integer
          set tomorrow_max_temp to (5 / 9) * (tomorrow_max_temp - 32) as integer
end if
set sub_7 to text ((offset of "text" in sub_6) + 1) thru -1 of sub_6
set sub_8 to text ((offset of "\"" in sub_7) + 1) thru -1 of sub_7
set tomorrow_forecast to text 1 thru ((offset of "\"" in sub_8) - 1) of sub_8
if a_format is equal to "Y" then
          say "The current weather in Alpine is " & actual_temp & " degrees and " & actual_condition
end if
delay 4
tell application "Mail"
          set unreadMessages to (get every message of mailbox "INBOX" of account "jarvisMail" whose read status is false)
          set numberofmessages to (count of (every message of mailbox "INBOX" of account "jarvisMail" whose read status is false))
          if (count of (every message of mailbox "INBOX" of account "jarvisMail" whose read status is false)) is 1 then
                    tell application "Mail"
                              say "There is only " & numberofmessages & " new email"
                              repeat with eachMessage in unreadMessages
                                        say "From! "
                                        say (get sender of eachMessage)
                                        say "Subject."
                                        say (get subject of eachMessage)
                                        set read status of eachMessage to true
                              end repeat
                    end tell
          else if (count of (every message of mailbox "INBOX" of account "jarvisMail" whose read status is false)) is greater than 1 then
                    tell application "Mail"
                              say "There are " & numberofmessages & " new messages"
                              repeat with eachMessage in unreadMessages
                                        say "From! "
                                        say (get sender of eachMessage)
                                        say "Subject."
                                        say (get subject of eachMessage)
                                        set read status of eachMessage to true
                              end repeat
                    end tell
          else
                    say "You have no new messages"
          end if
          tell application "Mail" to quit
end tell
delay 4
set today to (current date)
set today's time to 0
set tomorrow to today + days
set myHome to {}
tell application "Calendar"
          set futureEvents to every event of calendar "Home" whose start date is greater than or equal to today and end date is less than or equal to tomorrow
          tell application "Calendar" to quit
end tell
repeat with anEvent in futureEvents
          tell application "Calendar" to set {summary:theSummary, start date:theStartDate, allday event:allDayEvent} to anEvent
          if (allDayEvent) then
                    set theTime to "At some time today"
          else
                    set {hours:Eventhour, minutes:Eventminute} to theStartDate
                    if (Eventhour > 12) then
                              set Eventhour to Eventhour - 12
                              set pre to "PM"
                    else
                              set pre to "AM"
                    end if
                    if (Eventminute is 0) then set Eventminute to ""
                    set theTime to "At " & Eventhour & " " & Eventminute & " " & pre
          end if
          set the end of myHome to theTime & " you have the event… " & theSummary
end repeat
set numberOfHome to (count myHome)
if (numberOfHome is less than 1) then
          say "you have no events today."
else if (numberOfHome is equal to 1) then
          say "you have one event today"
  delay 1
          say item 1 of myHome
else
          say "you have" & numberOfHome & " Home today"
  delay 1
          repeat with thismeeting in myHome
  say thismeeting
                    delay 0.5
          end repeat
end if
delay 4
tell application "iTunes"
          play playlist "Jarvis Alarm"
          delay 900
          tell application "iTunes" to quit
end tell
--weather
set weather to "curl " & quote & "http://weather.yahooapis.com/forecastrss?p=USNY0996&u=f" & quote
set postWeather to "grep -E '(Current Conditions:|F<BR)'"
set forecast to do shell script weather & " | " & postWeather
say (characters 1 through -7 of paragraph 2 of forecast) as string

Answer 1

4piper wrote:
 I have a HP Envy 15 Notebook PC "without" a cd/dvd drive. I bought one that plugs in which is a pain, but I am findind myself having to install updates that lasts for hours. Please, can someone help me??? I am almost ready to go back to Dell because I have had to many issues! I have spent more time on the upgrades/updates than I have actual enjoyment on this PC. And it is 13 days old.
And getting a PC that does not have a cd player is completely, well I am not going to say it. How was I going to download the printer? Or any other software?
Can someone please tell me if there is a one button upgrade/update that will get this done and over with?
Thank you.
Piper
Hi,
Could you tell us what Envy 15 it is, please? I mean the full model name. The new laptops don't have any DVD drives because all drivers etc can be downloaded from the internet and all bootable images don't have to be burned to DVDs but simple converted to usb drives. Tell us also what printer you have got so we can find the right drivers for you.
Dv6-7000 /Full HD/Core i5-3360M/GF 650M/Corsair 8GB/Intel 7260AC/Samsung Pro 256GB
Testing - HP 15-p000
HP Touchpad provided by HP
Currently on Debian Wheeze
*Please, help other users with the same issue by marking your solved topics as "Accept as Solution"*