Overview
Comment: | fix likelihood |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA3-256: |
574e68216769308bbc4e95fc9976e9b7 |
User & Date: | velartrill on 2018-11-20 21:02:50 |
Other Links: | manifest | tags |
Context
2018-11-21
| ||
11:36 | overhaul drugbot check-in: 7cdf7c1a3d user: lexi tags: trunk | |
2018-11-20
| ||
21:02 | fix likelihood check-in: 574e682167 user: velartrill tags: trunk | |
20:52 | fix sam check-in: 44f5ce5d15 user: velartrill tags: trunk | |
Changes
Modified botsoc.scm from [eea7ee34de] to [e3d4e11eaf].
331 332 333 334 335 336 337 338 339 340 341 342 |
(i (punct) " checkmate " (atheists) (end-punct))
(i (punct) " checkmate" (punct) " " (atheists) (end-punct))
(i (punct) " #checkmate" (atheists))
(i (punct) " #CheckmateAtheists")
(i (punct) " #CheckmateAthiests"))
(define (checkmate-athiests i)
(if (eqv? (random-integer 20) 0)
(checkmate-atheists i) ; else
i))
(print (checkmate-athiests (statement (ideology))) "\n")
|
| |
331 332 333 334 335 336 337 338 339 340 341 342 |
(i (punct) " checkmate " (atheists) (end-punct))
(i (punct) " checkmate" (punct) " " (atheists) (end-punct))
(i (punct) " #checkmate" (atheists))
(i (punct) " #CheckmateAtheists")
(i (punct) " #CheckmateAthiests"))
(define (checkmate-athiests i)
(if (eqv? (random-integer 9) 0)
(checkmate-atheists i) ; else
i))
(print (checkmate-athiests (statement (ideology))) "\n")
|