CINXE.COM

<!DOCTYPE html> <html class="client-nojs vector-feature-language-in-header-enabled vector-feature-language-in-main-page-header-disabled vector-feature-sticky-header-disabled vector-feature-page-tools-pinned-disabled vector-feature-toc-pinned-clientpref-1 vector-feature-main-menu-pinned-disabled vector-feature-limited-width-clientpref-1 vector-feature-limited-width-content-enabled vector-feature-custom-font-size-clientpref-1 vector-feature-appearance-pinned-clientpref-1 vector-feature-night-mode-disabled skin-theme-clientpref-day vector-toc-available" lang="ms" dir="ltr"> <head> <meta charset="UTF-8"> <title>Tcl - Wikipedia Bahasa Melayu, ensiklopedia bebas</title> <script>(function(){var className="client-js vector-feature-language-in-header-enabled vector-feature-language-in-main-page-header-disabled vector-feature-sticky-header-disabled vector-feature-page-tools-pinned-disabled vector-feature-toc-pinned-clientpref-1 vector-feature-main-menu-pinned-disabled vector-feature-limited-width-clientpref-1 vector-feature-limited-width-content-enabled vector-feature-custom-font-size-clientpref-1 vector-feature-appearance-pinned-clientpref-1 vector-feature-night-mode-disabled skin-theme-clientpref-day vector-toc-available";var cookie=document.cookie.match(/(?:^|; )mswikimwclientpreferences=([^;]+)/);if(cookie){cookie[1].split('%2C').forEach(function(pref){className=className.replace(new RegExp('(^| )'+pref.replace(/-clientpref-\w+$|[^\w-]+/g,'')+'-clientpref-\\w+( |$)'),'$1'+pref+'$2');});}document.documentElement.className=className;}());RLCONF={"wgBreakFrames":false,"wgSeparatorTransformTable":["",""],"wgDigitTransformTable":["",""],"wgDefaultDateFormat":"dmy" ,"wgMonthNames":["","Januari","Februari","Mac","April","Mei","Jun","Julai","Ogos","September","Oktober","November","Disember"],"wgRequestId":"e8c78a5d-7637-4d04-9cb2-9ed03d9c8293","wgCanonicalNamespace":"","wgCanonicalSpecialPageName":false,"wgNamespaceNumber":0,"wgPageName":"Tcl","wgTitle":"Tcl","wgCurRevisionId":4669634,"wgRevisionId":4669634,"wgArticleId":53434,"wgIsArticle":true,"wgIsRedirect":false,"wgAction":"view","wgUserName":null,"wgUserGroups":["*"],"wgCategories":["Pages using deprecated source tags","Bahasa penskripan","Bahasa pengaturcaraan berorientasi objek","Bahasa pengaturcaraan bertatacara","Bahasa pengaturcaraan kefungsian","Bahasa pengaturcaraan pacuan peristiwa","Bahasa pengaturcaraan penjenisan dinamik"],"wgPageViewLanguage":"ms","wgPageContentLanguage":"ms","wgPageContentModel":"wikitext","wgRelevantPageName":"Tcl","wgRelevantArticleId":53434,"wgIsProbablyEditable":true,"wgRelevantPageIsProbablyEditable":true,"wgRestrictionEdit":[],"wgRestrictionMove":[], "wgNoticeProject":"wikipedia","wgCiteReferencePreviewsActive":false,"wgMediaViewerOnClick":true,"wgMediaViewerEnabledByDefault":true,"wgPopupsFlags":0,"wgVisualEditor":{"pageLanguageCode":"ms","pageLanguageDir":"ltr","pageVariantFallbacks":"ms"},"wgMFDisplayWikibaseDescriptions":{"search":true,"watchlist":true,"tagline":true,"nearby":true},"wgWMESchemaEditAttemptStepOversample":false,"wgWMEPageLength":4000,"wgRelatedArticlesCompat":[],"wgCentralAuthMobileDomain":false,"wgEditSubmitButtonLabelPublish":true,"wgULSPosition":"interlanguage","wgULSisCompactLinksEnabled":false,"wgVector2022LanguageInHeader":true,"wgULSisLanguageSelectorEmpty":false,"wgWikibaseItemId":"Q5288","wgCheckUserClientHintsHeadersJsApi":["brands","architecture","bitness","fullVersionList","mobile","model","platform","platformVersion"],"GEHomepageSuggestedEditsEnableTopics":true,"wgGETopicsMatchModeEnabled":false,"wgGEStructuredTaskRejectionReasonTextInputEnabled":false,"wgGELevelingUpEnabledForUser":false};RLSTATE={ "ext.gadget.charinsert-styles":"ready","ext.globalCssJs.user.styles":"ready","site.styles":"ready","user.styles":"ready","ext.globalCssJs.user":"ready","user":"ready","user.options":"loading","ext.pygments":"ready","skins.vector.search.codex.styles":"ready","skins.vector.styles":"ready","skins.vector.icons":"ready","jquery.makeCollapsible.styles":"ready","ext.wikimediamessages.styles":"ready","ext.visualEditor.desktopArticleTarget.noscript":"ready","ext.uls.interlanguage":"ready","wikibase.client.init":"ready","ext.wikimediaBadges":"ready"};RLPAGEMODULES=["ext.pygments.view","site","mediawiki.page.ready","jquery.makeCollapsible","mediawiki.toc","skins.vector.js","ext.centralNotice.geoIP","ext.centralNotice.startUp","ext.gadget.teahouse","ext.gadget.ReferenceTooltips","ext.gadget.watchlist-notice","ext.gadget.DRN-wizard","ext.gadget.charinsert","ext.gadget.refToolbar","ext.gadget.extra-toolbar-buttons","ext.gadget.MenuKedaiKopi","ext.gadget.mySandbox","ext.gadget.AdvancedSiteNotices", "ext.gadget.switcher","ext.gadget.featured-articles-links","ext.urlShortener.toolbar","ext.centralauth.centralautologin","mmv.bootstrap","ext.popups","ext.visualEditor.desktopArticleTarget.init","ext.visualEditor.targetLoader","ext.echo.centralauth","ext.eventLogging","ext.wikimediaEvents","ext.navigationTiming","ext.uls.interface","ext.cx.eventlogging.campaigns","ext.cx.uls.quick.actions","wikibase.client.vector-2022","ext.checkUser.clientHints","ext.growthExperiments.SuggestedEditSession","wikibase.sidebar.tracking"];</script> <script>(RLQ=window.RLQ||[]).push(function(){mw.loader.impl(function(){return["user.options@12s5i",function($,jQuery,require,module){mw.user.tokens.set({"patrolToken":"+\\","watchToken":"+\\","csrfToken":"+\\"}); }];});});</script> <link rel="stylesheet" href="/w/load.php?lang=ms&modules=ext.pygments%2CwikimediaBadges%7Cext.uls.interlanguage%7Cext.visualEditor.desktopArticleTarget.noscript%7Cext.wikimediamessages.styles%7Cjquery.makeCollapsible.styles%7Cskins.vector.icons%2Cstyles%7Cskins.vector.search.codex.styles%7Cwikibase.client.init&only=styles&skin=vector-2022"> <script async="" src="/w/load.php?lang=ms&modules=startup&only=scripts&raw=1&skin=vector-2022"></script> <meta name="ResourceLoaderDynamicStyles" content=""> <link rel="stylesheet" href="/w/load.php?lang=ms&modules=ext.gadget.charinsert-styles&only=styles&skin=vector-2022"> <link rel="stylesheet" href="/w/load.php?lang=ms&modules=site.styles&only=styles&skin=vector-2022"> <meta name="generator" content="MediaWiki 1.44.0-wmf.4"> <meta name="referrer" content="origin"> <meta name="referrer" content="origin-when-cross-origin"> <meta name="robots" content="max-image-preview:standard"> <meta name="format-detection" content="telephone=no"> <meta name="viewport" content="width=1120"> <meta property="og:title" content="Tcl - Wikipedia Bahasa Melayu, ensiklopedia bebas"> <meta property="og:type" content="website"> <link rel="preconnect" href="//upload.wikimedia.org"> <link rel="alternate" media="only screen and (max-width: 640px)" href="//ms.m.wikipedia.org/wiki/Tcl"> <link rel="alternate" type="application/x-wiki" title="Sunting" href="/w/index.php?title=Tcl&action=edit"> <link rel="apple-touch-icon" href="/static/apple-touch/wikipedia.png"> <link rel="icon" href="/static/favicon/wikipedia.ico"> <link rel="search" type="application/opensearchdescription+xml" href="/w/rest.php/v1/search" title="Wikipedia (ms)"> <link rel="EditURI" type="application/rsd+xml" href="//ms.wikipedia.org/w/api.php?action=rsd"> <link rel="canonical" href="https://ms.wikipedia.org/wiki/Tcl"> <link rel="license" href="https://creativecommons.org/licenses/by-sa/4.0/deed.ms"> <link rel="alternate" type="application/atom+xml" title="Suapan Atom Wikipedia" href="/w/index.php?title=Khas:Perubahan_terkini&feed=atom"> <link rel="dns-prefetch" href="//meta.wikimedia.org" /> <link rel="dns-prefetch" href="//login.wikimedia.org"> </head> <body class="skin--responsive skin-vector skin-vector-search-vue mediawiki ltr sitedir-ltr mw-hide-empty-elt ns-0 ns-subject mw-editable page-Tcl rootpage-Tcl skin-vector-2022 action-view"><a class="mw-jump-link" href="#bodyContent">Pergi ke kandungan</a> <div class="vector-header-container"> <header class="vector-header mw-header"> <div class="vector-header-start"> <nav class="vector-main-menu-landmark" aria-label="Tapak"> <div id="vector-main-menu-dropdown" class="vector-dropdown vector-main-menu-dropdown vector-button-flush-left vector-button-flush-right" > <input type="checkbox" id="vector-main-menu-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-main-menu-dropdown" class="vector-dropdown-checkbox " aria-label="Menu utama" > <label id="vector-main-menu-dropdown-label" for="vector-main-menu-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-menu mw-ui-icon-wikimedia-menu"></span> <span class="vector-dropdown-label-text">Menu utama</span> </label> <div class="vector-dropdown-content"> <div id="vector-main-menu-unpinned-container" class="vector-unpinned-container"> <div id="vector-main-menu" class="vector-main-menu vector-pinnable-element"> <div class="vector-pinnable-header vector-main-menu-pinnable-header vector-pinnable-header-unpinned" data-feature-name="main-menu-pinned" data-pinnable-element-id="vector-main-menu" data-pinned-container-id="vector-main-menu-pinned-container" data-unpinned-container-id="vector-main-menu-unpinned-container" > <div class="vector-pinnable-header-label">Menu utama</div> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-main-menu.pin">alih ke bar sisi</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-main-menu.unpin">sorokkan</button> </div> <div id="p-navigation" class="vector-menu mw-portlet mw-portlet-navigation" > <div class="vector-menu-heading"> Pandu arah </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="n-Laman-Utama" class="mw-list-item"><a href="/wiki/Laman_Utama"><span>Laman Utama</span></a></li><li id="n-Tinjau" class="mw-list-item"><a href="/wiki/Wikipedia:Tinjau"><span>Tinjau</span></a></li><li id="n-currentevents" class="mw-list-item"><a href="/wiki/Portal:Hal_semasa" title="Cari maklumat latar belakang mengenai peristiwa semasa"><span>Hal semasa</span></a></li><li id="n-randompage" class="mw-list-item"><a href="/wiki/Khas:Rawak" title="Muat laman rawak [x]" accesskey="x"><span>Rencana rawak</span></a></li> </ul> </div> </div> <div id="p-interaction" class="vector-menu mw-portlet mw-portlet-interaction" > <div class="vector-menu-heading"> Perhubungan </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="n-Tentang-Wikipedia" class="mw-list-item"><a href="/wiki/Wikipedia:Perihal"><span>Tentang Wikipedia</span></a></li><li id="n-Gerbang-komuniti" class="mw-list-item"><a href="/wiki/Wikipedia:Gerbang_Komuniti"><span>Gerbang komuniti</span></a></li><li id="n-recentchanges" class="mw-list-item"><a href="/wiki/Khas:Perubahan_terkini" title="Senarai perubahan terkini dalam wiki [r]" accesskey="r"><span>Perubahan terkini</span></a></li><li id="n-Hubungi-kami" class="mw-list-item"><a href="/wiki/Wikipedia:Hubungi_kami"><span>Hubungi kami</span></a></li><li id="n-Menderma" class="mw-list-item"><a href="//donate.wikimedia.org/wiki/Special:FundraiserRedirector?utm_source=donate&utm_medium=sidebar&utm_campaign=C13_ms.wikipedia.org&uselang=ms"><span>Menderma</span></a></li><li id="n-help" class="mw-list-item"><a href="https://www.mediawiki.org/wiki/Special:MyLanguage/Help:Contents" title="Tempat mencari jawapan"><span>Bantuan</span></a></li><li id="n-Kedai-Kopi" class="mw-list-item"><a href="/wiki/Wikipedia:Kedai_Kopi"><span>Kedai Kopi</span></a></li> </ul> </div> </div> </div> </div> </div> </div> </nav> <a href="/wiki/Laman_Utama" class="mw-logo"> <img class="mw-logo-icon" src="/static/images/icons/wikipedia.png" alt="" aria-hidden="true" height="50" width="50"> <span class="mw-logo-container skin-invert"> <img class="mw-logo-wordmark" alt="Wikipedia" src="/static/images/mobile/copyright/wikipedia-wordmark-en.svg" style="width: 7.5em; height: 1.125em;"> <img class="mw-logo-tagline" alt="Ensiklopedia Bebas" src="/static/images/mobile/copyright/wikipedia-tagline-ms.svg" width="120" height="13" style="width: 7.5em; height: 0.8125em;"> </span> </a> </div> <div class="vector-header-end"> <div id="p-search" role="search" class="vector-search-box-vue vector-search-box-collapses vector-search-box-show-thumbnail vector-search-box-auto-expand-width vector-search-box"> <a href="/wiki/Khas:Cari" class="cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only search-toggle" title="Cari di wiki ini [f]" accesskey="f"><span class="vector-icon mw-ui-icon-search mw-ui-icon-wikimedia-search"></span> <span>Cari</span> </a> <div class="vector-typeahead-search-container"> <div class="cdx-typeahead-search cdx-typeahead-search--show-thumbnail cdx-typeahead-search--auto-expand-width"> <form action="/w/index.php" id="searchform" class="cdx-search-input cdx-search-input--has-end-button"> <div id="simpleSearch" class="cdx-search-input__input-wrapper" data-search-loc="header-moved"> <div class="cdx-text-input cdx-text-input--has-start-icon"> <input class="cdx-text-input__input" type="search" name="search" placeholder="Cari Wikipedia" aria-label="Cari Wikipedia" autocapitalize="sentences" title="Cari di wiki ini [f]" accesskey="f" id="searchInput" > <span class="cdx-text-input__icon cdx-text-input__start-icon"></span> </div> <input type="hidden" name="title" value="Khas:Cari"> </div> <button class="cdx-button cdx-search-input__end-button">Cari</button> </form> </div> </div> </div> <nav class="vector-user-links vector-user-links-wide" aria-label="Alat peribadi"> <div class="vector-user-links-main"> <div id="p-vector-user-menu-preferences" class="vector-menu mw-portlet emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> <div id="p-vector-user-menu-userpage" class="vector-menu mw-portlet emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> <nav class="vector-appearance-landmark" aria-label="Penampilan"> <div id="vector-appearance-dropdown" class="vector-dropdown " title="Tukar penampilan saiz, lebar dan warna fon laman" > <input type="checkbox" id="vector-appearance-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-appearance-dropdown" class="vector-dropdown-checkbox " aria-label="Penampilan" > <label id="vector-appearance-dropdown-label" for="vector-appearance-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-appearance mw-ui-icon-wikimedia-appearance"></span> <span class="vector-dropdown-label-text">Penampilan</span> </label> <div class="vector-dropdown-content"> <div id="vector-appearance-unpinned-container" class="vector-unpinned-container"> </div> </div> </div> </nav> <div id="p-vector-user-menu-notifications" class="vector-menu mw-portlet emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> <div id="p-vector-user-menu-overflow" class="vector-menu mw-portlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="pt-sitesupport-2" class="user-links-collapsible-item mw-list-item user-links-collapsible-item"><a data-mw="interface" href="//donate.wikimedia.org/wiki/Special:FundraiserRedirector?utm_source=donate&utm_medium=sidebar&utm_campaign=C13_ms.wikipedia.org&uselang=ms" class=""><span>Derma</span></a> </li> <li id="pt-createaccount-2" class="user-links-collapsible-item mw-list-item user-links-collapsible-item"><a data-mw="interface" href="/w/index.php?title=Khas:Buka_akaun&returnto=Tcl" title="Anda digalakkan untuk membuka akaun dan melog masuk; walau bagaimanapun, ianya tidak wajib" class=""><span>Buka akaun</span></a> </li> <li id="pt-login-2" class="user-links-collapsible-item mw-list-item user-links-collapsible-item"><a data-mw="interface" href="/w/index.php?title=Khas:Log_masuk&returnto=Tcl" title="Anda digalakkan untuk melog masuk; walau bagaimanapun, ia tidak wajib. [o]" accesskey="o" class=""><span>Log masuk</span></a> </li> </ul> </div> </div> </div> <div id="vector-user-links-dropdown" class="vector-dropdown vector-user-menu vector-button-flush-right vector-user-menu-logged-out" title="Lebih pilihan" > <input type="checkbox" id="vector-user-links-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-user-links-dropdown" class="vector-dropdown-checkbox " aria-label="Alat peribadi" > <label id="vector-user-links-dropdown-label" for="vector-user-links-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-ellipsis mw-ui-icon-wikimedia-ellipsis"></span> <span class="vector-dropdown-label-text">Alat peribadi</span> </label> <div class="vector-dropdown-content"> <div id="p-personal" class="vector-menu mw-portlet mw-portlet-personal user-links-collapsible-item" title="Menu pengguna" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="pt-sitesupport" class="user-links-collapsible-item mw-list-item"><a href="//donate.wikimedia.org/wiki/Special:FundraiserRedirector?utm_source=donate&utm_medium=sidebar&utm_campaign=C13_ms.wikipedia.org&uselang=ms"><span>Derma</span></a></li><li id="pt-createaccount" class="user-links-collapsible-item mw-list-item"><a href="/w/index.php?title=Khas:Buka_akaun&returnto=Tcl" title="Anda digalakkan untuk membuka akaun dan melog masuk; walau bagaimanapun, ianya tidak wajib"><span class="vector-icon mw-ui-icon-userAdd mw-ui-icon-wikimedia-userAdd"></span> <span>Buka akaun</span></a></li><li id="pt-login" class="user-links-collapsible-item mw-list-item"><a href="/w/index.php?title=Khas:Log_masuk&returnto=Tcl" title="Anda digalakkan untuk melog masuk; walau bagaimanapun, ia tidak wajib. [o]" accesskey="o"><span class="vector-icon mw-ui-icon-logIn mw-ui-icon-wikimedia-logIn"></span> <span>Log masuk</span></a></li> </ul> </div> </div> <div id="p-user-menu-anon-editor" class="vector-menu mw-portlet mw-portlet-user-menu-anon-editor" > <div class="vector-menu-heading"> Laman untuk penyunting log keluar <a href="/wiki/Bantuan:Pengenalan" aria-label="Ketahui lebih lanjut tentang menyunting"><span>Ketahui lebih lanjut</span></a> </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="pt-anoncontribs" class="mw-list-item"><a href="/wiki/Khas:Sumbangan_saya" title="Senarai suntingan yang dibuat daripada alamat IP ini [y]" accesskey="y"><span>Sumbangan</span></a></li><li id="pt-anontalk" class="mw-list-item"><a href="/wiki/Khas:Perbincangan_saya" title="Perbincangan mengenai penyuntingan daripada alamat IP anda [n]" accesskey="n"><span>Perbincangan</span></a></li> </ul> </div> </div> </div> </div> </nav> </div> </header> </div> <div class="mw-page-container"> <div class="mw-page-container-inner"> <div class="vector-sitenotice-container"> <div id="siteNotice"></div> </div> <div class="vector-column-start"> <div class="vector-main-menu-container"> <div id="mw-navigation"> <nav id="mw-panel" class="vector-main-menu-landmark" aria-label="Tapak"> <div id="vector-main-menu-pinned-container" class="vector-pinned-container"> </div> </nav> </div> </div> <div class="vector-sticky-pinned-container"> <nav id="mw-panel-toc" aria-label="Kandungan" data-event-name="ui.sidebar-toc" class="mw-table-of-contents-container vector-toc-landmark"> <div id="vector-toc-pinned-container" class="vector-pinned-container"> <div id="vector-toc" class="vector-toc vector-pinnable-element"> <div class="vector-pinnable-header vector-toc-pinnable-header vector-pinnable-header-pinned" data-feature-name="toc-pinned" data-pinnable-element-id="vector-toc" > <h2 class="vector-pinnable-header-label">Kandungan</h2> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-toc.pin">alih ke bar sisi</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-toc.unpin">sorokkan</button> </div> <ul class="vector-toc-contents" id="mw-panel-toc-list"> <li id="toc-mw-content-text" class="vector-toc-list-item vector-toc-level-1"> <a href="#" class="vector-toc-link"> <div class="vector-toc-text">Permulaan</div> </a> </li> <li id="toc-Sintaks" class="vector-toc-list-item vector-toc-level-1 vector-toc-list-item-expanded"> <a class="vector-toc-link" href="#Sintaks"> <div class="vector-toc-text"> <span class="vector-toc-numb">1</span> <span>Sintaks</span> </div> </a> <button aria-controls="toc-Sintaks-sublist" class="cdx-button cdx-button--weight-quiet cdx-button--icon-only vector-toc-toggle"> <span class="vector-icon mw-ui-icon-wikimedia-expand"></span> <span>Togol subbahagian Sintaks</span> </button> <ul id="toc-Sintaks-sublist" class="vector-toc-list"> <li id="toc-Sintaks_asas_dalam_Tcl" class="vector-toc-list-item vector-toc-level-2"> <a class="vector-toc-link" href="#Sintaks_asas_dalam_Tcl"> <div class="vector-toc-text"> <span class="vector-toc-numb">1.1</span> <span>Sintaks asas dalam Tcl</span> </div> </a> <ul id="toc-Sintaks_asas_dalam_Tcl-sublist" class="vector-toc-list"> </ul> </li> <li id="toc-Simbol-simbol_dengan_tujuannya_dalam_Tcl" class="vector-toc-list-item vector-toc-level-2"> <a class="vector-toc-link" href="#Simbol-simbol_dengan_tujuannya_dalam_Tcl"> <div class="vector-toc-text"> <span class="vector-toc-numb">1.2</span> <span>Simbol-simbol dengan tujuannya dalam Tcl</span> </div> </a> <ul id="toc-Simbol-simbol_dengan_tujuannya_dalam_Tcl-sublist" class="vector-toc-list"> </ul> </li> <li id="toc-Tatacara_dalam_TCL" class="vector-toc-list-item vector-toc-level-2"> <a class="vector-toc-link" href="#Tatacara_dalam_TCL"> <div class="vector-toc-text"> <span class="vector-toc-numb">1.3</span> <span>Tatacara dalam TCL</span> </div> </a> <ul id="toc-Tatacara_dalam_TCL-sublist" class="vector-toc-list"> </ul> </li> </ul> </li> <li id="toc-Atur_cara_"Indahnya_Dunia!"" class="vector-toc-list-item vector-toc-level-1 vector-toc-list-item-expanded"> <a class="vector-toc-link" href="#Atur_cara_"Indahnya_Dunia!""> <div class="vector-toc-text"> <span class="vector-toc-numb">2</span> <span>Atur cara "Indahnya Dunia!"</span> </div> </a> <ul id="toc-Atur_cara_"Indahnya_Dunia!"-sublist" class="vector-toc-list"> </ul> </li> <li id="toc-Lihat_juga" class="vector-toc-list-item vector-toc-level-1 vector-toc-list-item-expanded"> <a class="vector-toc-link" href="#Lihat_juga"> <div class="vector-toc-text"> <span class="vector-toc-numb">3</span> <span>Lihat juga</span> </div> </a> <ul id="toc-Lihat_juga-sublist" class="vector-toc-list"> </ul> </li> <li id="toc-Pautan_Luar" class="vector-toc-list-item vector-toc-level-1 vector-toc-list-item-expanded"> <a class="vector-toc-link" href="#Pautan_Luar"> <div class="vector-toc-text"> <span class="vector-toc-numb">4</span> <span>Pautan Luar</span> </div> </a> <ul id="toc-Pautan_Luar-sublist" class="vector-toc-list"> </ul> </li> </ul> </div> </div> </nav> </div> </div> <div class="mw-content-container"> <main id="content" class="mw-body"> <header class="mw-body-header vector-page-titlebar"> <nav aria-label="Kandungan" class="vector-toc-landmark"> <div id="vector-page-titlebar-toc" class="vector-dropdown vector-page-titlebar-toc vector-button-flush-left" > <input type="checkbox" id="vector-page-titlebar-toc-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-page-titlebar-toc" class="vector-dropdown-checkbox " aria-label="Togol isi kandungan" > <label id="vector-page-titlebar-toc-label" for="vector-page-titlebar-toc-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--icon-only " aria-hidden="true" ><span class="vector-icon mw-ui-icon-listBullet mw-ui-icon-wikimedia-listBullet"></span> <span class="vector-dropdown-label-text">Togol isi kandungan</span> </label> <div class="vector-dropdown-content"> <div id="vector-page-titlebar-toc-unpinned-container" class="vector-unpinned-container"> </div> </div> </div> </nav> <h1 id="firstHeading" class="firstHeading mw-first-heading"><span class="mw-page-title-main">Tcl</span></h1> <div id="p-lang-btn" class="vector-dropdown mw-portlet mw-portlet-lang" > <input type="checkbox" id="p-lang-btn-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-p-lang-btn" class="vector-dropdown-checkbox mw-interlanguage-selector" aria-label="Pergi ke rencana dalam bahasa lain. Tersedia dalam 39 bahasa" > <label id="p-lang-btn-label" for="p-lang-btn-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet cdx-button--action-progressive mw-portlet-lang-heading-39" aria-hidden="true" ><span class="vector-icon mw-ui-icon-language-progressive mw-ui-icon-wikimedia-language-progressive"></span> <span class="vector-dropdown-label-text">39 bahasa</span> </label> <div class="vector-dropdown-content"> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li class="interlanguage-link interwiki-ar mw-list-item"><a href="https://ar.wikipedia.org/wiki/%D8%AA%D9%8A_%D8%B3%D9%8A_%D8%A5%D9%84" title="تي سي إل – Arab" lang="ar" hreflang="ar" data-title="تي سي إل" data-language-autonym="العربية" data-language-local-name="Arab" class="interlanguage-link-target"><span>العربية</span></a></li><li class="interlanguage-link interwiki-az mw-list-item"><a href="https://az.wikipedia.org/wiki/Tcl" title="Tcl – Azerbaijan" lang="az" hreflang="az" data-title="Tcl" data-language-autonym="Azərbaycanca" data-language-local-name="Azerbaijan" class="interlanguage-link-target"><span>Azərbaycanca</span></a></li><li class="interlanguage-link interwiki-bug mw-list-item"><a href="https://bug.wikipedia.org/wiki/Tcl" title="Tcl – Bugis" lang="bug" hreflang="bug" data-title="Tcl" data-language-autonym="Basa Ugi" data-language-local-name="Bugis" class="interlanguage-link-target"><span>Basa Ugi</span></a></li><li class="interlanguage-link interwiki-bg mw-list-item"><a href="https://bg.wikipedia.org/wiki/Tcl" title="Tcl – Bulgaria" lang="bg" hreflang="bg" data-title="Tcl" data-language-autonym="Български" data-language-local-name="Bulgaria" class="interlanguage-link-target"><span>Български</span></a></li><li class="interlanguage-link interwiki-ca mw-list-item"><a href="https://ca.wikipedia.org/wiki/Tcl" title="Tcl – Catalonia" lang="ca" hreflang="ca" data-title="Tcl" data-language-autonym="Català" data-language-local-name="Catalonia" class="interlanguage-link-target"><span>Català</span></a></li><li class="interlanguage-link interwiki-cs mw-list-item"><a href="https://cs.wikipedia.org/wiki/Tcl" title="Tcl – Czech" lang="cs" hreflang="cs" data-title="Tcl" data-language-autonym="Čeština" data-language-local-name="Czech" class="interlanguage-link-target"><span>Čeština</span></a></li><li class="interlanguage-link interwiki-de mw-list-item"><a href="https://de.wikipedia.org/wiki/Tcl" title="Tcl – Jerman" lang="de" hreflang="de" data-title="Tcl" data-language-autonym="Deutsch" data-language-local-name="Jerman" class="interlanguage-link-target"><span>Deutsch</span></a></li><li class="interlanguage-link interwiki-et mw-list-item"><a href="https://et.wikipedia.org/wiki/Tcl" title="Tcl – Estonia" lang="et" hreflang="et" data-title="Tcl" data-language-autonym="Eesti" data-language-local-name="Estonia" class="interlanguage-link-target"><span>Eesti</span></a></li><li class="interlanguage-link interwiki-el mw-list-item"><a href="https://el.wikipedia.org/wiki/Tcl" title="Tcl – Greek" lang="el" hreflang="el" data-title="Tcl" data-language-autonym="Ελληνικά" data-language-local-name="Greek" class="interlanguage-link-target"><span>Ελληνικά</span></a></li><li class="interlanguage-link interwiki-en mw-list-item"><a href="https://en.wikipedia.org/wiki/Tcl" title="Tcl – Inggeris" lang="en" hreflang="en" data-title="Tcl" data-language-autonym="English" data-language-local-name="Inggeris" class="interlanguage-link-target"><span>English</span></a></li><li class="interlanguage-link interwiki-es mw-list-item"><a href="https://es.wikipedia.org/wiki/Tcl" title="Tcl – Sepanyol" lang="es" hreflang="es" data-title="Tcl" data-language-autonym="Español" data-language-local-name="Sepanyol" class="interlanguage-link-target"><span>Español</span></a></li><li class="interlanguage-link interwiki-eo mw-list-item"><a href="https://eo.wikipedia.org/wiki/Tcl" title="Tcl – Esperanto" lang="eo" hreflang="eo" data-title="Tcl" data-language-autonym="Esperanto" data-language-local-name="Esperanto" class="interlanguage-link-target"><span>Esperanto</span></a></li><li class="interlanguage-link interwiki-fa mw-list-item"><a href="https://fa.wikipedia.org/wiki/%D8%AA%DB%8C%E2%80%8C%D8%B3%DB%8C%E2%80%8C%D8%A7%D9%84" title="تی‌سی‌ال – Parsi" lang="fa" hreflang="fa" data-title="تی‌سی‌ال" data-language-autonym="فارسی" data-language-local-name="Parsi" class="interlanguage-link-target"><span>فارسی</span></a></li><li class="interlanguage-link interwiki-fr mw-list-item"><a href="https://fr.wikipedia.org/wiki/Tool_Command_Language" title="Tool Command Language – Perancis" lang="fr" hreflang="fr" data-title="Tool Command Language" data-language-autonym="Français" data-language-local-name="Perancis" class="interlanguage-link-target"><span>Français</span></a></li><li class="interlanguage-link interwiki-gl mw-list-item"><a href="https://gl.wikipedia.org/wiki/TCL" title="TCL – Galicia" lang="gl" hreflang="gl" data-title="TCL" data-language-autonym="Galego" data-language-local-name="Galicia" class="interlanguage-link-target"><span>Galego</span></a></li><li class="interlanguage-link interwiki-ko mw-list-item"><a href="https://ko.wikipedia.org/wiki/Tcl" title="Tcl – Korea" lang="ko" hreflang="ko" data-title="Tcl" data-language-autonym="한국어" data-language-local-name="Korea" class="interlanguage-link-target"><span>한국어</span></a></li><li class="interlanguage-link interwiki-hy mw-list-item"><a href="https://hy.wikipedia.org/wiki/TCL" title="TCL – Armenia" lang="hy" hreflang="hy" data-title="TCL" data-language-autonym="Հայերեն" data-language-local-name="Armenia" class="interlanguage-link-target"><span>Հայերեն</span></a></li><li class="interlanguage-link interwiki-ia mw-list-item"><a href="https://ia.wikipedia.org/wiki/Tcl" title="Tcl – Interlingua" lang="ia" hreflang="ia" data-title="Tcl" data-language-autonym="Interlingua" data-language-local-name="Interlingua" class="interlanguage-link-target"><span>Interlingua</span></a></li><li class="interlanguage-link interwiki-is mw-list-item"><a href="https://is.wikipedia.org/wiki/Tcl" title="Tcl – Iceland" lang="is" hreflang="is" data-title="Tcl" data-language-autonym="Íslenska" data-language-local-name="Iceland" class="interlanguage-link-target"><span>Íslenska</span></a></li><li class="interlanguage-link interwiki-it mw-list-item"><a href="https://it.wikipedia.org/wiki/Tcl" title="Tcl – Itali" lang="it" hreflang="it" data-title="Tcl" data-language-autonym="Italiano" data-language-local-name="Itali" class="interlanguage-link-target"><span>Italiano</span></a></li><li class="interlanguage-link interwiki-he mw-list-item"><a href="https://he.wikipedia.org/wiki/Tcl" title="Tcl – Ibrani" lang="he" hreflang="he" data-title="Tcl" data-language-autonym="עברית" data-language-local-name="Ibrani" class="interlanguage-link-target"><span>עברית</span></a></li><li class="interlanguage-link interwiki-ht mw-list-item"><a href="https://ht.wikipedia.org/wiki/Tool_Command_Language" title="Tool Command Language – Kreol Haiti" lang="ht" hreflang="ht" data-title="Tool Command Language" data-language-autonym="Kreyòl ayisyen" data-language-local-name="Kreol Haiti" class="interlanguage-link-target"><span>Kreyòl ayisyen</span></a></li><li class="interlanguage-link interwiki-la mw-list-item"><a href="https://la.wikipedia.org/wiki/Tcl" title="Tcl – Latin" lang="la" hreflang="la" data-title="Tcl" data-language-autonym="Latina" data-language-local-name="Latin" class="interlanguage-link-target"><span>Latina</span></a></li><li class="interlanguage-link interwiki-nl mw-list-item"><a href="https://nl.wikipedia.org/wiki/Tcl_(programmeertaal)" title="Tcl (programmeertaal) – Belanda" lang="nl" hreflang="nl" data-title="Tcl (programmeertaal)" data-language-autonym="Nederlands" data-language-local-name="Belanda" class="interlanguage-link-target"><span>Nederlands</span></a></li><li class="interlanguage-link interwiki-ja mw-list-item"><a href="https://ja.wikipedia.org/wiki/Tcl" title="Tcl – Jepun" lang="ja" hreflang="ja" data-title="Tcl" data-language-autonym="日本語" data-language-local-name="Jepun" class="interlanguage-link-target"><span>日本語</span></a></li><li class="interlanguage-link interwiki-no mw-list-item"><a href="https://no.wikipedia.org/wiki/Tcl" title="Tcl – Bokmal Norway" lang="nb" hreflang="nb" data-title="Tcl" data-language-autonym="Norsk bokmål" data-language-local-name="Bokmal Norway" class="interlanguage-link-target"><span>Norsk bokmål</span></a></li><li class="interlanguage-link interwiki-pl mw-list-item"><a href="https://pl.wikipedia.org/wiki/Tcl_(j%C4%99zyk_programowania)" title="Tcl (język programowania) – Poland" lang="pl" hreflang="pl" data-title="Tcl (język programowania)" data-language-autonym="Polski" data-language-local-name="Poland" class="interlanguage-link-target"><span>Polski</span></a></li><li class="interlanguage-link interwiki-pt mw-list-item"><a href="https://pt.wikipedia.org/wiki/Tcl" title="Tcl – Portugis" lang="pt" hreflang="pt" data-title="Tcl" data-language-autonym="Português" data-language-local-name="Portugis" class="interlanguage-link-target"><span>Português</span></a></li><li class="interlanguage-link interwiki-ro mw-list-item"><a href="https://ro.wikipedia.org/wiki/Tcl/TK" title="Tcl/TK – Romania" lang="ro" hreflang="ro" data-title="Tcl/TK" data-language-autonym="Română" data-language-local-name="Romania" class="interlanguage-link-target"><span>Română</span></a></li><li class="interlanguage-link interwiki-ru badge-Q17437798 badge-goodarticle mw-list-item" title="rencana baik"><a href="https://ru.wikipedia.org/wiki/Tcl" title="Tcl – Rusia" lang="ru" hreflang="ru" data-title="Tcl" data-language-autonym="Русский" data-language-local-name="Rusia" class="interlanguage-link-target"><span>Русский</span></a></li><li class="interlanguage-link interwiki-simple mw-list-item"><a href="https://simple.wikipedia.org/wiki/Tcl" title="Tcl – Simple English" lang="en-simple" hreflang="en-simple" data-title="Tcl" data-language-autonym="Simple English" data-language-local-name="Simple English" class="interlanguage-link-target"><span>Simple English</span></a></li><li class="interlanguage-link interwiki-sr mw-list-item"><a href="https://sr.wikipedia.org/wiki/Tcl" title="Tcl – Serbia" lang="sr" hreflang="sr" data-title="Tcl" data-language-autonym="Српски / srpski" data-language-local-name="Serbia" class="interlanguage-link-target"><span>Српски / srpski</span></a></li><li class="interlanguage-link interwiki-fi mw-list-item"><a href="https://fi.wikipedia.org/wiki/Tcl_(ohjelmointikieli)" title="Tcl (ohjelmointikieli) – Finland" lang="fi" hreflang="fi" data-title="Tcl (ohjelmointikieli)" data-language-autonym="Suomi" data-language-local-name="Finland" class="interlanguage-link-target"><span>Suomi</span></a></li><li class="interlanguage-link interwiki-sv mw-list-item"><a href="https://sv.wikipedia.org/wiki/Tcl" title="Tcl – Sweden" lang="sv" hreflang="sv" data-title="Tcl" data-language-autonym="Svenska" data-language-local-name="Sweden" class="interlanguage-link-target"><span>Svenska</span></a></li><li class="interlanguage-link interwiki-vi mw-list-item"><a href="https://vi.wikipedia.org/wiki/Tcl" title="Tcl – Vietnam" lang="vi" hreflang="vi" data-title="Tcl" data-language-autonym="Tiếng Việt" data-language-local-name="Vietnam" class="interlanguage-link-target"><span>Tiếng Việt</span></a></li><li class="interlanguage-link interwiki-tr mw-list-item"><a href="https://tr.wikipedia.org/wiki/Tcl" title="Tcl – Turki" lang="tr" hreflang="tr" data-title="Tcl" data-language-autonym="Türkçe" data-language-local-name="Turki" class="interlanguage-link-target"><span>Türkçe</span></a></li><li class="interlanguage-link interwiki-uk mw-list-item"><a href="https://uk.wikipedia.org/wiki/Tcl" title="Tcl – Ukraine" lang="uk" hreflang="uk" data-title="Tcl" data-language-autonym="Українська" data-language-local-name="Ukraine" class="interlanguage-link-target"><span>Українська</span></a></li><li class="interlanguage-link interwiki-zh-yue mw-list-item"><a href="https://zh-yue.wikipedia.org/wiki/Tcl" title="Tcl – Kantonis" lang="yue" hreflang="yue" data-title="Tcl" data-language-autonym="粵語" data-language-local-name="Kantonis" class="interlanguage-link-target"><span>粵語</span></a></li><li class="interlanguage-link interwiki-zh mw-list-item"><a href="https://zh.wikipedia.org/wiki/Tcl" title="Tcl – Cina" lang="zh" hreflang="zh" data-title="Tcl" data-language-autonym="中文" data-language-local-name="Cina" class="interlanguage-link-target"><span>中文</span></a></li> </ul> <div class="after-portlet after-portlet-lang"><span class="wb-langlinks-edit wb-langlinks-link"><a href="https://www.wikidata.org/wiki/Special:EntityPage/Q5288#sitelinks-wikipedia" title="Sunting pautan antara bahasa" class="wbc-editpage">Sunting pautan</a></span></div> </div> </div> </div> </header> <div class="vector-page-toolbar"> <div class="vector-page-toolbar-container"> <div id="left-navigation"> <nav aria-label="Ruang nama"> <div id="p-associated-pages" class="vector-menu vector-menu-tabs mw-portlet mw-portlet-associated-pages" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="ca-nstab-main" class="selected vector-tab-noicon mw-list-item"><a href="/wiki/Tcl" title="Lihat laman kandungan [c]" accesskey="c"><span>Rencana</span></a></li><li id="ca-talk" class="vector-tab-noicon mw-list-item"><a href="/wiki/Perbincangan:Tcl" rel="discussion" title="Perbincangan mengenai laman kandungan [t]" accesskey="t"><span>Perbincangan</span></a></li> </ul> </div> </div> <div id="vector-variants-dropdown" class="vector-dropdown emptyPortlet" > <input type="checkbox" id="vector-variants-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-variants-dropdown" class="vector-dropdown-checkbox " aria-label="Tukar kelainan bahasa" > <label id="vector-variants-dropdown-label" for="vector-variants-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet" aria-hidden="true" ><span class="vector-dropdown-label-text">Bahasa Melayu</span> </label> <div class="vector-dropdown-content"> <div id="p-variants" class="vector-menu mw-portlet mw-portlet-variants emptyPortlet" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> </ul> </div> </div> </div> </div> </nav> </div> <div id="right-navigation" class="vector-collapsible"> <nav aria-label="Rupa"> <div id="p-views" class="vector-menu vector-menu-tabs mw-portlet mw-portlet-views" > <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="ca-view" class="selected vector-tab-noicon mw-list-item"><a href="/wiki/Tcl"><span>Baca</span></a></li><li id="ca-ve-edit" class="vector-tab-noicon mw-list-item"><a href="/w/index.php?title=Tcl&veaction=edit" title="Sunting laman ini [v]" accesskey="v"><span>Sunting</span></a></li><li id="ca-edit" class="collapsible vector-tab-noicon mw-list-item"><a href="/w/index.php?title=Tcl&action=edit" title="Sunting kod sumber untuk laman ini [e]" accesskey="e"><span>Sunting sumber</span></a></li><li id="ca-history" class="vector-tab-noicon mw-list-item"><a href="/w/index.php?title=Tcl&action=history" title="Semakan terdahulu bagi laman ini [h]" accesskey="h"><span>Lihat sejarah</span></a></li> </ul> </div> </div> </nav> <nav class="vector-page-tools-landmark" aria-label="Alatan laman"> <div id="vector-page-tools-dropdown" class="vector-dropdown vector-page-tools-dropdown" > <input type="checkbox" id="vector-page-tools-dropdown-checkbox" role="button" aria-haspopup="true" data-event-name="ui.dropdown-vector-page-tools-dropdown" class="vector-dropdown-checkbox " aria-label="Peralatan" > <label id="vector-page-tools-dropdown-label" for="vector-page-tools-dropdown-checkbox" class="vector-dropdown-label cdx-button cdx-button--fake-button cdx-button--fake-button--enabled cdx-button--weight-quiet" aria-hidden="true" ><span class="vector-dropdown-label-text">Peralatan</span> </label> <div class="vector-dropdown-content"> <div id="vector-page-tools-unpinned-container" class="vector-unpinned-container"> <div id="vector-page-tools" class="vector-page-tools vector-pinnable-element"> <div class="vector-pinnable-header vector-page-tools-pinnable-header vector-pinnable-header-unpinned" data-feature-name="page-tools-pinned" data-pinnable-element-id="vector-page-tools" data-pinned-container-id="vector-page-tools-pinned-container" data-unpinned-container-id="vector-page-tools-unpinned-container" > <div class="vector-pinnable-header-label">Peralatan</div> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-page-tools.pin">alih ke bar sisi</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-page-tools.unpin">sorokkan</button> </div> <div id="p-cactions" class="vector-menu mw-portlet mw-portlet-cactions emptyPortlet vector-has-collapsible-items" title="Lagi pilihan" > <div class="vector-menu-heading"> Tindakan </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="ca-more-view" class="selected vector-more-collapsible-item mw-list-item"><a href="/wiki/Tcl"><span>Baca</span></a></li><li id="ca-more-ve-edit" class="vector-more-collapsible-item mw-list-item"><a href="/w/index.php?title=Tcl&veaction=edit" title="Sunting laman ini [v]" accesskey="v"><span>Sunting</span></a></li><li id="ca-more-edit" class="collapsible vector-more-collapsible-item mw-list-item"><a href="/w/index.php?title=Tcl&action=edit" title="Sunting kod sumber untuk laman ini [e]" accesskey="e"><span>Sunting sumber</span></a></li><li id="ca-more-history" class="vector-more-collapsible-item mw-list-item"><a href="/w/index.php?title=Tcl&action=history"><span>Lihat sejarah</span></a></li> </ul> </div> </div> <div id="p-tb" class="vector-menu mw-portlet mw-portlet-tb" > <div class="vector-menu-heading"> Umum </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="t-whatlinkshere" class="mw-list-item"><a href="/wiki/Khas:Pautan_ke_sini/Tcl" title="Senarai semua laman wiki yang mengandungi pautan ke laman ini [j]" accesskey="j"><span>Pautan ke laman ini</span></a></li><li id="t-recentchangeslinked" class="mw-list-item"><a href="/wiki/Khas:Perubahan_berkaitan/Tcl" rel="nofollow" title="Perubahan terkini bagi laman yang dipaut dari laman ini [k]" accesskey="k"><span>Perubahan berkaitan</span></a></li><li id="t-upload" class="mw-list-item"><a href="//commons.wikimedia.org/wiki/Special:UploadWizard?uselang=ms" title="Muat naik fail [u]" accesskey="u"><span>Muat naik fail</span></a></li><li id="t-specialpages" class="mw-list-item"><a href="/wiki/Khas:Laman_khas" title="Senarai semua laman khas [q]" accesskey="q"><span>Laman khas</span></a></li><li id="t-permalink" class="mw-list-item"><a href="/w/index.php?title=Tcl&oldid=4669634" title="Pautan kekal ke semakan laman ini"><span>Pautan kekal</span></a></li><li id="t-info" class="mw-list-item"><a href="/w/index.php?title=Tcl&action=info" title="Maklumat lanjut mengenai laman ini"><span>Maklumat laman</span></a></li><li id="t-cite" class="mw-list-item"><a href="/w/index.php?title=Khas:Petik_laman_ini&page=Tcl&id=4669634&wpFormIdentifier=titleform" title="Maklumat tentang cara memetik laman ini"><span>Petik laman ini</span></a></li><li id="t-urlshortener" class="mw-list-item"><a href="/w/index.php?title=Khas:UrlShortener&url=https%3A%2F%2Fms.wikipedia.org%2Fwiki%2FTcl"><span>Dapatkan URL pendek</span></a></li><li id="t-urlshortener-qrcode" class="mw-list-item"><a href="/w/index.php?title=Khas:QrCode&url=https%3A%2F%2Fms.wikipedia.org%2Fwiki%2FTcl"><span>Muat turun kod QR</span></a></li> </ul> </div> </div> <div id="p-coll-print_export" class="vector-menu mw-portlet mw-portlet-coll-print_export" > <div class="vector-menu-heading"> Cetak/eksport </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li id="coll-create_a_book" class="mw-list-item"><a href="/w/index.php?title=Khas:Buku&bookcmd=book_creator&referer=Tcl"><span>Cipta buku</span></a></li><li id="coll-download-as-rl" class="mw-list-item"><a href="/w/index.php?title=Khas:DownloadAsPdf&page=Tcl&action=show-download-screen"><span>Muat turun sebagai PDF</span></a></li><li id="t-print" class="mw-list-item"><a href="/w/index.php?title=Tcl&printable=yes" title="Versi boleh cetak bagi laman ini [p]" accesskey="p"><span>Versi boleh cetak</span></a></li> </ul> </div> </div> <div id="p-wikibase-otherprojects" class="vector-menu mw-portlet mw-portlet-wikibase-otherprojects" > <div class="vector-menu-heading"> Dalam projek lain </div> <div class="vector-menu-content"> <ul class="vector-menu-content-list"> <li class="wb-otherproject-link wb-otherproject-commons mw-list-item"><a href="https://commons.wikimedia.org/wiki/Category:Tcl_programming_language_family" hreflang="en"><span>Wikimedia Commons</span></a></li><li id="t-wikibase" class="wb-otherproject-link wb-otherproject-wikibase-dataitem mw-list-item"><a href="https://www.wikidata.org/wiki/Special:EntityPage/Q5288" title="Pautan ke item repositori data yang bersambung [g]" accesskey="g"><span>Butir Wikidata</span></a></li> </ul> </div> </div> </div> </div> </div> </div> </nav> </div> </div> </div> <div class="vector-column-end"> <div class="vector-sticky-pinned-container"> <nav class="vector-page-tools-landmark" aria-label="Alatan laman"> <div id="vector-page-tools-pinned-container" class="vector-pinned-container"> </div> </nav> <nav class="vector-appearance-landmark" aria-label="Penampilan"> <div id="vector-appearance-pinned-container" class="vector-pinned-container"> <div id="vector-appearance" class="vector-appearance vector-pinnable-element"> <div class="vector-pinnable-header vector-appearance-pinnable-header vector-pinnable-header-pinned" data-feature-name="appearance-pinned" data-pinnable-element-id="vector-appearance" data-pinned-container-id="vector-appearance-pinned-container" data-unpinned-container-id="vector-appearance-unpinned-container" > <div class="vector-pinnable-header-label">Penampilan</div> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-pin-button" data-event-name="pinnable-header.vector-appearance.pin">alih ke bar sisi</button> <button class="vector-pinnable-header-toggle-button vector-pinnable-header-unpin-button" data-event-name="pinnable-header.vector-appearance.unpin">sorokkan</button> </div> </div> </div> </nav> </div> </div> <div id="bodyContent" class="vector-body" aria-labelledby="firstHeading" data-mw-ve-target-container> <div class="vector-body-before-content"> <div class="mw-indicators"> </div> <div id="siteSub" class="noprint">Daripada Wikipedia, ensiklopedia bebas.</div> </div> <div id="contentSub"><div id="mw-content-subtitle"></div></div> <div id="mw-content-text" class="mw-body-content"><div class="mw-content-ltr mw-parser-output" lang="ms" dir="ltr"><style data-mw-deduplicate="TemplateStyles:r5657302">.mw-parser-output .infobox-subbox{padding:0;border:none;margin:-3px;width:auto;min-width:100%;font-size:100%;clear:none;float:none;background-color:transparent}.mw-parser-output .infobox-3cols-child{margin:auto}.mw-parser-output .infobox .navbar{font-size:100%}body.skin-minerva .mw-parser-output .infobox-header,body.skin-minerva .mw-parser-output .infobox-subheader,body.skin-minerva .mw-parser-output .infobox-above,body.skin-minerva .mw-parser-output .infobox-title,body.skin-minerva .mw-parser-output .infobox-image,body.skin-minerva .mw-parser-output .infobox-full-data,body.skin-minerva .mw-parser-output .infobox-below{text-align:center}</style><table class="infobox vevent"><caption class="infobox-title summary">Tcl</caption><tbody><tr><td colspan="2" class="infobox-image"><span typeof="mw:File"><a href="/wiki/Fail:Tcl.svg" class="mw-file-description"><img src="//upload.wikimedia.org/wikipedia/commons/thumb/4/41/Tcl.svg/70px-Tcl.svg.png" decoding="async" width="70" height="148" class="mw-file-element" srcset="//upload.wikimedia.org/wikipedia/commons/thumb/4/41/Tcl.svg/105px-Tcl.svg.png 1.5x, //upload.wikimedia.org/wikipedia/commons/thumb/4/41/Tcl.svg/140px-Tcl.svg.png 2x" data-file-width="125" data-file-height="265" /></a></span></td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Paradigma_pengaturcaraan" title="Paradigma pengaturcaraan">Paradigma</a></th><td class="infobox-data"><a href="/wiki/Bahasa_pengaturcaraan_berbilang_paradigma" class="mw-redirect" title="Bahasa pengaturcaraan berbilang paradigma">berbilang paradigma</a>: <a href="/wiki/Pengaturcaraan_berorientasi_objek" title="Pengaturcaraan berorientasi objek">berorientasi objek</a>, <a href="/wiki/Pengaturcaraan_kefungsian" title="Pengaturcaraan kefungsian">kefungsian</a>, <a href="/wiki/Pengaturcaraan_bertatacara" title="Pengaturcaraan bertatacara">bertatacara</a>, <a href="/w/index.php?title=Pengaturcaraan_pacuan_peristiwa&action=edit&redlink=1" class="new" title="Pengaturcaraan pacuan peristiwa (laman tidak wujud)">pacuan peristiwa</a></td></tr><tr><th scope="row" class="infobox-label">Muncul pada</th><td class="infobox-data"><a href="/wiki/1988" title="1988">1988</a></td></tr><tr><th scope="row" class="infobox-label">Direka oleh</th><td class="infobox-data organiser"><a href="/wiki/John_Ousterhout" title="John Ousterhout">John Ousterhout</a></td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Pembangun_perisian" title="Pembangun perisian">Pembangun</a></th><td class="infobox-data">Tcl Core Team</td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Kitar_hidup_lepasan_perisian" class="mw-redirect" title="Kitar hidup lepasan perisian">Lepasan stabil</a></th><td class="infobox-data"><a rel="nofollow" class="external text" href="https://sourceforge.net/projects/tcl/files/Tcl/8.6.9/tcltk-release-notes-8.6.9.txt/view">8.6.9</a> (16 November 2018<span class="noprint">; 6 tahun yang lalu</span><span style="display:none"> (<span class="bday dtstart published updated">2018-11-16</span>)</span>)</td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Kitar_hidup_lepasan_perisian" class="mw-redirect" title="Kitar hidup lepasan perisian">Lepasan pratunjuk</a></th><td class="infobox-data"><a rel="nofollow" class="external text" href="https://sourceforge.net/projects/tcl/files/Tcl/8.7a1/tcltk-release-notes-8.7a1.txt/view">8.7a1</a> (8 September 2017<span class="noprint">; 7 tahun yang lalu</span><span style="display:none"> (<span class="bday dtstart published updated">2017-09-08</span>)</span>)</td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Sistem_jenis" title="Sistem jenis">Disiplin penjenisan</a></th><td class="infobox-data"><a href="/wiki/Penjenisan_dinamik" class="mw-redirect" title="Penjenisan dinamik">Dinamik</a>, segalanya boleh dikira sebagai <a href="/wiki/Rentetan" title="Rentetan">rentetan</a></td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Pelaksanaan_bahasa_pengaturcaraan" title="Pelaksanaan bahasa pengaturcaraan">Pelaksanaan utama</a></th><td class="infobox-data"><a href="/wiki/ActiveTcl" class="mw-redirect" title="ActiveTcl">ActiveTcl</a></td></tr><tr><th scope="row" class="infobox-label"><a href="/wiki/Laman_web" title="Laman web">Laman web</a></th><td class="infobox-data"><a rel="nofollow" class="external text" href="http://www.tcl.tk/">www.tcl.tk</a></td></tr></tbody></table> <p><b>Tcl</b> ( <i>Tool Command Language</i>, sering ditulis "Tcl" berbanding "TCL" dan disebut <i>ticle</i>) adalah salah satu <a href="/wiki/Bahasa_pengaturcaraan" title="Bahasa pengaturcaraan">bahasa pengaturcaraan</a>. Ia dicipta oleh <a href="/wiki/John_Ousterhout" title="John Ousterhout">John Ousterhout</a>. </p><p><a href="/wiki/Pentafsir" class="mw-disambig" title="Pentafsir">Pentafsir</a> yang biasa untuk Tcl adalah <a href="/wiki/Tclsh" title="Tclsh">tclsh</a>. </p> <meta property="mw:PageProp/toc" /> <div class="mw-heading mw-heading2"><h2 id="Sintaks">Sintaks</h2><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=1" title="Sunting bahagian: Sintaks" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=1" title="Sunting kod sumber bahagian: Sintaks"><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <div class="mw-heading mw-heading3"><h3 id="Sintaks_asas_dalam_Tcl">Sintaks asas dalam Tcl</h3><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=2" title="Sunting bahagian: Sintaks asas dalam Tcl" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=2" title="Sunting kod sumber bahagian: Sintaks asas dalam Tcl"><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <p>Sintaksnya berupa seperti perkataan <a href="/wiki/Bahasa_Inggeris" title="Bahasa Inggeris">bahasa Inggeris</a> yang disingkatkan. Skripnya terdiri daripada beberapa arahan. Arahan adalah beberapa perkataan yang dipisahkan dengan ruang kosong. </p> <pre> kata1 kata2 kata3 ... kataN </pre> <p>Perkataan pertama adalah nama kepada perintah (bergantung kepada <a href="/wiki/Pengatur_cara" title="Pengatur cara">pengatur cara</a>) manakala yang selebihnya adalah argumen-argumen. </p> <pre> namaPerintah arg1 arg2 ... argN </pre> <p>Sebagai contoh, </p> <div class="mw-highlight mw-highlight-lang-tcl mw-content-ltr" dir="ltr"><pre><span></span><span class="k">set</span><span class="w"> </span>x<span class="w"> </span><span class="mi">14</span> </pre></div> <p>mempunyai 2 argumen. </p> <div class="mw-heading mw-heading3"><h3 id="Simbol-simbol_dengan_tujuannya_dalam_Tcl">Simbol-simbol dengan tujuannya dalam Tcl</h3><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=3" title="Sunting bahagian: Simbol-simbol dengan tujuannya dalam Tcl" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=3" title="Sunting kod sumber bahagian: Simbol-simbol dengan tujuannya dalam Tcl"><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <table class="wikitable"> <tbody><tr> <th>Simbol</th> <th>Kegunaan </th></tr> <tr> <td align="center"><code>\</code> </td> <td>Mengelakkan ruang kosong daripada memisahkan argumen </td></tr> <tr> <td align="center"><code>[]</code> </td> <td>Sebagai sub-arahan </td></tr> <tr> <td align="center"><code>;</code> </td> <td>Memberi isyarat permulaan arahan baru </td></tr> <tr> <td align="center"><code>#</code> </td> <td>Memberi isyarat yang barisan tersebut adalah komen </td></tr> <tr> <td align="center"><code>$</code> </td> <td>Bertindak sebagai alamat untuk sesuatu pembolehubah untuk penggantian masuk </td></tr> <tr> <td align="center"><code>""</code><br />atau<br /><code>{}</code> </td> <td> <ul><li>Mengkelompokkan argumen</li> <li>Perbezaan <code>""</code> dengan <code>{}</code></li></ul> <ol><li><code>""</code> membenarkan penggantian masuk dalam mengkelompokkan argumen, manakala <code>{}</code> sebaliknya.</li> <li><code>{}</code> boleh diletak berdekatan manakala <code>""</code> tidak boleh.</li></ol> </td></tr> </tbody></table> <div class="mw-heading mw-heading3"><h3 id="Tatacara_dalam_TCL">Tatacara dalam TCL</h3><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=4" title="Sunting bahagian: Tatacara dalam TCL" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=4" title="Sunting kod sumber bahagian: Tatacara dalam TCL"><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <p>Tatacara adalah arahan-arahan dalam TCL. Ia boleh disamakan dengan fungsi dalam <a href="/wiki/Bahasa_pengaturcaraan_C" class="mw-redirect" title="Bahasa pengaturcaraan C">C</a>. Tatacara ditulis seperti berikut: </p> <div class="mw-highlight mw-highlight-lang-tcl mw-content-ltr" dir="ltr"><pre><span></span><span class="k">proc</span><span class="w"> </span>namaTatacara<span class="w"> </span><span class="k">{</span><span class="nv">arg1</span><span class="w"> </span>arg2<span class="w"> </span>...<span class="w"> </span>argn<span class="k">}</span><span class="w"> </span><span class="k">{</span> <span class="w"> </span><span class="c">#arahan-arahan diletakkan di sini</span> <span class="k">}</span> </pre></div> <p>Cara pemanggilan tatacara di dalam skrip TCL adalah seperti berikut: </p> <pre> namaTatacara arg1 arg2 ... argn </pre> <p>Tatacara boleh juga menerima argumen yang merupakan tatacara yang lain. Contoh: </p> <pre> tatacara1 [tatacara2 arg1 arg2 ... argn] </pre> <div class="mw-heading mw-heading2"><h2 id="Atur_cara_"Indahnya_Dunia!""><span id="Atur_cara_.22Indahnya_Dunia.21.22"></span>Atur cara "Indahnya Dunia!"</h2><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=5" title="Sunting bahagian: Atur cara "Indahnya Dunia!"" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=5" title="Sunting kod sumber bahagian: Atur cara "Indahnya Dunia!""><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <p><a href="/wiki/Bahasa_skrip" class="mw-redirect" title="Bahasa skrip">Skrip</a>: </p> <div class="mw-highlight mw-highlight-lang-tcl mw-content-ltr" dir="ltr"><pre><span></span><span class="nb">puts</span><span class="w"> </span><span class="s2">"Indahnya Dunia!"</span> </pre></div> <p>atau </p> <div class="mw-highlight mw-highlight-lang-tcl mw-content-ltr" dir="ltr"><pre><span></span><span class="nb">puts</span><span class="w"> </span><span class="k">{</span><span class="nv">Indahnya</span><span class="w"> </span>Dunia<span class="o">!</span><span class="k">}</span> </pre></div> <p>akan menghasilkan output yang berikut: </p> <pre> Indahnya Dunia! </pre> <p>Menggunakan tatacara untuk atur cara "Indahnya Dunia!" </p> <div class="mw-highlight mw-highlight-lang-tcl mw-content-ltr" dir="ltr"><pre><span></span><span class="k">proc</span><span class="w"> </span>indahDunia<span class="w"> </span><span class="k">{}</span><span class="w"> </span><span class="k">{</span> <span class="w"> </span><span class="k">set</span><span class="w"> </span>ayat<span class="w"> </span><span class="s2">"Indahnya Dunia!"</span> <span class="w"> </span><span class="nb">puts</span><span class="w"> </span><span class="nv">$ayat</span> <span class="k">}</span> <span class="nv">indahDunia</span> </pre></div> <p><br /> </p> <div class="mw-heading mw-heading2"><h2 id="Lihat_juga">Lihat juga</h2><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=6" title="Sunting bahagian: Lihat juga" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=6" title="Sunting kod sumber bahagian: Lihat juga"><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <ul><li><a href="/wiki/Tk" title="Tk">Tk</a></li> <li><a href="/wiki/Tclsh" title="Tclsh">tclsh</a></li> <li><a href="/w/index.php?title=Bahasa_tafsiran&action=edit&redlink=1" class="new" title="Bahasa tafsiran (laman tidak wujud)">Bahasa tafsiran</a></li> <li><a href="/wiki/Bahasa_skrip" class="mw-redirect" title="Bahasa skrip">Bahasa skrip</a></li></ul> <div class="mw-heading mw-heading2"><h2 id="Pautan_Luar">Pautan Luar</h2><span class="mw-editsection"><span class="mw-editsection-bracket">[</span><a href="/w/index.php?title=Tcl&veaction=edit&section=7" title="Sunting bahagian: Pautan Luar" class="mw-editsection-visualeditor"><span>sunting</span></a><span class="mw-editsection-divider"> | </span><a href="/w/index.php?title=Tcl&action=edit&section=7" title="Sunting kod sumber bahagian: Pautan Luar"><span>sunting sumber</span></a><span class="mw-editsection-bracket">]</span></span></div> <ul><li><a rel="nofollow" class="external text" href="http://scriptics.com">scriptics</a></li> <li><a rel="nofollow" class="external text" href="http://www.tcl.tk/man/tcl8.5/tutorial/tcltutorial.html">Tcl Tutorial</a></li> <li><a rel="nofollow" class="external text" href="http://www.tcl.tk/">Tcl Developer Xchange</a></li> <li><a rel="nofollow" class="external text" href="http://www.hobss.wservice.com/tc/">Hobbs</a></li> <li><a rel="nofollow" class="external text" href="http://starbase.neosoft.com/~claird/comp.laang.tcl/">Laird</a></li> <li><a rel="nofollow" class="external text" href="http://www.sco.com/Technology/tcl/Tcl.html">SCO</a></li> <li><a rel="nofollow" class="external text" href="http://www.tclfaq.wservice.com/tcl-faq/">Virden</a></li></ul> <div role="navigation" class="navbox" aria-labelledby="Bahasa_pengaturcaraan" style="padding:3px"><table class="nowraplinks hlist mw-collapsible autocollapse navbox-inner" style="border-spacing:0;background:transparent;color:inherit"><tbody><tr><th scope="col" class="navbox-title" colspan="2"><style data-mw-deduplicate="TemplateStyles:r5375175">.mw-parser-output .navbar{display:inline;font-size:88%;font-weight:normal}.mw-parser-output .navbar-collapse{float:left;text-align:left}.mw-parser-output .navbar-boxtext{word-spacing:0}.mw-parser-output .navbar ul{display:inline-block;white-space:nowrap;line-height:inherit}.mw-parser-output .navbar-brackets::before{margin-right:-0.125em;content:"[ "}.mw-parser-output .navbar-brackets::after{margin-left:-0.125em;content:" ]"}.mw-parser-output .navbar li{word-spacing:-0.125em}.mw-parser-output .navbar a>span,.mw-parser-output .navbar a>abbr{text-decoration:inherit}.mw-parser-output .navbar-mini abbr{font-variant:small-caps;border-bottom:none;text-decoration:none;cursor:inherit}.mw-parser-output .navbar-ct-full{font-size:114%;margin:0 7em}.mw-parser-output .navbar-ct-mini{font-size:114%;margin:0 4em}.mw-parser-output .infobox .navbar{font-size:100%}.mw-parser-output .navbox .navbar{display:block;font-size:100%}.mw-parser-output .navbox-title .navbar{float:left;text-align:left;margin-right:0.5em}</style><div class="navbar plainlinks hlist navbar-mini"><ul><li class="nv-lihat"><a href="/wiki/Templat:Bahasa_pengaturcaraan" title="Templat:Bahasa pengaturcaraan"><abbr title="Lihat templat ini" style=";;background:none transparent;color:inherit;border:none;box-shadow:none;padding:0;">l</abbr></a></li><li class="nv-bincang"><a href="/wiki/Perbincangan_templat:Bahasa_pengaturcaraan" title="Perbincangan templat:Bahasa pengaturcaraan"><abbr title="Bincang templat ini" style=";;background:none transparent;color:inherit;border:none;box-shadow:none;padding:0;">b</abbr></a></li><li class="nv-sunting"><a class="external text" href="https://ms.wikipedia.org/w/index.php?title=Templat:Bahasa_pengaturcaraan&action=edit"><abbr title="Sunting templat ini" style=";;background:none transparent;color:inherit;border:none;box-shadow:none;padding:0;">s</abbr></a></li></ul></div><div id="Bahasa_pengaturcaraan" style="font-size:114%;margin:0 4em"><a href="/wiki/Bahasa_pengaturcaraan" title="Bahasa pengaturcaraan">Bahasa pengaturcaraan</a></div></th></tr><tr><td class="navbox-abovebelow" colspan="2"><div id="*Perbandingan&#95;_*_Glosari"> <ul><li><a href="/wiki/Perbandingan_bahasa-bahasa_pengaturcaraan" title="Perbandingan bahasa-bahasa pengaturcaraan">Perbandingan</a></li> <li><a href="/wiki/Glosari_pengaturcaraan" title="Glosari pengaturcaraan">Glosari</a></li></ul> </div></td></tr><tr><td colspan="2" class="navbox-list navbox-odd" style="width:100%;padding:0px"><div style="padding:0em 0.25em"> <ul><li><a href="/wiki/ALGOL" title="ALGOL">ALGOL</a></li> <li><a href="/wiki/APL" title="APL">APL</a></li> <li><a href="/wiki/Ada_(bahasa_pengaturcaraan)" title="Ada (bahasa pengaturcaraan)">Ada</a></li> <li><a href="/wiki/BASIC" title="BASIC">BASIC</a></li> <li><a href="/wiki/C_(bahasa_pengaturcaraan)" title="C (bahasa pengaturcaraan)">C</a></li> <li><a href="/wiki/C%2B%2B" title="C++">C++</a></li> <li><a href="/wiki/C_Sharp" title="C Sharp">C#</a></li> <li><a href="/wiki/COBOL" title="COBOL">COBOL</a></li> <li><a href="/w/index.php?title=Common_Lisp&action=edit&redlink=1" class="new" title="Common Lisp (laman tidak wujud)">Common Lisp</a></li> <li><a href="/w/index.php?title=Eiffel_(bahasa_pengaturcaraan)&action=edit&redlink=1" class="new" title="Eiffel (bahasa pengaturcaraan) (laman tidak wujud)">Eiffel</a></li> <li><a href="/w/index.php?title=Forth_(bahasa_pengaturcaraan)&action=edit&redlink=1" class="new" title="Forth (bahasa pengaturcaraan) (laman tidak wujud)">FORTH</a></li> <li><a href="/wiki/Fortran" title="Fortran">Fortran</a></li> <li><a href="/wiki/Haskell" title="Haskell">Haskell</a></li> <li><a href="/wiki/Java" title="Java">Java</a></li> <li><a href="/wiki/JavaScript" title="JavaScript">JavaScript</a></li> <li><a href="/wiki/Jython" title="Jython">Jython</a></li> <li><a href="/wiki/LISP" title="LISP">LISP</a></li> <li><a href="/w/index.php?title=Logo_(bahasa_pengaturcaraan)&action=edit&redlink=1" class="new" title="Logo (bahasa pengaturcaraan) (laman tidak wujud)">LOGO</a></li> <li><a href="/w/index.php?title=Mesa_(bahasa_pengaturcaraan)&action=edit&redlink=1" class="new" title="Mesa (bahasa pengaturcaraan) (laman tidak wujud)">Mesa</a></li> <li><a href="/w/index.php?title=Modula-2&action=edit&redlink=1" class="new" title="Modula-2 (laman tidak wujud)">Modula-2</a></li> <li><a href="/w/index.php?title=Oberon_(bahasa_pengaturcaraan)&action=edit&redlink=1" class="new" title="Oberon (bahasa pengaturcaraan) (laman tidak wujud)">Oberon</a></li> <li><a href="/wiki/OCaml" title="OCaml">OCaml</a></li> <li><a href="/w/index.php?title=Objective-C&action=edit&redlink=1" class="new" title="Objective-C (laman tidak wujud)">Objective-C</a></li> <li><a href="/wiki/Perl" title="Perl">Perl</a></li> <li><a href="/wiki/PHP" title="PHP">PHP</a></li> <li><a href="/wiki/Prolog" title="Prolog">Prolog</a></li> <li><a href="/w/index.php?title=PL/I&action=edit&redlink=1" class="new" title="PL/I (laman tidak wujud)">PL/I</a></li> <li><a href="/wiki/Pascal_(bahasa_pengaturcaraan)" title="Pascal (bahasa pengaturcaraan)">Pascal</a></li> <li><a href="/wiki/PostScript" title="PostScript">PostScript</a></li> <li><a href="/wiki/Python" title="Python">Python</a></li> <li><a href="/wiki/Ruby_(bahasa_pengaturcaraan)" class="mw-redirect" title="Ruby (bahasa pengaturcaraan)">Ruby</a></li> <li><a href="/w/index.php?title=Scheme&action=edit&redlink=1" class="new" title="Scheme (laman tidak wujud)">Scheme</a></li> <li><a href="/w/index.php?title=Smalltalk&action=edit&redlink=1" class="new" title="Smalltalk (laman tidak wujud)">Smalltalk</a></li> <li><a href="/wiki/SQL" title="SQL">SQL</a></li> <li><a class="mw-selflink selflink">Tcl</a></li> <li><a href="/wiki/Visual_Basic" title="Visual Basic">Visual Basic</a></li></ul> </div></td></tr><tr><td class="navbox-abovebelow" colspan="2"><div> <ul><li><span typeof="mw:File"><span title="Kategori"><img alt="Kategori" src="//upload.wikimedia.org/wikipedia/commons/thumb/4/48/Folder_Hexagonal_Icon.svg/16px-Folder_Hexagonal_Icon.svg.png" decoding="async" width="16" height="14" class="mw-file-element" srcset="//upload.wikimedia.org/wikipedia/commons/thumb/4/48/Folder_Hexagonal_Icon.svg/24px-Folder_Hexagonal_Icon.svg.png 1.5x, //upload.wikimedia.org/wikipedia/commons/thumb/4/48/Folder_Hexagonal_Icon.svg/32px-Folder_Hexagonal_Icon.svg.png 2x" data-file-width="36" data-file-height="31" /></span></span> <a href="/wiki/Kategori:Bahasa_pengaturcaraan" title="Kategori:Bahasa pengaturcaraan">Kategori</a></li> <li><span typeof="mw:File"><span title="List-Class article"><img alt="List-Class article" src="//upload.wikimedia.org/wikipedia/commons/thumb/d/db/Symbol_list_class.svg/16px-Symbol_list_class.svg.png" decoding="async" width="16" height="16" class="mw-file-element" srcset="//upload.wikimedia.org/wikipedia/commons/thumb/d/db/Symbol_list_class.svg/24px-Symbol_list_class.svg.png 1.5x, //upload.wikimedia.org/wikipedia/commons/thumb/d/db/Symbol_list_class.svg/32px-Symbol_list_class.svg.png 2x" data-file-width="180" data-file-height="185" /></span></span> <a href="/wiki/Senarai_bahasa_pengaturcaraan" title="Senarai bahasa pengaturcaraan">Senarai</a></li></ul> </div></td></tr></tbody></table></div>    </div><noscript><img src="https://login.wikimedia.org/wiki/Special:CentralAutoLogin/start?type=1x1" alt="" width="1" height="1" style="border: none; position: absolute;"></noscript> <div class="printfooter" data-nosnippet="">Diambil daripada "<a dir="ltr" href="https://ms.wikipedia.org/w/index.php?title=Tcl&oldid=4669634">https://ms.wikipedia.org/w/index.php?title=Tcl&oldid=4669634</a>"</div></div> <div id="catlinks" class="catlinks" data-mw="interface"><div id="mw-normal-catlinks" class="mw-normal-catlinks"><a href="/wiki/Khas:Kategori" title="Khas:Kategori">Kategori</a>: <ul><li><a href="/w/index.php?title=Kategori:Pages_using_deprecated_source_tags&action=edit&redlink=1" class="new" title="Kategori:Pages using deprecated source tags (laman tidak wujud)">Pages using deprecated source tags</a></li><li><a href="/wiki/Kategori:Bahasa_penskripan" title="Kategori:Bahasa penskripan">Bahasa penskripan</a></li><li><a href="/wiki/Kategori:Bahasa_pengaturcaraan_berorientasi_objek" title="Kategori:Bahasa pengaturcaraan berorientasi objek">Bahasa pengaturcaraan berorientasi objek</a></li><li><a href="/wiki/Kategori:Bahasa_pengaturcaraan_bertatacara" title="Kategori:Bahasa pengaturcaraan bertatacara">Bahasa pengaturcaraan bertatacara</a></li><li><a href="/wiki/Kategori:Bahasa_pengaturcaraan_kefungsian" title="Kategori:Bahasa pengaturcaraan kefungsian">Bahasa pengaturcaraan kefungsian</a></li><li><a href="/w/index.php?title=Kategori:Bahasa_pengaturcaraan_pacuan_peristiwa&action=edit&redlink=1" class="new" title="Kategori:Bahasa pengaturcaraan pacuan peristiwa (laman tidak wujud)">Bahasa pengaturcaraan pacuan peristiwa</a></li><li><a href="/wiki/Kategori:Bahasa_pengaturcaraan_penjenisan_dinamik" title="Kategori:Bahasa pengaturcaraan penjenisan dinamik">Bahasa pengaturcaraan penjenisan dinamik</a></li></ul></div></div> </div> </main> </div> <div class="mw-footer-container"> <footer id="footer" class="mw-footer" > <ul id="footer-info"> <li id="footer-info-lastmod"> Laman ini kali terakhir disunting pada 04:15, 13 November 2019.</li> <li id="footer-info-copyright">Teks disediakan di bawah <a rel="nofollow" class="external text" href="https://creativecommons.org/licenses/by-sa/4.0/deed.ms">Lesen Creative Commons Pengiktirafan/Perkongsian Serupa</a>; terma tambahan mungkin digunapakai. Lihat <a class="external text" href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Terms_of_Use">Terma Penggunaan</a> untuk butiran lanjut.</li> </ul> <ul id="footer-places"> <li id="footer-places-privacy"><a href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Privacy_policy">Dasar privasi</a></li> <li id="footer-places-about"><a href="/wiki/Wikipedia:Perihal">Perihal Wikipedia</a></li> <li id="footer-places-disclaimers"><a href="/wiki/Wikipedia:Penafian_umum">Penafian</a></li> <li id="footer-places-wm-codeofconduct"><a href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Universal_Code_of_Conduct">Kod Tatakelakuan</a></li> <li id="footer-places-developers"><a href="https://developer.wikimedia.org">Pembangun</a></li> <li id="footer-places-statslink"><a href="https://stats.wikimedia.org/#/ms.wikipedia.org">Statistik</a></li> <li id="footer-places-cookiestatement"><a href="https://foundation.wikimedia.org/wiki/Special:MyLanguage/Policy:Cookie_statement">Kenyataan kuki</a></li> <li id="footer-places-mobileview"><a href="//ms.m.wikipedia.org/w/index.php?title=Tcl&mobileaction=toggle_view_mobile" class="noprint stopMobileRedirectToggle">Paparan mudah alih</a></li> </ul> <ul id="footer-icons" class="noprint"> <li id="footer-copyrightico"><a href="https://wikimediafoundation.org/" class="cdx-button cdx-button--fake-button cdx-button--size-large cdx-button--fake-button--enabled"><img src="/static/images/footer/wikimedia-button.svg" width="84" height="29" alt="Wikimedia Foundation" loading="lazy"></a></li> <li id="footer-poweredbyico"><a href="https://www.mediawiki.org/" class="cdx-button cdx-button--fake-button cdx-button--size-large cdx-button--fake-button--enabled"><img src="/w/resources/assets/poweredby_mediawiki.svg" alt="Powered by MediaWiki" width="88" height="31" loading="lazy"></a></li> </ul> </footer> </div> </div> </div> <div class="vector-settings" id="p-dock-bottom"> <ul></ul> </div><script>(RLQ=window.RLQ||[]).push(function(){mw.config.set({"wgHostname":"mw-web.codfw.main-688fc9465-z8l6q","wgBackendResponseTime":142,"wgPageParseReport":{"limitreport":{"cputime":"0.160","walltime":"0.626","ppvisitednodes":{"value":1205,"limit":1000000},"postexpandincludesize":{"value":17482,"limit":2097152},"templateargumentsize":{"value":1900,"limit":2097152},"expansiondepth":{"value":25,"limit":100},"expensivefunctioncount":{"value":5,"limit":500},"unstrip-depth":{"value":0,"limit":20},"unstrip-size":{"value":3892,"limit":5000000},"entityaccesscount":{"value":0,"limit":400},"timingprofile":["100.00% 586.035 1 -total"," 24.16% 141.563 1 Templat:Infobox_programming_language"," 19.06% 111.721 1 Templat:Infobox"," 12.27% 71.903 1 Templat:Daftar_bahasa_pengaturcaraan"," 11.22% 65.729 2 Templat:Start_date_and_age"," 7.76% 45.496 2 Templat:Time_ago"," 6.61% 38.747 2 Templat:Time_ago/core"," 5.89% 34.527 1 Templat:Navbox"," 2.73% 16.004 2 Templat:Max"," 1.32% 7.727 2 Templat:Icon"]},"scribunto":{"limitreport-timeusage":{"value":"0.046","limit":"10.000"},"limitreport-memusage":{"value":1311667,"limit":52428800}},"cachereport":{"origin":"mw-web.codfw.main-7d9797f5d-l2qq9","timestamp":"20241119215930","ttl":2592000,"transientcontent":false}}});});</script> <script type="application/ld+json">{"@context":"https:\/\/schema.org","@type":"Article","name":"Tcl","url":"https:\/\/ms.wikipedia.org\/wiki\/Tcl","sameAs":"http:\/\/www.wikidata.org\/entity\/Q5288","mainEntity":"http:\/\/www.wikidata.org\/entity\/Q5288","author":{"@type":"Organization","name":"Contributors to Wikimedia projects"},"publisher":{"@type":"Organization","name":"Yayasan Wikimedia Bhd.","logo":{"@type":"ImageObject","url":"https:\/\/www.wikimedia.org\/static\/images\/wmf-hor-googpub.png"}},"datePublished":"2007-03-14T09:22:17Z","dateModified":"2019-11-13T04:15:18Z"}</script> </body> </html>