麻辣家族討論版版's Archiver

keovin790916 發表於 2012-11-5 09:17

請問這程式語言 是哪一種的 加上是什麼意思

請問這程式語言 是哪一種的 加上是什麼意思



1030  PRINT HEX(03 06)
1040  SELECT @PART"KFAM"
1050 DIM H$80,H1$(4)8,H1,H2,K1$

keovin790916 發表於 2012-11-5 09:26

1030  PRINT HEX(03 06)
1040  SELECT @PART"KFAM"
1050 DIM H$80,H1$(4)8,H1,H2,K1$
1060 COM M3$3
1070 SELECT #0<M3$>
1080 GOSUB  ’71("P")
1090 GOSUB  ’71("S")
1092 PRINT AT(2,19);BOX(0,39)
1094 PRINT AT(4,25);BOX(0,27)
1096 PRINT AT(6,16);BOX(16,44)
1100 REM TITLE-MARKET.
1110 H$=HEX(08 F8 00 00 00 00 10 49 00 00 00 00 08 D3 00 00 00 00 08 C8 00 00 00 00 0A F0 00 00 00 00 08 D3 00 00 00 00 09 CE)
1120 GOSUB ’71(0,21,"D",19,H$)
1130 REM TITLE-MAIN-SYSTEM.
1140 H$=HEX(08 C6 00 00 00 00 0B 93 00 00 00 00 09 7F 00 00 00 00 0C D1 00 00 00 00 09 C1 00 00 2F 08 2F 11 2F 09)
1150 GOSUB ’71(2,27,"D",14,H$)
1160 REM PF-1 S1P000.

c_c_lai 發表於 2012-11-5 10:12

[b]回復 [url=http://forum.twbts.com/redirect.php?goto=findpost&pid=46365&ptid=8240]2#[/url] [i]keovin790916[/i] [/b]
這好像是早期 MBasic 、QBasic 的語法。

keovin790916 發表於 2012-11-5 11:00

那能理解出是什麼意思??



1030  PRINT HEX(03 06)
1040  SELECT @PART"KFAM"
1050 DIM H$80,H1$(4)8,H1,H2,K1$
1060 COM M3$3
1070 SELECT #0<M3$>
1080 GOSUB  ’71("P")
1090 GOSUB  ’71("S")
1092 PRINT AT(2,19);BOX(0,39)
1094 PRINT AT(4,25);BOX(0,27)
1096 PRINT AT(6,16);BOX(16,44)
1100 REM TITLE-MARKET.
1110 H$=HEX(08 F8 00 00 00 00 10 49 00 00 00 00 08 D3 00 00 00 00 08 C8 00 00 00 00 0A F0 00 00 00 00 08 D3 00 00 00 00 09 CE)
1120 GOSUB ’71(0,21,"D",19,H$)
1130 REM TITLE-MAIN-SYSTEM.
1140 H$=HEX(08 C6 00 00 00 00 0B 93 00 00 00 00 09 7F 00 00 00 00 0C D1 00 00 00 00 09 C1 00 00 2F 08 2F 11 2F 09)
1150 GOSUB ’71(2,27,"D",14,H$)
1160 REM PF-1 S1P000.

頁: [1]

麻辣家族討論版版為 麻辣學園 網站成員  由 昱得資訊工作室 © Since 1993 所提供