azrad@azrad-MS-7693:~$ python
Python 2.7.6 (default, Jun 22 2015, 17:58:13)
[GCC 4.8.2] on linux2
Type "help", "copyright", "credits" or "license" for more information.
>>> import cleverbot
>>> cleverbot.Cleverbot().ask('who would use d2jsp and python for windows?')
u'Faget.'
>>>

[root@fedora-512mb-nyc2-01 ~]# python
Python 2.7.10 (default, Sep 8 2015, 17:20:17)
[GCC 5.1.1 20150618 (Red Hat 5.1.1-4)] on linux2
Type "help", "copyright", "credits" or "license" for more information.
>>> import cleverbot
>>> cl = cleverbot.Cleverbot()
>>> cl.ask('Why use linux when I have a VPS?')
u'I use it because someone gave it to me.'
>>>

[["repaired", 5.198454021461245], ["destroyed", 4.72890101697455], ["computers", 4.259348012487856]]

[["terribly", 3.779489856987712], ["difficult", 3.779489856987712]]

Process started >>>
Initializing brain

Creating neural links
Debug: Linking keywords `["super", "cool", "test"]` to `This was a super cool test`
Debug: Adding keyword node `super`
Debug: Adding keyword node `cool`
Debug: Adding keyword node `test`
Debug: Adding response node `This was a super cool test`
Debug: Linking keywords `["test"]` to `This was a test`
Debug: Adding keyword node `test`
Debug: Keyword node `test` already learned
Debug: Adding response node `This was a test`
Debug: Linking keywords `["weird"]` to `This is weird`
Debug: Adding keyword node `weird`
Debug: Adding response node `This is weird`
Debug: Linking keywords `["cool", "test"]` to `Wow cool test`
Debug: Adding keyword node `cool`
Debug: Keyword node `cool` already learned
Debug: Adding keyword node `test`
Debug: Keyword node `test` already learned
Debug: Adding response node `Wow cool test`


Generating responses
Debug: Finding response for `That was a cool test`
Debug: Finding keywords for `That was a cool test`
This was a super cool test
Debug: Finding response for `That was a cool test`
Debug: Finding keywords for `That was a cool test`
Wow cool test
Debug: Finding response for `That was a cool test`
Debug: Finding keywords for `That was a cool test`
Wow cool test
Debug: Finding response for `That was a cool test`
Debug: Finding keywords for `That was a cool test`
This was a test
Debug: Finding response for `That was a cool test`
Debug: Finding keywords for `That was a cool test`
Wow cool test

require "sqlite3"
require "graph-rank"

class Brain
def initialize(brain)
if !File.file?(brain)
@brain = SQLite3::Database.new brain
@brain.execute "Create Table Keywords (id INTEGER PRIMARY KEY AUTOINCREMENT, keyword TEXT NOT NULL UNIQUE);"
@brain.execute "Create Table Responses (id INTEGER PRIMARY KEY AUTOINCREMENT, response TEXT NOT NULL);"
@brain.execute "Create Table Brain (responseId INTEGER References Responses(id), keywordId INTEGER References Keywords(id));"

@brain.execute "Create Index KeywordsIndex on Keywords (id, keyword)"
@brain.execute "Create Index ResponsesIndex on Responses (id, response)"
@brain.execute "Create Index BrainIndex on Brain (responseId, keywordId)"
else
@brain = SQLite3::Database.open brain
end

@brain.execute "PRAGMA synchronous=OFF"
@brain.execute "PRAGMA count_changes=OFF"
@brain.execute "PRAGMA journal_mode=MEMORY"
@brain.execute "PRAGMA temp_store=MEMORY"
end

def addKeywordNode(keyword)
begin
puts "Debug: Adding keyword node `#{keyword}`"
@brain.execute("Insert Into Keywords Values (NULL, ?)", keyword)
rescue SQLite3::ConstraintException
end
end

def addResponseNode(response)
puts "Debug: Adding response node `#{response}`"
@brain.execute("Insert Into Responses Values (NULL, ?)", response)
end

def addNeuralLink(keywords, response)
puts "Debug: Linking keywords `#{keywords}` to `#{response}`"
keywordIds = []
keywords.each do |keyword|
self.addKeywordNode keyword
keywordId = @brain.execute("select id from Keywords where keyword = ?", keyword)
keywordIds.push keywordId.first.first
end

self.addResponseNode response
responseId = @brain.execute("select id from Responses where response = ?", response)

keywordIds.each do |keywordId|
@brain.execute("Insert Into Brain values (?, ?)", responseId, keywordId)
end
end

def findKeywords(input)
puts "Debug: Finding keywords for `#{input}`"
gr = GraphRank::Keywords.new
gr.run(input).map { |row| row[0] }
end

def findResponse(input)
puts "Debug: Finding response for `#{input}`"
keywords = self.findKeywords(input).map { |e| "'#{e}'" }.join(', ')
responses = @brain.execute <<-SQL
Select response
From Responses
Inner Join (Select responseId
From Brain
Where keywordId in (Select id
From Keywords
Where keyword in (#{keywords}))) q
on Responses.id=q.responseId
group by q.responseId
order by count(q.responseId) DESC;
SQL

responses.sample.first
end
end

puts "Initializing brain"
brain = Brain.new "newbrain1.db"

puts "\nCreating neural links\n"
brain.addNeuralLink(["super", "cool", "test"], "This was a super cool test")
brain.addNeuralLink(["test"], "This was a test")
brain.addNeuralLink(["weird"], "This is weird")
brain.addNeuralLink(["cool", "test"], "Wow cool test")

puts "\n\nGenerating responses\n"

5.times do
puts brain.findResponse "That was a cool test"
end

Initializing brain
Input > What color is the sky?
Response> The sky is blue.
Debug: Linking keywords `["color", "sky"]` to `The sky is blue.`
Output > The sky is blue.

^C

Initializing brain
Input > What color is the sky?
Output > The sky is blue.

require "sqlite3"
require "graph-rank"

class Brain
def initialize(brain)
if !File.file?(brain)
@brain = SQLite3::Database.new brain
@brain.execute "Create Table Keywords (id INTEGER PRIMARY KEY AUTOINCREMENT, keyword TEXT NOT NULL UNIQUE);"
@brain.execute "Create Table Responses (id INTEGER PRIMARY KEY AUTOINCREMENT, response TEXT NOT NULL UNIQUE);"
@brain.execute "Create Table Brain (responseId INTEGER References Responses(id), keywordId INTEGER References Keywords(id));"

@brain.execute "Create Index KeywordsIndex on Keywords (id, keyword)"
@brain.execute "Create Index ResponsesIndex on Responses (id, response)"
@brain.execute "Create Index BrainIndex on Brain (responseId, keywordId)"
else
@brain = SQLite3::Database.open brain
end

@brain.execute "PRAGMA synchronous=OFF"
@brain.execute "PRAGMA count_changes=OFF"
@brain.execute "PRAGMA journal_mode=MEMORY"
@brain.execute "PRAGMA temp_store=MEMORY"
end

def addKeywordNode(keyword)
begin
#puts "Debug: Adding keyword node `#{keyword}`"
@brain.execute("Insert Into Keywords Values (NULL, ?)", keyword)
rescue SQLite3::ConstraintException
#puts "Debug: Keyword node `#{keyword}` already learned"
end
end

def addResponseNode(response)
begin
#puts "Debug: Adding response node `#{response}`"
@brain.execute("Insert Into Responses Values (NULL, ?)", response)
rescue SQLite3::ConstraintException
#puts "Debug: Response node `#{keyword}` already learned"
end
end

def addNeuralLink(keywords, response)
puts "Debug: Linking keywords `#{keywords}` to `#{response}`"
keywordIds = []
keywords.each do |keyword|
self.addKeywordNode keyword
keywordId = @brain.execute("select id from Keywords where keyword = ?", keyword)
keywordIds.push keywordId.first.first
end

self.addResponseNode response
responseId = @brain.execute("select id from Responses where response = ?", response)

keywordIds.each do |keywordId|
@brain.execute("Insert Into Brain values (?, ?)", responseId, keywordId)
end
end

def findKeywords(input)
#puts "Debug: Finding keywords for `#{input}`"
gr = GraphRank::Keywords.new
gr.run(input).map { |row| row[0] }
end

def findResponse(input)
#puts "Debug: Finding response for `#{input}`"
keywords = self.findKeywords(input)
keywordsQuoted = keywords.map { |e| "'#{e}'" }.join(', ')
keywords.count.downto(0) do |keywordCount|
responses = @brain.execute <<-SQL
Select response
From Responses
Inner Join (Select responseId
From Brain
Where keywordId in (Select id
From Keywords
Where keyword in (#{keywordsQuoted}))) q
On Responses.id=q.responseId
Group By q.responseId Having count(q.responseId) > #{keywordCount}
Order By Count(q.responseId) DESC;
SQL

if !responses.empty?
return responses.sample.first
end
end

return "..."
end

def trainInput(input, response)
keywords = self.findKeywords input
self.addNeuralLink(keywords, response)
end
end

puts "Initializing brain"
brain = Brain.new "newbrain1.db"

while true
print "Input > "
input = gets.strip
#print "Response> "
#response = gets.strip
#brain.trainInput(input, response)
print "Output > "
output = brain.findResponse input
puts output
end