2022年6月25日 星期六

10-《禪隱者、電腦程式設計、零和壹發生事件、十》


     這幾天【騰雞】地城 找 ArrayList 範例,可惜沒有用 Visual Basic 來示範?!全部是 Java 範例!本來十幾年前住在牛頭角屋下村時教人的材料,已經被黑客入侵燒燬掉!待有空閒時扒上雜物箱找出古董母板和 IDE 舊磁碟機,重組視窗 XP 平台看有沒有舊記錄。

【騰雞】
遇到沒有信心做好的事情,又或對事物的經驗和技術幼嫩時﹐表現得手忙腳亂,心慌慌的﹐即是廣東話說的騰雞。

現在拿 Metafile 檔案頂引,幸好我這個和尚「有食無工錢」,否則對不起大家也就罪過罪過了!

影音介紹:「柴九哥有飯吃無工錢」
https://www.bilibili.com/video/BV1ht4y1z7qK/

請下載:給妳這範例如何作矢量向量繪圖電腦程式語言
https://drive.google.com/file/d/1ktFjggGZJW5-UVbQjmAygPdY9OyMB8ZF/view?usp=sharing

創作日期:‎星期六 ‎2022年‎六月‎25日    下午 03:57:26


2022年6月20日 星期一

《禪隱者、電腦程式設計、零和壹發生事件、九》


    當然不會(教妳如何「button toggle 按鈕切換」三腳貓功夫!)替夫人作足底推拿那麼簡單,是用「 PictureBox Drawing」電腦軟件功能,畫出彩虹「scribble canvas 塗鴉畫布」。

介紹綱上免費下載、旗標出版、Textbook: visual basic 2005 程式設計實務教本
https://www.cyut.edu.tw/~ywfan/VB.htm
視窗程式設計-VisualBasic.net、Visual Basic 2005教學投影片
第九章、提供了對GDI+基本繪圖功能的存取類別
https://www.cyut.edu.tw/~ywfan/vb2008/CH9.ppt

VB.net 顏色Brushes 類別大圖
http://twhsiao.byethost7.com/DB01/L661htm.htm?i=1

影音介紹:【片頭曲】陳百強《畫出彩虹》1984 電視劇《畫出彩虹》
https://www.youtube.com/watch?v=2mTy8V_P5j4

影音介紹:鋼琴彈奏《彩虹》【NAYA的鋼琴時光】
https://www.youtube.com/watch?v=Yly_BiO8aSA

之後有了畫出彩虹基本既念(concept),這幾替妳們準備好的示範例子軟件。

請下載:給妳這範例自行制作成繪圖板(二)並附有透底功能性範例。
https://drive.google.com/file/d/1gGzO_Ww83P1VJQ3zvmOXeO-Rv3LQzYGE/view?usp=sharing

這三年疫情是世紀性災難,大隊伍總算齊整,有不幸也有大幸!獨個兒上路七十年了,不做女友哈吧小狗狗,分手掉頭便走,當和尚去也!世上那有免費午餐呢?叫財政司每人派拾萬?被坊眾罵貪婪!有坊眾回應話:「三四萬夠啦?」大家還在攜手同行,朋友,回頭望過去,唏噓嗎?女人每次給我機會,我選分手,掉頭便走,當和尚去也!不甘為跟尾哈吧小狗狗………回頭望過去,不勝唏噓,當和尚去,每天在獨個兒裝傻瓜笑。

我們能笑,能唏噓,我們只能驚訝
we can laugh, we can gasp, we can only wondering

朋友,妳們又如何渡過此生呢?每個人際遇各有不同,我七十二歲,好戲還在上演中,下回再見。


創作日期:‎星期二 ‎2022年‎六月‎21日    下午 02:22:01
 

2022年6月17日 星期五

《禪隱者、電腦程式設計、零和壹發生事件、八》


    朋友,妳們昨夜輾轉不能入寐?!那個神祕詭異繪圖軟件令你今早熊貓眼睛?一定怪我這個和尚會作弄人,其實只要續一拆解其工具控制項,再加以分釋便可領悟原理。
    記得三十二年前微軟公司推出視窗九五,很多人趨之若鶩地投資電腦這行業,但因 CPU 運載能力慢,CD 只行二百三十(百萬位元組字節 Mebibyte ),而此時 Intel 公司總裁想退休了!我於是請求他替我把 CPU 核心增加快速到七百五十(百萬位元組字節 Mebibyte )或至一(兆位元組字節 gibibite )才能滿足要求,越恩這叔父幸不辱命地完成任務,把電腦硬體提升速度,但我卻被投資者破口大駡,因為她們已傾盡家檔去投資這電腦行業,兩三年夠本夠利,且又再傾盡全力再投資新 VCD 等電腦產品,投資者要養活家中老幼,但我這個和尚只吃白飯過星期也沒問題。
    地球資源有限,人類欲望無窮,所以想經濟理論學說,視乎何方何等人急切需要也就先給誰,十二年前結集好資金,但因為急切於團結六七十億全人類,所以把資金先讓路給通訊電話電腦網際網路等優先,而「谷歌」優先發展「 C 程式語言」給快速搜尋器供人群使用網際網路,始料不及今天竟然沒有了「 Basic 程式語言」!烏克蘭不退讓導致頹垣敗瓦,走難災避百萬逃避蹂躪,倘若退讓也是甚麼都沒有了,英語是(I who have nothing)。
    朋友,妳們昨夜輾轉不能入寐為那個繪圖軟件嗎?其實妳把繪圖軟件中控制項工具逐漸一個一個一件一件脫下分析,不難理解其神祕詭異因由。
    朋友,神祕詭異之說只不過是給人生一個花絮吧,我很快又走完了此生,那又何必太執著呢!神祕詭異識破了不外如是。
佛說:
「一切有為法,盡是因緣合和,緣起時起,緣盡還無,不外如是。」
「一切有爲法,如夢幻泡影,如露亦如電,應作如是觀。」
朋友,大家來一同上演齣好戲,繼續來,日日有好戲。
    影音介紹:
Tom Jones - I Who Have Nothing - This is Tom Jones TV Show 1970
https://www.youtube.com/watch?v=I8Q4vpE9DAs

請下載:給妳這範例自行制作成繪圖板

創作日期:‎星期五 ‎2022年‎六月‎17日    下午 07:05:04


 

2022年6月16日 星期四

《禪隱者、電腦程式設計、零和壹發生事件、七》

 


畫公仔啦!畫公仔畫出彩虹啦!
用電腦繪畫幾條線條,立即又回應你各項公式!
乖巧聰明過人,好孩子才得大家喜歡呢?
用自製繪圖板畫出一個九十度直角三角形。

給妳這範例自行制作成繪圖板 (Your own canvas)
https://drive.google.com/file/d/1Lx8e1CZPQT6iUaNsi19YDL60wFyocUFl/view?usp=sharing

各行觀眾,好戲還陸續登場。
創作日期:‎‎星期四 ‎2022年‎六月‎16日    下午 05:52:57



2022年6月14日 星期二

《禪隱者、電腦程式設計、零和壹發生事件、六》

 


    我家族葉赫氏(曾太嫲嫲蕭太后)年代,中國古代大遼朝前人留下【九章算經】,商高定理,聖經記載耶和華在馬槽裡出生,東方三博士來朝見,商旅往返,把【九章算經】傳到意大利。
    商高,為西周初數學家。商高在公元前1000年發現勾股定理並完成證明。此發現早於畢達哥拉斯定理五百到六百年。勾股定理是中國數學家的獨立發現,在中國早有記載。
【畢達哥拉斯】與【畢氏定理】
    畢達哥拉斯(Pythagoras)約公元前 560 年,生於薩摩斯島 約公元前 480 。年,卒於薩摩斯島:Samos,小亞細亞西岸,今意大利半島南部塔蘭托附近,精於哲學、數學、天文學、音樂理論
【畢氏定理】的來由
    【畢達哥拉斯】證明了以下的一條定理: 在直角三角形中,斜邊邊長的平方等於兩條直角邊邊長平方之和。 即 a2 + b2 = c2。
後世人稱這定理為【畢氏定理】(Pythagoras Theorem)。
畢氏定理並非由畢氏發現! 約公元前 1700 年,巴比倫人經已發現了此定理! 巴比倫泥板「普林頓 322 號」
巴比倫泥板印有 15 組「勾股數組」,分別為:
畢氏定理並非由畢氏發現! 約公元前 1700 年,巴比倫人經已發現了此定理! 時間比畢達哥拉斯早了一千多年!
巴比倫泥板「普林頓 322 號」
約公元前 1700 年,巴比倫人經已發現了此定理!
時間比畢達哥拉斯早了一千多年!
巴比倫泥板印有 15 組「勾股數組」,分別為:
畢氏定理並非由畢氏發現!
    中國古籍《周髀算經》亦有畢氏定理的記載及證明。
經中更有「勾廣三,股修四,徑隅五」的說法。
徑(弦) = 5
勾 = 3
股 = 4
勾2 + 股2 = 弦2
    畢氏定理並非由畢氏發現! 中國古籍《周髀算經》亦有畢氏定理的記載及證明。 經中更有「勾廣三,股修四,徑隅五」的說法。
因此國內稱這定理為「勾股定理」。
「畢氏定理」 還是 「勾股定理」 ?
    在西方人的眼裡,這條定理是由【畢達哥拉斯】在西元前500年的時候發現的,因此,他們把這稱為畢達哥拉斯定理。其實在我國現存最早的數學著作《周髀算經》上,就已經記載了西元前六七世紀【榮方】和【陳子】有關這條定理的一段對話,陳子說:〝若求邪(斜)……勾股各自乘,並而開方除之〞。這段話用公式表示即為:
C 等於根號下 A 平方加上 B 平方或 C 平方等於 A 平方加上 B 平方。

給妳這範例自行制作成 User Control
https://1drv.ms/u/s!AiUmqxk3sizOkwqld3p2vn7bklqb?e=1SfixS

創作日期:‎星期二 ‎2022年‎六月‎14日    下午 07:37:04



2022年6月13日 星期一

《禪隱者、電腦程式設計、零和壹發生事件、五》




    使用者控制項 User Control 是甚麼? VS 開啟後左手邊有工具箱就是。
如何為自己度身訂造一個控件 Control 。
Me, My, MyBase, and MyClass in Visual Basic
    三十年前設計電腦程式(New Somthing as Object)電腦很聰明過人,會找到那所指 Object 是甚麼,且助妳完成任務,現在數百萬電腦程式人員每天發問數千萬個 Object 東西!電腦不再聰明過人!我聰明過電腦了!我要先告訴電腦我最基本需要甚麼?即 Me, My, MyBase, and MyClass in Visual Basic。我的底牌保密並封裝在使用者控制項 User Control 中。陳三炮等山賊土匪也搶不到手呢?山賊土匪【水滸傳】中一百零八人馬我稱之為好漢,因不打劫讀書人?還給一條生路,結局助官府攻打方臘,最終剩下三十幾人歸順朝庭當官,因為人在做天在看,即天有眼的。


各位觀眾,好的戲接踵而來,拭目以待。
影音介紹、蔡幸娟、雲河、一簾幽夢
https://www.youtube.com/watch?v=tE6qt_0MEjQ


以下網際網路為下載近執行檔範例:
https://1drv.ms/u/s!AiUmqxk3sizOkwne4Ba9-8RJKT3N?e=Q2fyuT

創作日期:‎‎‎星期日 ‎2022年‎六月‎12日    時上十一時半
發佈上網際網路日期:‎星期一 ‎2022年‎六月‎13日    下午 04:04:58
更新範例檔日期:‎星期二 ‎2022年‎六月‎14日上午 09:55:33


 

2022年6月9日 星期四

《禪隱者、電腦程式設計、零和壹發生事件、四》


 《動態連結程式庫(DLL)》
簡介
    動態連結程式庫(Dynamic-Link Library, DLL) 是具有函式功能的可執行檔。動態連結可以讓一個程序 (Process) 呼叫本身程式碼以外的函式,而不必將該函式程式碼納入該程序之程式碼中,提供了一個彈性化的外部函式庫。
DLL的內容
    DLL主要包含了一個或數個函式的程式碼,可以編譯成一個額外的檔案儲存在與主程式不同的位置,主程式上的Process只要對應DLL內的函式進行呼叫,就可以使用儲存在DLL上的函式。
    與靜態連結(Static Link)的不同在靜態連結中,連結器 (Linker) 會從靜態連結程式庫取得所有參考函式,並在編譯後的連結程序將其函式放入執行檔,並且讓執行檔體積增大。
使用DLL的優點
1. 程式碼模組化
  DLL可以將部份程式碼以函式的方式適當地模組化,執行期間再動態載入執行。
2. 節省記憶體和降低交換(Swapping)
  許多Process可以同時使用單一 DLL 來共用記憶體裡 DLL 的單一複本(Copy)。而使用使用靜態連結的程式,必須將程式庫碼的複本載入記憶體。
3. 節省磁碟空間
  許多應用程式可以共用磁碟上的單一 DLL 複本,意味著相同的函式我們只需要在DLL放一份即可。而使用靜態連結程式的程式,會將程式庫碼以不同的複本連結至其執行檔。
4. 升級與修改較為容易
  當 DLL 的函式變更時,只要函式的引數和回傳值沒有改變,使用這些函式的應用程式就不需要重新編譯或重新連結。在使用靜態連結時則必須重新連結(link)應用程式。
5. 結合多種程式語言之程式碼
    當我們需要呼叫其他語言所製作的函式時,我們也可以利用DLL來達成,例如我們在使用VS需要呼叫一些Basic語言的函式,我們就可以先將Basic語言的部份做成DLL檔,再把呼叫DLL的程式碼寫在VB裡面,這樣就可以將Basic語言的程式納進VS的程式中。

《動態連結程式庫(DLL)》用來在網際網路上交女朋友:
1. 程式碼模組化
方使媒人婆在各地把我私人秘密資料模組化,動態載入執行。
2. 節省記憶體和降低交換(Swapping)
現代人簡化程式碼放在手提電話 App 中應用,節省記憶體和降低交換時間。
3. 節省磁碟空間
手提電話節省 Mine SD 卡位置。
4. 升級與修改較為容易
增加多一頭豬,一隻金飾,和拾万美元,這時修改 DLL 較為容易。
5. 結合多種程式語言之程式碼
無論任何程式語言:
一、FORTRAN
二、COBOL
三、BASIC
四、PASCAL
五、C、 C++
六、JAVA

    這樣我就保護自己私隱(七十二歲還未有女友!)省媒人婆金錢時間,不佔太多手提電話Mine SD 卡位置,增加彩禮金可即時改口快,方便各國各行人種不同環境語言(可謂保密快靚正。)

如下是 ClassLibrary1.Class1 程式語言內文:

Public Class Class1
    Public Function My_Name(str As Object) As String
        Dim str_Name As String = "Sex性別: Male男性;Name名字: Zebu小寶 ; Age年歲: 72"
        Return str_Name
    End Function
    Public Function My_TelphoneNo(str As Object) As String
        Dim str_TelphoneNo As String = "12345678"
        Return str_TelphoneNo
    End Function
    Public Function My_HomeWork(str As Object) As String
        Dim str_HomeWork As String = "I an a 〔Cloudy〕我是一隻「雲端」"
        Return str_HomeWork
    End Function
End Class

如下是 WindowsApp1.Form1 程式語言內文:
Imports ClassLibrary1.Class1
Public Class Form1
    Dim class1 As New ClassLibrary1.Class1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim str = class1.My_Name(Nothing).ToString
        Me.TextBox1.Text = str.ToString
    End Sub
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim str = class1.My_TelphoneNo(Nothing).ToString
        Me.TextBox2.Text = "TelNo電話號碼: " & str.ToString
    End Sub
    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        Dim str = class1.My_HomeWork(Nothing).ToString
        Me.TextBox3.Text = "HomeWork家居工作: " & str.ToString
    End Sub
End Class

影音介紹:
Top Secret! (6/9) Movie CLIP - Backwards Bookstore (1984) HD
https://www.youtube.com/watch?v=uuYTVl0iOkk&t=1s

各位觀眾,好戲陸續有來。

創作日期:‎‎星期四 ‎2022年‎六月‎9日    下午 08:20:04


2022年6月7日 星期二

《禪隱者、電腦程式設計、零和壹發生事件、三》


    右按滑鼠右下角那個視窗圖標,按執行(R)鏈,輸入 〔 regedit.exe 〕,按圖索驥找出如下地址,隱藏妳要收藏的那隻硬碟機。
REGEDIT4
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
"NoDrives"=dword:00000000
dword:00000000     'All Harddisks Show
Bin                                                   Disk    Dec       Hex
0001                                                   A =  1
0010                                                B =  2
0100                                                C =  4
1000                                                D =  8
0001 0000                                           E =  16               10
0010 0000                                           F =  32                20 
0100 0000                                           G =  64               40
1000 0000                                           H =  128             80
0001 0000 0000                             I =   256             100
0010 0000 0000                                     J =   512             200
0100 0000 0000                                     K =  1024           400
1000 0000 0000                                     L =   2048           800
0001 0000 0000 0000                            M =  4096           1000
0010 0000 0000 0000                            N =  8192            2000
0100 0000 0000 0000                            O =  16384          4000
1000 0000 0000 0000                        P =  32768          8000
0001 0000 0000 0000 0000                   Q =  65536         10000
0010 0000 0000 0000 0000                   R =  131072        20000
0100 0000 0000 0000 0000                   S =   262144       40000
1000 0000 0000 0000 0000                   T =   524288       80000
0001 0000 0000 0000 0000 0000           U =  1048576     100000
0010 0000 0000 0000 0000 0000           V =  2097152     200000
0100 0000 0000 0000 0000 0000           W =  4194304    400000
1000 0000 0000 0000 0000 0000           X =   8388608    800000
0001 0000 0000 0000 0000 0000 0000   Y =  16777216  1000000
0010 0000 0000 0000 0000 0000 0000   Z =  33554432   2000000

網際網路介紹:
How-to: Hide drive letters from Windows Explorer - "NoDrives"
https://ss64.com/nt/syntax-nodrives.html

用 Visual Basic 2019 建立如下工具。

Imports Microsoft.Win32
Public Class Form1
    Dim Val As Integer
    Dim str As String
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
        str = Me.TextBox1.Text
    End Sub
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim regKey As RegistryKey
        regKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", True)
        regKey.SetValue("NoDrives", 0)
        regKey.Close()
        MsgBox("Created NoDrives Hide")
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim str As String = TextBox1.Text
        Select_Disk(str)
        'MsgBox("Created Hide The Disk " & str & " =  " & Val)
        'Exit Sub
        Dim regKey As RegistryKey
        regKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", True)
        regKey.SetValue("NoDrives", Val)
        regKey.Close()
        MsgBox("Created Hide The Disk " & str & " =  " & Val)
    End Sub

    Function Select_Disk(str As String)
        str = TextBox1.Text
        Select Case str
            Case "A", "a"
                Val = 1
            Case "B", "b"
                Val = 2
            Case "C", "c"
                Val = 4
            Case "D", "d"
                Val = 8
            Case "E", "e"
                Val = 16
            Case "F", "f"
                Val = 32
            Case "G", "g"
                Val = 64
            Case "H", "h"
                Val = 128
            Case "I", "i"
                Val = 256
            Case "J", "j"
                Val = 512
            Case "K", "k"
                Val = 1024
            Case "L", "l"
                Val = 2048
            Case "M", "m"
                Val = 4096
            Case "N", "n"
                Val = 8192
            Case "O", "o"
                Val = 16384
            Case "P", "p"
                Val = 32768
            Case "Q", "q"
                Val = 65536
            Case "R", "r"
                Val = 131072
            Case "S", "s"
                Val = 262144
            Case "T", "t"
                Val = 524288
            Case "U", "u"
                Val = 1048576
            Case "V", "v"
                Val = 2097152
            Case "W", "w"
                Val = 4194304
            Case "X", "x"
                Val = 8388608
            Case "Y", "y"
                Val = 16777216
            Case "Z", "z"
                Val = 33554432
        End Select
        Return Val
    End Function
End Class
請撥冗光臨-快樂和尚_香港《快樂和尚_香港、【忍】、【算盡則死】》
http://blog.xuite.net/cheerful_monk.1950hk/5/302604924
‎2015‎年‎01‎月‎30‎日    下午 06:08:39

If you are patient in one moment of anger, you will escape a hundred days of sorrow.
忍一時風平浪靜,退一步海闊天空 / 忍一時之氣,免百日之憂。
各位觀眾,好戲還在後頭。
創作日期:‎星期二 ‎2022年‎六月‎7日    下午 09:35:56



2022年6月3日 星期五

《禪隱者、電腦程式設計、零和壹發生事件、二》


    已經十年沒有接觸和使用「BASIC–培基語言」了!今農曆新年期間打開「網際網路」關於 VS.NET 近來發展?驚訝地知道從此後不再提供使用「BASIC–培基語言」了!六十年感情從此告別!
    十一歲那年他們還準備電晶體裝置取代磁環裝置(大哥哥訛騙我買套磁環裝置,也就永遠只出現「零和壹」發生事件!後來他再有多一套電晶體裝置,才送給我時並且告知識到「BASIC–培基語言」事件。)
    捨不得這六十年感情使用「BASIC–培基語言」!於是從頭開始拿出所有東西關於「BASIC–培基語言」軟硬件,從頭像新工作人員似的,在網際網路上與大家庭討論,清淨了十年,這些日子也就來了一大群黑客入侵襲擊訊息!連手機於更新一些輔助用件時,也發現被人盜用了我自己的名字(只好在名字後加多個英文字母 a 字!)看來退休才是明智。

我是一隻生物:
我正在熟睡    = 0
我已經睡醒    = 1
我雙手扒樹    = 10
我雙腿彈跳    = 11
我口腹叫嘩    = 110
我口吃蚊蟲    = 111
我是一隻青蛙:
「0、1、10、11、110、111」
我用電腦BASIC編譯程式,以直譯方法解碼為:「我睡醒,扒樹再彈跳並大叫,剛吃了隻蒼蠅。」
黑客追問:「誰是誰?」
沒有那麼簡單的?好戲連續有來,這些東西我不懂的(要改名字的!)

    編譯器(compiler)是一種電腦程式,它會將某種程式語言寫成的原始碼(原始語言)轉換成另一種程式語言(目標語言)。
現代人使用稱為 C 語言,由 C 衍生為 C+、C++、C#。
Base家族。雖然我們在工作中使用最多的是Base64,但是Base家族可不止是只有Base64,除了Base64之外,Base家族還有Base32和Base16。
我們都知道ASCII 編碼,ASCII 編碼是用256(2的8次方)個字元,對二進位資料進行編碼的方式,同樣的
Base64 編碼是用64(2的6次方)個字元,對二進位資料進行編碼的方式
Base32 編碼是用32(2的5次方)個字元,對二進位資料進行編碼的方式
Base16 編碼是用16(2的4次方)個字元,對二進位資料進行編碼的方式
    那Base家族有這麼多編碼形式,為什麼偏偏使用Base64呢?
Base64 編碼是用64(2的6次方)個特定的ASCII字元來表示256(2的8次方)個ASCII字元,也就是說三個ASCII字元經過Base64編碼後變為四個的ASCII字元顯示(公約數為24),編碼後資料長度比原來增加1/3,不足3n用“=”補足。
Base32 編碼就是用32(2的5次方)個特定的ASCII字元來表示256(2的8次方)個ASCII碼,也就是說五個ASCII字元經過Base32編碼後會變為八個ASCII字元顯示(公約數為40),編碼後資料長度比原來增加3/5,不足8n用“=”補足。
Base16 編碼就是用16(2的4次方)個特定的ASCII字元表示256(2的8次方)個ASCII字元,也就是說一個ASCII字元經過Base16編碼後會變為兩個ASCII字元顯示,編碼後資料長度比原來增加一倍,不足2n用“=”補足。
從上面可以看出Base64編碼後,長度增加是最少的,這也是我們選用Base64的一個重要原因。

Base64 簡介
Base64顧名思義,就是基於64個可列印字元來表示二進位資料的一種方法,注意它並不是一種加密演算法。對於64個列印字元,我們只需要6個二進位位元就可以完全表示了。那麼我們如何利用8個二進位位元來表示只需要6個二進位位元就可以完全表示的可列印字元呢?由於2的6次方等於64,所以我們可以將每6個位元為一個單元,對應某個可列印字元。三個位元組有24個位元,對應於4個Base64單元,即3個位元組需要用4個可列印字元來表示。
Base64是從二進位資料到字元的過程。所以電腦中所有的內容,包括文本、圖片、音訊、視頻等等都可以使用Base64編碼來表示。

Base64 編碼原理
Base64編碼就是使用64個字元作為一個基底字元集:
小寫字母a-z、大寫字母A-Z、數位0-9、符號"+"、"/"(再加上作為墊字的"=",實際上是65個字元)
然後,所有其他符號都根據一定規則轉換成這個字元集中的字元。
具體來說,Base64編碼的轉換方式可以分為以下四步:
第一步,將每三個位元組作為一組,一共是24個二進位位元
第二步,將這24個二進位位元分為四組,每個組有6個二進位位元
第三步,在每組前面加兩個00,擴展成32個二進位位元,即四個位元組
第四步,根據下表,得到擴展後的每個位元組的對應符號,這就是Base64的編碼值,給大家演練一下轉換的過程。

查閱 ASCII 表 英文大草字母〝 F 〞二進位 ( 01000110 )= 十進位制 (70)
ASCII 二進位制演算成十進位制
二進位 = ( 01000110 )成十進位制過程
=(128*0)+(64*1)+(32*0)+(16*0)+(8*0)+(4*1)+(2*1)+(0+1)
= 64 + 4 + 2 = 68 + 2 = 70
二進位 ( 01000110 )= 十進位制 (70)

查閱 ASCII 表 英文大草字母:
〝 F U S 〞(Flying Unidentified Subject 不明飛行物)
二進位 ( 01000110 、01010101、01010011)= 十進位制 (70、85、83)

ASCII碼一覽表、ASCII碼對照表
http://c.biancheng.net/c/ascii/

黑客追問:「誰是誰?」
我回答:「我是來這世上搏大霧的,Foggie」
黑客狂叫:「Fight The Fog,搏大霧。」

【粵語講呢啲】揩油.索油.抽水.博懵.博大霧.食豆腐。
《影音介紹 【hkweather 博大霧】》
https://www.youtube.com/watch?v=rgRTiDH7NR0

請撥冗光臨《Blogger - 快樂和尚家僧-Cheerful-HomeMonk、【詭異編】、【忘了我是誰】》
http://cheerfulhomemonk-caricature.blogspot.hk/2018/04/blog-post.html
創作日期:‎星期五 ‎2018年‎四月‎6日    下午 05:13:22

至於如何於運用編輯器編譯電腦程式設計篇?

下回再見!★★★★★ 別開罪那些黑客份子,否則嚇#&*※§?!。

創作日期:‎‎星期六 ‎2022年‎六月‎4日    下午 12:52:03



2022年6月2日 星期四

《禪隱者、電腦程式設計、零和壹發生事件》


     電腦硬體可不斷循環運動,例如汽車旋轉車輪前行,但是要指揮左右轉彎,加個軚盤,要有指令(左邊拐彎,再直行百米右邊拐彎,再停下來再後退三米,)電腦程式設計也就是指令,命令不斷循環運動中的機器,如何達到泊車位目的。

電腦程式設計:CarParking
Public Class Form1
    Dim number As Integer = 0
    Dim sampleString As String
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        ' Evaluate number and branch to appropriate label.
        If number = 100 Then GoTo LastLine Else GoTo Line2
Line1:
        sampleString = "Number equals 100"
        TextBox1.Text = sampleString
Line2:
        ' The following statement never gets executed because number under = 100.
        number = number + 10
        sampleString = "Number equals " & number.ToString & " M"
        TextBox1.Text = sampleString
        Exit Sub
LastLine:
        Beep()
    End Sub
End Class

安裝之後啟動範例:如何第一次執行電腦程式設計
https://www.vbtutor.net/vb2019/vb2019_lesson1.html

以下網際網路為下載近執行檔範例:因免費使用雲端沒辦法驗證,請關閉視窗安全性設定之「即時保護」和選擇「仍要下載」和「保留」即可。
https://drive.google.com/file/d/12lX0zx3IF9BBxPnqqWfHRZxGcrz9XO3v/view?usp=sharing

請撥冗光臨《Blogger - 快樂和尚家僧-Cheerful-HomeMonk【人在做、天在看、車在震】 》
http://cheerfulhomemonk.blogspot.hk/2017/04/blog-post_25.html
‎‎‎星期二 ‎2017年‎四月‎25日    下午 07:55:12

創作日期:‎星期四 ‎2022年‎六月‎2日    下午 06:48:38


2022年6月1日 星期三

《禪隱者、電腦為何物?如何運作?_01_序言》


     序言:十多載前住牛頭角下村,朱翁回香港,他喜潛泳,叫他把拋棄車輪胎放於海旁,看可否有助魚苗生長?可否作人工珊瑚礁?但未知會否釋放有害物質呢?(應安全的,)朱翁穿越海底撈船時介傷腿部要縫針!朱翁曾經問外國人說中國陰陽與電腦,朱翁問:「風馬牛不相及?電腦洋人發明的呢?」
    我回答朱翁:「中國陰陽也就是電腦正負電磁,亦即零和壹。」
其後因公屋不可繼承養父母居住權!驅逐出村棲身於露宿者之家!
    伏羲八卦又稱先天八卦, 傳說是由距今七千年的伏羲氏觀物取象的所作。 〝易有太極, 是生兩儀, 兩儀生四象, 四象生八卦。〞太極分陰陽, 求萬物協調, 陰陽五行八卦,八卦圖的外觀是正八邊形,每條邊上都有一個特殊的符號,分別代表了宇宙的八種最主要的物質,即乾、坤、震、巽、坎、離、艮、兌。
前人稱計算機,現代人稱電腦,如何運行呢?
用電(其速度快至每秒運行七圈半地球,)宇宙漆黑一團,衍生出光,光有磁場正極和負極(數字代表為零和壹,)黑一團爆發出光竟生成宇宙空間星雲和射線(我們人類身體結構就稱 DNA,)伏羲稱八卦,來自數學還有 2、4、8、16、32、64、128、256。
    一個位可以代表任何正反兩面: 開/關,是/否,陰/陽,上/下,左/右,真/假,
還有 1/0。當然還有很多其他可能性。但通常將它們用二進制數 1 和 0 來表示。
八個位組成一個字節 (byte)。四個或八個字節組成一個字(word)。位,字
節,字,這些是計算機中代表資訊的單元。
中央處理器(CPU)是計算機的大腦,是處理資訊的地方。指甲大小的矽芯
片上的現代 CPU 可能包含幾十億個晶體管(transistor)。每個晶體管非常小,
約 70 個矽原子,肉眼肯定是看不見的。這些晶體管構成 CPU 中的部件以便用
來存儲和處理電子信號。
計算機的主存儲器或主記憶(main memory)是用來存放 CPU 要立即處理
的信息。CPU 快速從主記憶取得資料,處理以後將結果立即存回主記憶中。
CPU 在裡面
    最簡單的主記憶類型是 DRAM(動態隨機存取記憶)。一個 DRAM 位可以
由單個晶體管和單個電容器形成,使用電容器的充電和放電狀態來表示 1 和 0。
CPU 的指令集中的每條指令由它的數字操作碼(opcode)來代表。指令處理信
息以字為單位。先進 CPU 速度極快,每秒執行超過 1000 億條指令。
DRAM 內存儲的資訊具有揮發性(volatile)。如果電源關閉,DRAM 會失去
其內容。這與用於⻑期數據存儲的硬盤,閃存盤和光盤形成對比。這就是為什
麼每次電腦重啟時,它需要較⻑的時間將操作系統從磁盤帶回主記憶。主記憶
通常是 4 到 16GB(1GB=109 字節),而硬盤要大得多,接近幾個 TB(1TB=1012
字節)。
    這就是數字計算機硬體的本質,它決定了計算機內部資訊的表示和處理必須
以 0 和 1 的形式。
    電腦和別的機器的根本區別在於電腦是通用機器。因為當它運行另一個程式
時,它就變成了另一個機器。硬體不變只變軟件就能執行新任務。計算機能夠
完成任何可編程的任務,其他機器能嗎?
    因為程式就是數據所以程式可以被程式處理和操作。編譯器就是一個例子。
編譯器(compiler)是一種電腦程式,它會將某種程式語言寫成的原始碼(原始語言)轉換成另一種程式語言(目標語言)。
現代人使用稱為 C 語言,由 C 衍生為 C+、C++、C#。搜尋名字用八個字元加一點再加三個字元(xxxxxxxx.xxx、12345678.txt、Executed.exe 等等…)因簡單而搜尋速度飛快,人們樂於使用,現代人發展出 Google 谷歌。
科學家那有不老不死的呢?每年死數千人,十年死數萬!後繼神童追不上!原來精準數學要使用另一種編程BASIC–培基語言(例如 pi 𝝅 3.141592654 ,)C 語言不能完成任務!繪圖方面也就遜色得多(我用 C 語言 PDF 列印出條碼賬單去便利店交費,嘟嘟響多次也未能成功閱讀出內容!)必須要用微軟公司BASIC–培基語言瀏覽器才能成功把條碼閱讀出來。
    證明了上網際網路系統瀏覽器(Google C 語言搜尋快速 ,微軟公司BASIC–培基語言搜尋慢,但繪圖方面要用強大數學程式設計耗用位元和時間也就遜色得多,但精準掃描成功必即嘟到,C 語言 PDF 則失敗!)
到頭來電腦的本質帶來了一個充滿了位元,位元組,和字節的神奇世界。那是一個語言只有兩個字母的世界,一個所有資訊都由 0 和 1 代表的世界,一個所有指令都由 0 和 1 組成的世界,一個飛快運轉的世界。僅使用 0 和 1 進行處理也許看起來很愚蠢,但這種簡單性正是縮小尺寸,降低成本和提高速度的基礎。現在電腦功能雖然強大,但是好戲還在後頭!不可能只有一個符號,有和無,有有加有無,有無加有有,因此,零與壹的世界就是了。


二進位制 十進位制
00000000 0
00000001 1

01111111 127
10000000 128
10000001 129

11111110 254
11111111 255
BASIC–培基語言
    名詞解釋:  早期的電腦使用者在使用電腦時,只能使用0與1的電腦語言,來與電腦溝通,相當不方便。隨著技術的發展,更多的電腦語言出現在市面,目前常聽到的有組合語言、C語言、COBOL語言、FORTRAN語言、BASIC語言、Pascal語言等等。 

    BASIC為Beginner's All-purpose Symbolic Instruction Code的縮寫,意思是「初學者為了各種不同的用途,而使用的符號指令碼」。由達特毛斯(Dartmouth)大學的約翰‧凱密利(John Kemeny)與湯瑪斯‧庫斯(Thomas kurtz)兩位教授在一九六五年發展出來的高階語言,當初設計主要是提供學生一種容易學習的電腦語言。而現今,BASIC不但擁有處理循序檔與隨機檔的能力,少部分也擁有處理索引檔的能力。   BASIC語言擁有下列主要優缺點:   優點:(1)易學易用:BASIC編譯程式主要仍以直譯法為主,但有部份廠商如Microsoft公司的Quick BASIC也有提供全譯法之編譯程式。在直譯法之編譯方法下使用BASIC語言,使用者可以擁有下列好處:只要輸入RUN命令即可執行程式,而不必如全譯法需要逐次做編譯與連結工作後,才能執行程式;可以利用直譯法具有之「交談式」的功能,更正或尋找程式語法或邏輯上的錯誤。(2)兼具COBOL與FORTRAN語言之優點:BASIC語言不但具有FORTRAN的數學式處理能力,如SIN(X)、COS(X)……等函數可供現成使用,且具COBOL循序檔、隨機檔及索引檔等檔案處理能力。(3)不太占記憶體空間,各型電腦均可使用,且具多樣的彩色繪圖與音樂演奏的功能。   缺點:目前的BASIC語言,除了BASIC本身主要的架構之外,各廠商所設計的BASIC語言幾乎不相同,形成不具可攜性。   BASIC版本眾多,大約可分成三類:   1.編譯程式(Complier)的,如BASIC、Quick BASIC、Turbo-BASIC……等。   2.釋譯程式(Interpreter)的,如MSBASIC、NBASIC、GWBASIC、BASICA、中文ETBASIC等。   3.半編譯程式(Semi-Complier)的BASIC語言,如BASIC8、BASIC……等。
    圓周率(小數點後10000位)=3.1415926535 8979323846 2643383279 5028841971 6939937510 5820974944 5923078164 0628620899 8628034825 3421170679 8214808651 3282306647 0938446095 5058223172 5359408128 4811174502 8410270193 8521105559 6446229489 5493038196 4428810975 6659334461 2847564823 3786783165 2712019091 4564856692 3460348610 4543266482 1339360726 0249141273 7245870066 0631558817 4881520920 9628292540 9171536436 7892590360 0113305305 4882046652 1384146951 9415116094 3305727036 5759591953 0921861173 8193261179 3105118548 0744623799 6274956735 1885752724 8912279381 8301194912 9833673362 4406566430 8602139494 6395224737 1907021798 6094370277 0539217176 2931767523 8467481846 7669405132 0005681271 4526356082 7785771342 7577896091 7363717872 1468440901 2249534301 4654958537 1050792279 6892589235 4201995611 2129021960 8640344181 5981362977 4771309960 5187072113 4999999837 2978049951 0597317328 1609631859 5024459455 3469083026 4252230825 3344685035 2619311881 7101000313 7838752886 5875332083 8142061717 7669147303 5982534904 2875546873 1159562863 8823537875 9375195778 1857780532 1712268066 1300192787 6611195909 2164201989
    電腦行業供奉「太上老君」神靈妳知嗎?因為祂是練丹的,亦即現代人(治金工業)

請撥冗光臨-快樂和尚_香港《快樂和尚_香港、【神農架】、【黑暗傳】》
http://blog.xuite.net/cheerful_monk.1950hk/8?st=c&p=1&w=9421770

    創作日期:‎星期四 ‎2022年‎六月‎2日    上午 11:08:35



《禪隱者、電腦程式設計、零和壹發生事件、完結篇》

     今天香港回歸二十五週年慶(自九七年七月一日,)新人事,新作風,新見證,新背後大國支援,新經濟路線,新一代順利接班,我這老和尚要學習新科技事物,七十二歲從新上路,我相信新明天會更好。 各位朋友,有機會再見,bye-bye! 請撥冗光臨《Blogger - 快樂和尚家僧-C...