RackeTwitter is a small Twitter bot created in Racket. It uses a simple GUI and the to allow the user to enter their Consumer Key (API Key) the consumer Secret, the Access Token, and the Secret Access token to create a tweet bot that is implemented in Racket. These alpha-numeric keys/tokens provided via [Twitter's Dev Site] (https://apps.twitter.com/) when you create a twitter app.
##Screenshot Run RackeTwitter from DrRacket. The Window below will pop up:
Proceed to The Login Screen:
After a successful login the user will recieve this window:
Selecting tweet will bring up this window...enter some text and hit tweet!
##Concepts Demonstrated Identify the OPL concepts demonstrated in your project. Be brief. A simple list and example is sufficient.
- OOP with message passing used to recieve key/tokens for login from the user and set the variables in the class.
- Creating and manipulating lists from user input CARs and CDRs.
##External Technology and Libraries We used the [Racket Gui library] (https://docs.racket-lang.org/gui/) to wrap the oauth-single-user library created by [Stephen Charles] (https://github.com/StephenCharles/Racket-OAuth1.0a).
##Favorite Scheme Expressions ####Harrison
(new button% [parent searchButtons] [label "Next"]
[callback (lambda (button event)
(if (or (eq? '() search-results) (>= (+ 1 index-of-search) (length search-results)))
(send warning show #t)
(begin (set! index-of-search (+ index-of-search 1))
(send searchDisplay set-label (next-result search-results index-of-search)))))])This is my favorite procedure within the code. It is my favorite because even though it looks kind of complex, it is actually a really straight forward procedure. The code allows the user to change the displayed search result to the the next result. This procedure even has error checking, which can be seen by the the if statement. By checking to make sure the index is not larger than the number of elements in the list, we know it can never over step. Another thing that I like about this code is the fact it uses lambda to create a procedure that runs when the button is clicked.
####Nick
(new button% [parent tweetButtons] [label "Post"]
[callback (lambda (button event)
(if (eq? "" (send tweet get-value))
(send warning show #t)
(begin (send twitter-oauth
post-request "https://api.twitter.com/1.1/statuses/update.json"
(list (cons 'status (send tweet get-value))))
(send tweetScreen show #f))))])This was my favorite procedure just because it took a lot of trial and error to actually make sure that we were properly connecting to twitter after entering the Keys/Tokens. The procedure above creates a new button labeled "post" in the tweet screen. If nothing is entered then the screen throws an error message. When the user enters text to post we utilize the post-request built in from the Oauth-Lib. This takes two parameters which are the end-point of the invocation:
post-request "https://api.twitter.com/1.1/statuses/update.json" and a list of charachters which are the message itself:
(list (cons 'status (send tweet get-value))) #How to Download and Run
- After downloading the release unpack the zip into any directory.
- Open the file RackeTwitterGUI.rkt in DrRacket
- Run the file with the play button.
- See Screenshots for using the GUI.