โปรแรมใกล้พนัง

' {$STAMP BS2sx}
' {$PBASIC 2.5}
ADC VAR Word
R VAR Word
I VAR ByteX VAR Byte
PAUSE
1IF (ADC > XXX) THENLOW 15 : HIGH 14 : LOW 13 : HIGH 12 : PAUSE 40LOW 15 : LOW 14 : LOW 13 : LOW 12ENDENDIFLOOPEND
RD_ADC: LOW 10 : PAUSE 2 : HIGH 10SEROUT 10,240,[1]SERIN 10,240,250,Error,[ADC.BYTE0,ADC.BYTE1]RETURNError: RETURN
โดยที่ ( XXX = 385(ใกล้ที่สุด),320(3cm),250(5cm) )

a17-1

{$STAMP BS2sx}
' {$PBASIC 2.5}
ADC VAR Word
CH VAR Byte
CNT VAR Byte
CNT = 0
PAUSE 1000
HIGH 15 LOW 14 : HIGH 13 : LOW 12
DO
CH = 3 : GOSUB RD_ADC
IF ADC < 100 THEN
DO
CH = 3 : GOSUB RD_ADC
LOOP UNTIL(ADC > 100)
CNT = CNT + 1
ENDIF
CH = 5
PAUSE 300
LOOP UNTIL(CNT > 19)
LOW 15 : HIGH 14 : LOW 13 : HIGH 12
PAUSE 100
LOW 15 : LOW 14 : LOW 13 : LOW 12
STOP
RD_ADC: LOW 10 : PAUSE 2 : HIGH 10
SEROUT 10,240,[CH]
SERIN 10,240,250,Error,[ADC.BYTE0,ADC.BYTE1]
RETURN
Error: DEBUG "Error reading", CR
RETURN

การตรวจจับป้องกันการชน แผนที่

ข้อสอบใหญ่

' {$STAMP BS2sx}
' {$PBASIC 2.5}
PAUSE 1000
main : GOSUB forward :PAUSE 1500
GOSUB t_left :PAUSE 500
GOSUB forward : PAUSE 500
GOSUB t_right : PAUSE 500
GOSUB forward : PAUSE 1000
GOSUB t_right : PAUSE 500
GOSUB forward : PAUSE 1000
GOSUB t_left : PAUSE 500
GOSUB forward : PAUSE 1000
GOSUB t_left : PAUSE 500
GOSUB forward : PAUSE 1000
GOSUB t_right :PAUSE 500
GOSUB forward : PAUSE 500
GOSUB t_right : PAUSE 550
GOSUB forward :PAUSE 2000
GOSUB t_right :PAUSE 500
GOSUB forward :PAUSE 500
GOSUB t_right :PAUSE 700
GOSUB forward : PAUSE 4000
GOSUB s_right : PAUSE 350
GOSUB forward : PAUSE 150
GOSUB motor_off : PAUSE 10000
forward : HIGH 15: LOW 14 : HIGH 13 : LOW 12 : RETURN
t_left :LOW 15 : LOW 14 : HIGH 13 :LOW 12 : RETURN
t_right :HIGH 15 : LOW 14 :LOW 13 :LOW 12 :RETURN
s_right : HIGH 15 : LOW 14 : LOW 13 : HIGH 12 : RETURN
motor_off :LOW 15 :LOW 14:LOW 13:LOW 12 :RETURN

แผนผังการเดิน

เดินไปกลับแบบหมุนตัว

' {$STAMP BS2sx}'
{$PBASIC 2.5}'
{$PORT COM2}
PAUSE 1000
Main: GOSUB Forward : PAUSE 1200
GOSUB S_Right:PAUSE 1000
GOSUB Forward:PAUSE 1200
GOSUB S_Right:PAUSE 800
GOSUB Motor_OFF:PAUSE 10000GOTO MainForward:HIGH 13:LOW 12:HIGH 15:LOW 14:RETURNS_Right:HIGH 15:LOW 14:LOW 13:HIGH 12:RETURN
Motor_OFF:LOW 13:LOW 12:LOW 15:LOW 14:RETURN

เดินเป็นสี่เหลี่ยม

' {$STAMP BS2sx}'
{$PBASIC 2.5}'
{$PORT COM2}
PAUSE 1000
Main: GOSUB Forward:PAUSE 1000
GOSUB T_Left:PAUSE 500
Forward:HIGH 13:LOW 12:HIGH 15:LOW 14:RETURN
T_Left:HIGH 13:LOW 12:LOW 15:LOW 14:RETURN

โจทย์ข้อที่2-การเดินเป็นสามเหลี่ยม

' {$STAMP BS2sx}'
{$PBASIC 2.5}'
{$PORT COM2}
PAUSE 1000
Main: GOSUB left : PAUSE 670
GOSUB go : PAUSE 1000
GOSUB left : PAUSE 660GOSUB go : PAUSE 1000GOSUB left :PAUSE 670
GOSUB go :PAUSE 1000
GOSUB off : PAUSE 7000
GOTO Main
left:HIGH 13:LOW 12:LOW 15:LOW 14:RETURN
go:HIGH 13:LOW 12:HIGH 15:LOW 14:RETURNoff:LOW 13:LOW 12:LOW
15: LOW 14:RETURN

โจทย์ที่3-การเดินไปแล้วโค้งแล้วเดินกลับ

' {$STAMP BS2sx}'
{$PBASIC 2.5}'
{$PORT COM2}
PAUSE 1000
Main: GOSUB go :PAUSE 1000
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE6
GOSUB left :PAUSE 15GOSUB go :PAUSE 6GOSUB left :PAUSE 15GOSUB go :PAUSE1000
GOSUB off :PAUSE 50000go:HIGH 13:LOW 12:HIGH 15:LOW 14:RETURN
left:HIGH 13:LOW 12:LOW 15:LOW 14:RETURN
off:LOW 13:LOW 12:LOW 15:LOW 14:RETURN

ประโยชน์ของการสร้างบล็อค

1.สามารถเผยแผร่ในสิ่งที่เรารู้ให้คนอื่นได้รับรู้สิ่งที่เราจะเผยแพร่ให้กับเค้า
2.สามารถให้คนอื่นมาติชมบล็อคของเรา
3.เราสามารถไปดูบล็อคของคนอื่นได้แล้วติชมได้เหมือนกัน

การเขียนโปรแกรมหุ่นยนต์ (โจทย์ข้อที่1การเดินไปเดินกลับ)

ต้องพิมพ์รหัสดังนี้
PAUSE 1000
Main: GOSUB Forward : PAUSE 1200
GOSUB S_right : PAUSE 1000
GOSUB Forward : PAUSE 1200
GOSUB S_right : PAUSE 800
GOSUB Motor_off : PAUSE 10000
Forward : HIGH 13 : LOW 12 : HIGH 15 : LOW 14 : RETURN
S_right : HIGH 15 : LOW 14 : LOW 13 : HIGH 12
Motor_off : LOW 13 : LOW 12 : LOW 15 : LOW 14 : RETURN

ประโยชน์ของการสร้างบล็อค

ประโยชน์ของการสร้างบล็อค คือ ทำให้เราสามารถแสดงสิ่งต่างให้คนอื่นได้มาเปิดดูของเราเพื่อวิจารณ์ติชมสิ่งที่เราแสดงในบล็อคของเรา และให้คนที่ใช้บริการมาค้นหาข้อมูลที่เป็นประโยชน์แก่เข้าใช้และเราก็สามารถเปิดเข้าไปดูบล็อคของคนอื่นก้อได้ เย้