Artificial Intelligence

“AI is a journey into the mind of man.” – Eddie Jackson

Books I Recommend (click for link to amazon)

    

 

Links

Artificial Intelligence: A Modern Approach site (supplemental)

01- Artificial Intelligence Foundations of Computational Agents  slides  HTML book

02- Artificial Intelligence Depot

03- Association for the Advancement of Artificial Intelligence

04- AI in the News | AITopics

05- Artificial Intelligence at the Economist

06- Artificial Intelligence at Science Daily

07- Artificial Intelligence at Mashable

08- Artificial Intelligence on Reddit

09- The Concept of Intelligence in AI.pdf

 

E-Learning Courses and Videos

01- Artificial Intelligence from Hochschule Ravensburg-Weingarten

02- Artificial Intelligence from Udacity-Stanford University

03- Self-Improving Artificial Intelligence

04- Machine Learning – Bayesian Learning

05- Lecture Overview 2 3 4.pdf

06- Fuzzy Logic

 

Miscellaneous AI Sites

01- Nils J. Nilsson http://ai.stanford.edu/~nilsson/  his book

02- Brian Harvey http://www.cs.berkeley.edu/~bh/  AI  books

 

AI Documents

01- Artificial Intelligence A Modern Approach.pdf

02- http://bookboon.com/en/artificial-intelligence-ebooks

03- Artificial Intelligence.pdf

04- Artificial Intelligence as a Positive and
Negative Factor in Global Risk.pdf

05- FOUNDATIONAL ISSUES IN ARTIFICIAL INTELLIGENCE AND COGNITIVE SCIENCE.pdf

06- Artificial Intelligence A Guide to Intelligent Systems.pdf

07- Developing an Artificial Intelligence Engine.pdf

08- Artificial Intelligence.pdf

 

My Own Work in Artificial Intelligence

more coming soon…

 

This is a VBScript I wrote to determine the validity of an email address. Simple AI is about pattern recognition, and if you notice in the code below, a particular pattern is exactly what we’re looking for. Also, here is some further information: What are regular expressions?

DIM strEmailAddress, objPatternMatch

strEmailAddress = “mrnettekTest@yahoo.com”

Set objPatternMatch = New RegExp

With objPatternMatch
.Pattern = “^[\w-\.]{1,}\@([\da-zA-Z-]{1,}\.){1,}[\da-zA-Z-]{2,4}$”
.IgnoreCase = False
.Global = False
End With
‘ The Test method objPatternMatch TRUE if a match is found or FALSE if a match is NOT found
If objPatternMatch.Test( strEmailAddress ) Then
msgbox strEmailAddress & ” is a valid e-mail address”
Else
msgbox strEmailAddress & ” is NOT a valid e-mail address”
End If

Set objPatternMatch = Nothing
Set strEmailAddress = Nothing

WScript.Quit(0)

 

The following VBScript example finds all occurrences of a word.
The “\w+” regular expression pattern specifies to match one or
more of any of the following characters: A-Z, a-z, 0-9, and the
underscore character.

Setting the Global property to True specifies
that the search should find all occurrences of the pattern instead
of just the first occurrence.

The Execute Method returns a Matches
Collection that contains the search results. The program iterates
through the Matches collection to retrieve each match.

Option Explicit

Dim txtSource, thePattern, objMatchPattern, Match, Matches

txtSource = “The man in the moon is very far away”
thePattern = “\w+”

‘Create the regular expression.
Set objMatchPattern = New RegExp
objMatchPattern.Pattern = thePattern
objMatchPattern.IgnoreCase = False
objMatchPattern.Global = True

‘Perform the search.
Set Matches = objMatchPattern.Execute(txtSource)

‘Iterate through the Matches collection.
For Each Match in Matches
msgbox Match.FirstIndex & ” ” & Match.Value
Next

‘clear session
set txtSource = Nothing
set thePattern = Nothing
set objMatchPattern = Nothing
set Match = Nothing
set Matches = Nothing

‘The Index and Word Output:
‘ 0 The
‘ 4 man
‘ 8 in
‘ 11 the
‘ 15 moon
‘ 20 is
‘ 23 very
‘ 28 far
‘ 32 away

 

I created this simple batch file to demonstrate a learning bot…you will help build its KB data in the file named speech.txt. Just copy the below code into a script like AI.cmd, and run it.

@echo off
set BotName=Chatty

title AI %BotName% 1.0 – Learner Bot
color 0b

rem Create the speech file if not exist
if not exist speech.txt echo.>speech.txt

Echo Start up a conversation with %BotName%
echo.

:START
set /p text=”You: “

REM DYNAMIC QUESTIONS THAT PULL REALTIME INFORMATION
if /i “%text%”==”What time is it?” goto :TIME
if /i “%text%”==”What is the time?” goto :TIME
if /i “%text%”==”What is the date?” goto :DATE

REM OUR SPEECH FILE
for /f “tokens=1,* delims=@” %%a in (speech.txt) do (

if /i “%text%”==”%%a” (
echo.
echo %BotName%: %%b
echo.
goto :START
)
)

echo %BotName%: I don’t know what that means.
set /p answer=%BotName%:  How should this be answered ‘%text%’?
echo %text%@%answer%>>speech.txt
echo %BotName%: Thanks!
echo.
goto :START
:TIME
echo.
echo %BotName%: The time is %TIME%
echo.
goto :START

:DATE
echo.
echo %BotName%: The date is %DATE%
echo.
goto :START