ลิงก์ผู้สนับสนุน

วันจันทร์ที่ 12 พฤษภาคม พ.ศ. 2557

How to chang boot default in Linux


ตัวอย่างเช่น ลง Windows 7 เอาไว้ แล้วมาลง Linux ต่อทีหลัง แล้วทำ dual boot ตอนเปิดเครื่องมันจะ default ที่ Linux  แต่ถ้าจะให้ค่ามาที่ Windows แก้ได้ดังนี้

*ไม่แนะนำให้แก้ที่ไฟล์ /boot/grub/grub.cfg

ให้ไปที่ /etc/default/grub แล้วแก้ที่บรรทัด
GRUB_DEFAULT=0
ให้เปลี่ยนเลข 0 เป็นตัวอื่น
แล้วใช้คำสั่ง update-grub เป็นอันเรียบร้อย 

วันพฤหัสบดีที่ 10 ตุลาคม พ.ศ. 2556

[เรื่อยเปื่อย][Diary] สัมภาษณ์วิศวะคอมฯ ลาดกระบัง


วันจันทร์ที่ 7 ที่ผ่านมา ก็ได้มีโอกาสไปสัมภาษณ์โค้วต้าช้างเผือกของวิศวะคอมฯ ลาดกระบังมา หลังสัมภาษณ์เสร็จ ก็ทั้งรู้สึกเสียใจกับเสียดายนะ บางอย่างก็ไม่ได้พูด บางอย่างก็ไม่น่าพูด 555555

นัดสัมภาษณ์ 9 โมง ไปถึง ~8:20 หาข้าวกินอยู่โรง L เสร็จสรรพประมาณ 8:45 ก็ไปตึก ECC ต่อ ก็ไปรอหน้าห้องสัมภาษณ์ พี่ๆปีหนึ่งก็มาชวนคุยไปเรื่อยๆไม่ให้เราเกร็ง(บางทีมันก็เกร็งกว่าเดิมนะ ._.) รอเขามาเรียกไปเรื่อยๆ ยิ่งรอนาน ยิ่งหวั่นไหว 5555 แล้วพอคิวเรามาถึง

เรา : สวัสดีครับ ข....
อาจารย์ยกมือเชิญให้นั่งก่อนเลย ยังไม่ทันขอนั่ง
อาจารย์ : อ่ะ เดี๋ยวอาจารย์จะถามคำถามเรา มีเวลาให้ตอบข้อละประมาณ 2-3 นาที ให้คิดก่อนตอบดีๆ (มาซะแนววิชาการเลย)
อาจารย์ : มาจากไหน...  ที่บ้านน้ำท่วมรึเปล่า..
คำถามเปิดตัวเหมือนจะชิวๆแหะ เราก็ตอบธรรมดาไป
อาจารย์ : ไหนลองแนะนำตัวดูซิ
คำถามสุดฮิต..มาแล้ว 55555 เราก็แนะนำตัวไปปกติ
อาจารย์ : ทำไมถึงอยากเข้าวิศวะคอมหรอ?
เรา : ก็เป็นสาขาที่ได้จับทั้งฮาร์ดแวร์แล้วก็ซอฟต์แวร์ ไม่เหมือน IT,ComSci ที่เน้นไปซอฟต์แวร์มากกว่า ฯลฯ
อาจารย์ : ได้สมัครมหาฯลัยอื่นไว้บ้างรึเปล่า?
เรา : ไม่ได้สมัครไว้ครับ ....เอ่อ มีที่ ม.ขอนแก่น อีกครับ (จะพูดอีกทำไมฟร่ะ T^T ไม่น่าเลย)
อาจารย์ :  แล้วเคยไปแข่งอะไรเกี่ยวกับคอมบ้างมั้ย
เรา : ก็เปิดพอร์ตให้อาจารย์ดู ทั้งเกียรติบัตรแข่งแล้วก็พวกเข้าค่าย ,,พวกประวัติส่วนตัว การศึกษา ภาพกิจกรรมนี่ อาจารย์ไม่ได้แตะเลย = =' แล้วก็โยงเข้าไปถึงภาษา perl
อาจารย์ : ทำไมถึงได้เขียน perl ไม่เขียนพวก C หรอ
เรา : ทีแรกก็เขียน C ครับ เขียนได้ซักพัก ก็อยากจะลองภาษาใหม่ ที่ไม่ต้องกังวลกับพวกชนิดตัวแปร ก็เลยได้มาเขียนภาษา perl
อาจารย์ : แล้ว java หละ ?
เรา : ยังไม่เป็นครับ ก็กำลังศึกษาอยู่ 
อาจารย์ : อืมมม.. แล้วเคยใช้ภาษา perl ทำอะไรบ้าง
เราก็ไล่ๆไป ทำอะไรบ้าง แล้วก็มาถึงว่าเคยเล่น raspberry pi
อาจารย์ : มันคืออะไรหรอ
เรา : ก็เป็นบอร์ดคอมพิวเตอร์ครับ ต้องหาจอ เมาส์คีย์บอร์ดมาต่อเพิ่มเอง มันสะดวกที่พกพาได้ง่ายครับ ราคาก็ไม่แพง
อาจารย์ : เท่าไหร่หรอ
เรา : ผมซื้อมาประมาณ 1,300 ครับ (นึกราคาจริงๆไม่ออก แถก่อนละกัน 5555)
อาจารย์ :  แสดงว่าที่บ้านรวยหนิ ,,แล้วอาจารย์ก็เปิดดูเอกสาร เห็นว่าพ่อแม่เป็นครู
เรา : ไม่หรอกครับ ได้เงินมา ก็หารสองเอาไปใช้หนี้ = =
อาจารย์ : แล้วทำไมเราไม่ไปเป็นครู ?
เรา : ผมสอนคนอื่นไม่ค่อยเข้าใจนะครับ พูดไม่ค่อยรู้เรื่อง
อาจารย์ : ที่คุยมา นี่ก็แสดงว่าอาจารย์ไม่รู้เรื่องเลยซิ 55555
อาจารย์ : เคยซ่อมคอมเองมั้ย หรือไม่ก็ประกอบคอมเอง ?
เรา : เคยครับ แต่ยังไม่เคยซื้อคอมมาประกอบเอง
อาจารย์ : ซ่อมอะไรหรอ
เรา : เคยเปลี่ยนฮาร์ดดิสครับ
อาจารย์ : โห ธรรมดาไป
เรา : คือคอมมีปัญหาที่ HDD หน่ะครับ แต่ไม่รู้ว่ามีปัญหาที่อื่นอีกรึเปล่า ยังไม่อยากเปลี่ยนHDDใหม่ ก็เลยรื้อ notebook ทั้งเครื่องออกมา เป่าฝุ่นแล้วประกอบเข้าไปใหม่อยู่ครับ (เอาว่ะ มันคงไม่ธรรมดาแล้ว)
อาจารย์ : แล้วอย่างอื่นหละ เช่น ถ้าหลอดไฟขาดจะดูยังไง
อาจารย์ก็ถามเรื่อยๆ จนตอบไม่ได้ -*- แล้วก็ยังโดนอาจารย์สอนเรื่องบัลลาสต์ด้วย
อาจารย์ : ลองไล่ชื่อพวกบริษัทที่เกี่ยวกับคอมดูหน่อย
เราก็ไล่ไป นึกออกแต่พวกบริษัทผลิตคอมโน๊ตบุ๊คทั้งหลาย
อาจารย์ : รู้จักเยอะนิ ทำไมถึงได้รู้
เรา : ก็ตอบไปว่า ตอนเลือกซื้อโน๊ตบุ๊ค ก็หาพวกยี่ห้อต่างนี่แหละ เลยผ่านตามา
อาจารย์ : แล้วสเปกคอมเราเป็นยังไง
ก็ไล่ๆไป ผิดบ้างถูกบ้าง 5555
อาจารย์ : อืมๆ แล้วอย่างบริษัท หน่วยงานในไทยบ้างหละ
เราก็ตอบพวก nectec sipa ICT แล้วก็ DSI (เกี่ยวมั้ยยย ??)
อาจารย์ : เคยทำงานหนักๆ อดหลับอดนอนบ้างมั้ย ?
เรา : เคยครับ ก็ทั้งเขียนโปรแกรม ทำการบ้าน แล้วก็ทำพอร์ต 55555
อาจารย์ : เอาหล่ะ แล้วถ้าไม่ติดที่นี้ จะทำยังไง
เรา : ผมก็จะมาสอบใหม่รอบรับตรงอีกทีครับ
อาจารย์ : ถ้าสมมติว่า เรียนจบ ป.ตรีแล้ว จะไปทำงาน หรือจะเรียนต่อ
เรา : ทำงานครับ อยากหาเงินก่อน แล้วค่อยกลับมาเรียนใหม่
อาจารย์ : จะเอาความรู้ด้านวิศวะคอมพิวเตอร์ ไปประยุกต์ใช้ให้ประโยชน์กับสังคมในด้านไหน เช่น การแพทย์ การเกษตร...
เรา : ก็ตอบไปว่าทางการแพทย์ ไปประดิษฐ์พวกเครื่องมือที่ต้องการความแม่นยำ เช่นตอนผ่าตัด แล้วก็ทางการทหาร เพราะเทคโนโลยีล้ำๆ ส่วนมากก็มาจากทหารอยู่แล้ว

อาจารย์ : มีอะไรจะถามอาจารย์มั้ย ?
ไอ้เราก็นั่งคิดอยู่ 'เอ่อออ..'
อาจารย์ : จะกลับเลยรึเปล่านิ ?
เรา : (เมื่อกี้ผมยังไม่ทันได้ตอบเลยจารย์) ยังครับ รุ่นพี่เขามีจัดกิจกรรมให้คนที่มาสัมภาษณ์อยู่ ผมจะเข้าร่วมต่อ

แล้วก็ร่ำลากัน พอออกมาหน้าห้อง ก็รู้สึกโล่งนะ แต่ไม่สุด เหมือนทำยังไม่เต็มที่ แต่ก็เต็มที่แล้ว เอ๊า...งง 55555

ก็จบไปเท่านี้ครับ กับการสัมภาษณ์ รับ25 สมัคร115 รอลุ้นผลกันอีกทีนึง..
Ps.ทีแรกบอกรับ25 สมัคร115 ผลออกมา เห็นรายชื่อตั้ง 46 คนแหนะ แต่สุดท้ายก็ WIN :D

วันอาทิตย์ที่ 16 มิถุนายน พ.ศ. 2556

[How to ] enable,disable remote desktop from command line


Enable: reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections /t REG_DWORD /d 0 /f

Disable: reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fDenyTSConnections /t REG_DWORD /d 1 /f


Enable Remote Assistant: reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server" /v fAllowToGetHelp /t REG_DWORD /d 1 /f

วันเสาร์ที่ 15 มิถุนายน พ.ศ. 2556

[How to] Check last user logon in Windows



สำหรับ วิธีการเช็ควดูรายละเอียดว่า user ในเครื่องนั้น ล็อกออนเข้ามาใช้งานเครื่อง ล่าสุดตอนไหน ใน windows นั้น ให้ใช้คำสั่ง

net user [username]

หรืออีกคำสั่งหนึ่งคือ quser แล้วมองหาตรงเวลา logon time

วันพฤหัสบดีที่ 30 พฤษภาคม พ.ศ. 2556

[How to] disconnect ออกจาก remote desktop



ถ้าเราใช้งาน remote desktop ผ่านบาง app หลังจากปิด app ไปแล้ว แต่ปรากฏว่า session การใช้งานยังค้างไว้อยู่ ถ้าต้องการเช็คว่า มี session id ไหนค้างอยู่บ้าง ให้ใช้คำสั่ง qwinsta หลังจากเจอ user ที่ค้างใช้งานเอาไว้ แล้วต้องการปิด ให้ใช้คำสั่ง rwinsta ตามด้วย หมายเลข id ของแต่ละ session ที่จะปิด

END. ,,:P

วันอังคารที่ 19 มีนาคม พ.ศ. 2556

[Raspberry Pi] ทำเครื่อง รับ ส่ง รหัส morse




หลังจากที่ควบคุมขา GPIO กันได้แล้ว ต่อมา เนื่องจากว่าผมไม่รู้จะทำอะไรกับเจ้าขา GPIO ดี ก็เลยนึกเล่นๆไป ได้เครื่อง รับ-ส่ง รหัสมอสมาครับ

โดยในภาพ (และในสคริป) จะใช้ไฟจากขา #24 แล้วก็จากอีกขาหนึ่งที่มันจ่ายไฟ 3V ได้ เรียกไม่ถูกว่าอะไร 555

GPIO #24 -> ตั้งค่าเป็น output สำหรับจ่ายไฟ จากสคริป
3V -> สำหรับจ่ายไฟ ถ้าเราต้องการกดส่งรหัสมอสเอง
GPIO #23 -> ตั้งค่าเป็น input สำหรับรับรหัสมอส



มาดูที่ฝั่งตัวส่งรหัสมอสกันก่อน

#!/usr/bin/perl
$gpio=24;
$delay=0.25;                   #Delay of send speed
$pause=1*$delay;
$dot_pause=1*$delay;
$dash_pause=3*$delay;
$character_pause=3*$delay;
$word_pause=7*$delay;

print "\n\n";
print " Message >> ";
chomp($text=);
$original_text=$text;
@original_text=split //,$original_text;

$text=~s/ /\//ig;
$text=~s/\./.-.-.- /ig;
$text=~s/,/--..-- /ig;
$text=~s/\?/..-.. /ig;
$text=~s/a/.- /ig;
$text=~s/b/.--- /ig;
$text=~s/c/-.-. /ig;
$text=~s/d/-.. /ig;
$text=~s/e/. /ig;
$text=~s/f/..-. /ig;
$text=~s/g/--. /ig;
$text=~s/h/.... /ig;
$text=~s/i/.. /ig;
$text=~s/j/.--- /ig;
$text=~s/k/-.- /ig;
$text=~s/l/.-.. /ig;
$text=~s/m/-- /ig;
$text=~s/n/-. /ig;
$text=~s/o/--- /ig;
$text=~s/p/.--. /ig;
$text=~s/q/--.- /ig;
$text=~s/r/.-. /ig;
$text=~s/s/... /ig;
$text=~s/t/- /ig;
$text=~s/u/..- /ig;
$text=~s/v/...- /ig;
$text=~s/w/.-- /ig;
$text=~s/x/-..- /ig;
$text=~s/y/-.-- /ig;
$text=~s/z/--.. /ig;
$text=~s/1/.---- /ig;
$text=~s/2/..--- /ig;
$text=~s/3/...-- /ig;
$text=~s/4/....- /ig;
$text=~s/5/..... /ig;
$text=~s/6/-.... /ig;
$text=~s/7/--... /ig;
$text=~s/8/---.. /ig;
$text=~s/9/----. /ig;
$text=~s/0/----- /ig;

print " Sending >> $original_text[0]";
$count_text=1;
foreach (split //,$text) {
    if ($_ eq '.') {
        system("echo \"0\" > /sys/class/gpio/gpio$gpio/value");
        select undef,undef,undef,$pause;
        system("echo \"1\" > /sys/class/gpio/gpio$gpio/value");
        select undef,undef,undef,$dot_pause;
    }
    elsif ($_ eq '-') {
        system("echo \"0\" > /sys/class/gpio/gpio$gpio/value");
        select undef,undef,undef,$pause;
        system("echo \"1\" > /sys/class/gpio/gpio$gpio/value");
        select undef,undef,undef,$dash_pause;
    }
    elsif ($_ eq ' ') {
        system("echo \"0\" > /sys/class/gpio/gpio$gpio/value");
        select undef,undef,undef,$character_pause;
        print "$original_text[$count_text]";
        $count_text++;
    }
    elsif ($_ eq '/') {
        system("echo \"0\" > /sys/class/gpio/gpio$gpio/value");
        select undef,undef,undef,$word_pause;
        print "$original_text[$count_text]";
        $count_text++;
    }
    else { print "\nERROR: $_\n"; exit; }
}
print "\n";




หลักการของมันก็คือ รับตัวอักษรจากเราเข้า แล้วก็แปลงเป็น >> . - 'ช่องว่าง' / << แล้วก็ส่งค่า 0 กับ 1 ออกไปตามจังหวะ พอส่งค่า 1 ออกไปจากขา #24 ไฟ LED ก็จะติด แล้วก็ยังส่งค่าไปที่ขา #23 อีกด้วย(ซึ่งจะเป็นของฝั่งรับสัญญาณ ถ้าต้องการดูแค่ LED กระพริบเป็นสัญญาณ ขา #23 ก็ไม่ต้องใช้)
หรือถ้าเรา จะส่งรหัสมอสเอง อยากได้อารมณ์ของการนั่งกดปุ่มจริงๆ 5555 ก็กดจากสวิตได้เลย เพราะมีไฟจ่ายให้ทาง switch จากแหล่งจ่ายไฟ 3V ตลอดอยู่แล้ว



ทีนี้ มาดูทางฝั่งรับ รหัสมอส

#!/usr/bin/perl
$delay=0.1; #second
$timeout=60;  #loop for exit if didnt get any morse code
$text='';
$gpio=23;

print " Geting >> ";

do {
    open READ,"cat /sys/class/gpio/gpio$gpio/value |";
    $value=;
    close READ;
    select undef,undef,undef,$delay;
    $end=0;
} until ($value == 1);

while (1) {
    open READ,"cat /sys/class/gpio/gpio$gpio/value |";
    $value=;
    close READ;
    if ($value == 1) {
        print '1';
        select undef,undef,undef,$delay;
        $text.='1';
        $end=0;
    }
    else {
        print ',';
        select undef,undef,undef,$delay;
        $text.=',';
        ++$end;
    }
    if ($end > $timeout) {
        print "\n Morse >> ",analys($text);
        print "\n Text >> ",convert(analys($text));
        print "\n";
        exit;
    }
}


sub analys {
    my $text=$_[0];
#    $text=~s/1{3,}/-/g;            #For send speed = 0.125
#    $text=~s/1{1,2}/./g;           #For send speed = 0.125
#    $text=~s/,{11,}/  \/  /g;      #For send speed = 0.125
#    $text=~s/,{4,10}/  /g;         #For send speed = 0.125
#    $text=~s/,{1,3}//g;            #For send speed = 0.125
    $text=~s/1{4,}/-/g;            #For send speed = 0.25
    $text=~s/1{1,3}/./g;           #For send speed = 0.25
    $text=~s/,{11,}/  \/  /g;      #For send speed = 0.25
    $text=~s/,{5,10}/  /g;         #For send speed = 0.25
    $text=~s/,{1,4}//g;            #For send speed = 0.25
    return " ".$text." ";
}

sub convert {
    my $text=$_[0];
    $text=~s/ \.- /a/ig;
    $text=~s/ \.--- /b/ig;
    $text=~s/ -\.-\. /c/ig;
    $text=~s/ -\.\. /d/ig;
    $text=~s/ \. /e/ig;
    $text=~s/ \.\.-\. /f/ig;
    $text=~s/ --\. /g/ig;
    $text=~s/ \.\.\.\. /h/ig;
    $text=~s/ \.\. /i/ig;
    $text=~s/ \.--- /j/ig;
    $text=~s/ -\.- /k/ig;
    $text=~s/ \.-\.\. /l/ig;
    $text=~s/ -- /m/ig;
    $text=~s/ -\. /n/ig;
    $text=~s/ --- /o/ig;
    $text=~s/ \.--\. /p/ig;
    $text=~s/ --\.- /q/ig;
    $text=~s/ \.-\. /r/ig;
    $text=~s/ \.\.\. /s/ig;
    $text=~s/ - /t/ig;
    $text=~s/ \.\.- /u/ig;
    $text=~s/ \.\.\.- /v/ig;
    $text=~s/ \.-- /w/ig;
    $text=~s/ -\.\.- /x/ig;
    $text=~s/ -\.-- /y/ig;
    $text=~s/ --\.\. /z/ig;
    $text=~s/ \.---- /1/ig;
    $text=~s/ \.\.--- /2/ig;
    $text=~s/ \.\.\.-- /3/ig;
    $text=~s/ \.\.\.\.- /4/ig;
    $text=~s/ \.\.\.\.\. /5/ig;
    $text=~s/ -\.\.\.\. /6/ig;
    $text=~s/ --\.\.\. /7/ig;
    $text=~s/ ---\.\. /8/ig;
    $text=~s/ ----\. /9/ig;
    $text=~s/ ----- /0/ig;
    $text=~s/ \.-\.-\.- /./ig;
    $text=~s/ --\.\.-- /,/ig;
    $text=~s/ \.\.-\.\. /?/ig;
    $text=~s/ //ig;
    $text=~s/\// /ig;
    return $text;
}

หลักการทำงานคือ หลังจากรันสคริป มันจะรอเรื่อยๆ จนกว่าจะมีไฟจ่ายเข้าทาง #23 มันถึงจะเริ่มทำงาน โดยมันจะนับเวลาที่มีไฟจ่ายเข้า
  • ถ้าจ่ายเข้าสั้นๆ ก็นับเป็น . (dot)
  • ถ้าจ่ายเข้ายาวๆก็นับเป็น - (dash)
  • ถ้าเว้นว่างระยะหนึ่ง แล้วจ่ายไฟเข้าใหม่ ก็นับเป็นสิ้นๆสุดหนึ่งตัวอัก
  • ถ้าเว้นว่างยาวอีกหน่อย แล้วจ่ายไฟเข้าใหม่ ก็นับเป็นหนึ่งคำ
  • ถ้าเว้นว่างยาวเรื่อยๆ ก็ถือว่าสิ้นสุดการรับส่ง
พอรับมาเป็น . - 'ช่องว่าง' / แล้ว ก็เอามาแปลงเป็นตัวอักษรอีกทีนึง



จบละครับ หลักการง่ายๆ ตอนนี้ยังไม่รู้ว่าทำเสร็จ จะเอาประโยชน์อะไรดี ทำเอาเล่นๆสนุกๆก่อน ใครมีไอเดียวแจ่มๆ ก็มาแชร์กันบ้างนะครับ :P

Download morse-send.pl >> http://pastebin.com/Zi8WKn0L
Download morse-receive.pl >> http://pastebin.com/SidGeJtD

[Raspberry Pi][Perl] ควบคุม GPIO บน RaspberryPi ด้วย perl


อธิบายก่อนนะครับ ว่าอันที่จริง ไม่ใช่ใช้คำสั่ง perl ซักเท่าไหร่ แต่จะใช้ภาษา perl รันคำสั่ง linux ตอนใช้งาน GPIO บน raspberry pi อีกทีนึง ไม่งงนะ = = 55555

สำหรับสคริปนี้ ต้องรันด้วยสิทธิ์ root นะครับ (login ด้วย user root ก่อนรัน หรือใช้คำสั่ง sudo perl file.pl)

print "\n [+]----------------------------------------[+]";
print "\n  |    GPIO Control by using perl on bash    |";
print "\n  |      Test on Raspbian Wheezy [RPi]       |";
print "\n  |                                          |";
print "\n  |   Created by : AssazziN                  |";
print "\n  |   Version 1: 11 Mar 2013                 |";
print "\n [+]----------------------------------------[+]\n";

print "\n >> type h|help for help\n";
do {
    print " >> ";
    chomp($input=);
    if ($input eq 'h' or $input eq 'help') { help(); }

    elsif ($input=~/^export (\d{1,2})$/) {
        system("echo \"$1\" > /sys/class/gpio/export");
    }

    elsif ($input=~/^direction (\d{1,2}) (out|in)$/) {
        system("echo \"$2\" > /sys/class/gpio/gpio".$1."/direction");
    }

    elsif ($input=~/^value (\d{1,2}) (1|0)$/) {
        system("echo \"$2\" > /sys/class/gpio/gpio".$1."/value");
    }

    elsif ($input=~/^unexport (\d{1,2})$/) {
        system("echo \"$1\" > /sys/class/gpio/unexport");
    }

    elsif ($input=~/status/i) {
        @pin=();
        $pin=`find /sys/class/gpio/ gpio*`;
        while ($pin=~/sys\/class\/gpio\/gpio(\d{1,2})/g) { push(@pin,$1); }
        print " All pins that useabled : @pin\n";
    }

    elsif ($input eq 'q' or $input eq 'quit' or $input eq 'exit') {}
    else { print " $input : command not found\n"; }
} while ($input ne 'q' and $input ne 'quit' and $input ne 'exit');



sub help {
    print "\n ** This script requirement ROOT ***\n";
    print " > export [GPIO PIN]                 set gpio pin to useable\n";
    print " > direction [GPIO PIN] [out|in]     set gpio pin direction\n";
    print " > value [GPIO PIN] [1|0]            set gpio pin value\n";
    print " > unexport [GPIO PIN]               set gpio pin to unuseable\n";
    print " > status                            check status of all pin\n";
    print " > q quit exit                       exit script\n\n";
}


Pastebin: [Raspberry Pi] GPIO Control

ส่วนการใช้งานคำสั่งๆจริงๆ แบบไม่ผ่านสคริปนี้ ก็แกะจากโค้ดเอาละกัน ;p

คำสั่งเปิดใช้งานขา gpio ขาที่ #23 : sudo echo "23" > /sys/class/gpio/export
คำสั่งให้ขา gpio #23 เป็นตัว output : sudo echo "out" > /sys/class/gpio/gpio23/direction
คำสั่งให้ขา gpio #23 เป็นตัว input : sudo echo "in" > /sys/class/gpio/gpio23/direction
คำสั่งจ่ายไฟให้ขา gpio #23 : sudo echo "1" > /sys/class/gpio/gpio23/value
คำสั่งหยุดจ่ายไฟให้ขา gpio #23 : sudo echo "0" > /sys/class/gpio/gpio23/value
คำสั่งอ่านค่าสถานะของขา gpio #23 : cat /sys/class/gpio/gpio23/value
คำสั่งเลิกใช้งานขา gpio ขาที่ #23 : sudo echo "23" > /sys/class/gpio/unexport