Notes
Notes - notes.io |
'{$PBASIC 2.5}
'constants
TURN_ON CON 1
TURN_OFF CON 0
timerLoop var word
timeToDischarge var word
'____________
'initialization
'blink the Led
initLed = TURN_ON
PAUSE 500
initLed = TURN_OFF
PAUSE 500
'beep the piezospeaker
FREQOUT 10, 500, 4000
FREQOUT 10, 500, 3000
FREQOUT 10, 500, 200
FREQOUT 10, 500, 2000
FREQOUT 10, 500, 3500
FREQOUT 10, 250, 4500
FREQOUT 10, 300, 5000
FREQOUT 10, 300, 4000
'____________________
'Set I/O ports and give a friendly name
OUTPUT 11
initLed VAR OUT11
'Main Program
main:
do
Gosub veerLeft
High 6
Pause 3
RCTIME 6,1,timeToDischarge
Debug ? timeToDischarge
loop until(timeToDischarge > 9)
do
Gosub veerRight
High 6
Pause 3
RCTIME 6,1,timeToDischarge
Debug ? timeToDischarge
loop until(timeToDischarge <= 7)
Goto main
'subroutines
veerLeft:
PULSOUT 12,765
PULSOUT 13,700
PAUSE 20
RETURN
veerRight:
PULSOUT 12,800
PULSOUT 13,736
Pause 20
RETURN
turnLeft:
For timerLoop = 1 to 20
PULSOUT 12,650
PULSOUT 13,650
PAUSE 20
NEXT
RETURN
turnRight:
For timerLoop = 1 to 21
PULSOUT 12,846
PULSOUT 13,846
PAUSE 20
NEXT
RETURN
moveForward:
PULSOUT 12,803
PULSOUT 13,650
PAUSE 20
RETURN
stopMove:
For timerLoop = 1 to 10
PULSOUT 12,750
PULSOUT 13,750
PAUSE 20
NEXT
RETURN
turnAround:
For timerLoop = 1 to 44
PULSOUT 12,850
PULSOUT 13,850
PAUSE 20
NEXT
RETURN
|
|
Notes is a web-based application for online taking notes. You can take your notes and share with others people. If you like taking long notes, notes.io is designed for you. To date, over 8,000,000,000+ notes created and continuing...
With notes.io;
- * You can take a note from anywhere and any device with internet connection.
- * You can share the notes in social platforms (YouTube, Facebook, Twitter, instagram etc.).
- * You can quickly share your contents without website, blog and e-mail.
- * You don't need to create any Account to share a note. As you wish you can use quick, easy and best shortened notes with sms, websites, e-mail, or messaging services (WhatsApp, iMessage, Telegram, Signal).
- * Notes.io has fabulous infrastructure design for a short link and allows you to share the note as an easy and understandable link.
Fast: Notes.io is built for speed and performance. You can take a notes quickly and browse your archive.
Easy: Notes.io doesn’t require installation. Just write and share note!
Short: Notes.io’s url just 8 character. You’ll get shorten link of your note when you want to share. (Ex: notes.io/q )
Free: Notes.io works for 14 years and has been free since the day it was started.
You immediately create your first note and start sharing with the ones you wish. If you want to contact us, you can use the following communication channels;
Email: [email protected]
Twitter: http://twitter.com/notesio
Instagram: http://instagram.com/notes.io
Facebook: http://facebook.com/notesio
Regards;
Notes.io Team
