טווח :: חזותית ממשק משתמש מסוף פיצול
הורד עכשיו

טווח :: חזותית דירוג וסיכום

טווח :: חזותית תגים

מִשׁתַמֵשׁ פרל מודול מִמְשָׁק ממשק משתמש ממשק פרל פיצול-טרמינל

טווח :: חזותית תיאור

ממשק משתמש מסוף פיצול מונח :: חזותית היא ממשק מסוף "חזותי" עבור הקללות יישומים, שנכתב ב Perl. הוא מספק את ממשק המסך פיצול ייתכן שראית ב Console מבוסס IRC ו בוץ clients.Term :: חזותית משתמשת ברשת POE ו Multitaking מסגרת כדי לתמוך קלט בו זמנית משקעי הרשת ואת המסוף, מספר טיימרים ועוד. / usr / bin / perl -w להשתמש קפדנית; השתמש בטווח :: חזותי; שלי $ VT = מונח :: חזותית-> חדש (כינוי => "ממשק", Errlevel => 0); $ VT-> Set_Paltte (MyColor => "מגנטה על שחור", זה צבע = "ירוק על שחור"); My $ $ window_ID = $ VT-> Create_Window (Window_name => 'Foo', מצב => {0 => {formal => "תבנית עבור קו מצב 1", שדות => }, 1 = = > תבנית עבור שורת מצב 2 ", שדות => },}, buffer_size => 1000, history_size => 50, input_prompt =>" ", # הגדר את הקלט הפקודה עבור קו הקלט. השתמש ב-_title => 0, # אל תשתמש ב- Transbar_Status => 0, # אל תשתמש בכותרת סטטוס => "כותרת של Foo"); POE :: מושב-> צור (inline_states => {_start => start_handler, got_term_input => term_input_handler,}); Sub Start_Handler {שלי $ Kernel = $ _ ; # לספר את הטרמינל לשלוח לי קלט כמו "got_term_input". $ kernel-> פוסט (ממשק => send_me_input => "got_term_input"); $ vt-> set_status_field ($ window_id, bar => $ ערך); $ VT-> Set_Input_Prompt ($ Window_id, "$"); $ VT-> הדפסה ($ Window_id, 'מזהה החלון שלי הוא $ Window_id "); } sub term_input_handler {שלי ($ ליבה, $ ערימה, $ קלט, $ חריגה) = @_ ; # יש יוצא מן הכלל. אלה הם פסיקה (^ c) או צא (^). אם (הגדירו $ חריגה) {wasn "יש יוצא מן הכלל: $ חריגה"; יְצִיאָה; } $ VT-> הדפסה ($ Window_id, $ קלט); } # השתמש רק במחיקה. אם באמצעות חלונות מרובים. $ VT-> Delete_Window ($ Window_id); $ VT-> כיבוי; דרישות: · פרל

טווח :: חזותית תוכנה קשורה