|
贊助商連結 algolee 2006-12-25, 12:58 AM 10 等著出事 20 然後檢討 30 IF 有人下臺 THEN GOTO 50 40 GOTO 10 50 換人來做 60 GOTO 10 一個以前寫過的BASIC程式，供各位參考，歡迎自行修正或加入程式， 增強程式功能。 我改一下，下面這樣比較符合現實..... 10 等著出事 20 互推責任檢討 30 沒人負責 40 WAIT 一年 (cpu 閒置空轉中) 50 GOTO 10 改成這樣有沒有比較好一點 :D 贊助商連結 rushoun 2006-12-25, 07:18 AM 我改一下，下面這樣比較符合現實..... 10 等著出事 20 互推責任檢討 30 沒人負責 40 WAIT 一年 (cpu 閒置空轉中) 50 GOTO 10 改成這樣有沒有比較好一點 :D NO!NO!NO!.... 目前高鐵還是民營，所以不會有WAIT 一年 (cpu 閒置空轉中)的事情發生。 這樣的程式寫法太沒效率了，要改進，怎麼可以用這麼打混的程式寫法? 我再修改一下好了。 5 高鐵繼續營運，日本機電核心+不說國台語的駕駛+搞不清楚的什麼歐盟系統? 6 收錢程式，又稱A錢模式，俗稱高速鐵路站站停車洗錢模組 REM 目前構思中，請網友自行加入程式行 .. .. 10 等著出事 15 IF 出事 THEN 20 16 GOTO 5 20 政府檢討，平面立體媒體全面撻伐，一兩台媒體歌功頌德。 30 IF 有人下臺 THEN GOSUB 50 40 GOSUB 70 45 GOTO 5 50 換人來做副程式模組 REM 目前構思中，請網友自行加入程式行 . . . 60 RETURN 70 ETC系統模式副程式模組 REM 目前構思中，請網友自行加入程式行 71 全面停用 72 政府收回營運，全民買單。 . . 80 RETURN 怎麼樣?比您的程式好一點吧?:D 如有錯誤，歡迎加入增強程式功能指令，請網友自行加入及修改。 我特別強調，這只是一段程式，無關其他，別做太多聯想....:eye: b0913 2006-12-25, 07:58 AM 這不知道那一家保險公司 要承接高鐵的乘客保險啊！ 保費肯定不少.... 還是希望真的能平平安安 順順利利 algolee 2006-12-25, 12:10 PM 恕刪... 怎麼樣?比您的程式好一點吧?:D 如有錯誤，歡迎加入增強程式功能指令，請網友自行加入及修改。 我特別強調，這只是一段程式，無關其他，別做太多聯想....:eye: 好複雜的程式喔~~ Overflow 了 下面這樣比較簡單 Do while 不倒閉 不降價 賺不夠，沒競爭對手，漲價 有問題，裝不知 End DO 這樣才讚～～簡單好讀 :jump: :jump: :jump: 純開玩笑，其它網友別想太多~～:D ps. 我們兩個是來亂的嗎 :circle: k2 2006-12-25, 03:00 PM 媒體記者大爺的意思是說 沒有三秒煞車停住就是不安全 要三秒煞車才准通車 rushoun 2006-12-25, 04:38 PM 好複雜的程式喔~~ Overflow 了 下面這樣比較簡單 Do while 不倒閉 不降價 賺不夠，沒競爭對手，漲價 有問題，裝不知 End DO 這樣才讚～～簡單好讀 :jump: :jump: :jump: 純開玩笑，其它網友別想太多~～:D ps. 我們兩個是來亂的嗎 :circle: 不好意思，小弟的BASIC停留在APPLE II時代，所以只會這個程度。 我沒有來亂啊!只是跟網友討論程式，互相切磋而已。:jump: lenbo 2006-12-26, 02:01 PM 當台北到高雄通車後，我會想去搭一次看看說~ prozacist 2006-12-26, 03:14 PM 營運五年不出事, 再考慮去坐看看. 不過如果乘客平安險, 死亡理賠金一個人不到一億的話, 則不考慮為了體驗地上三百公里時速去搭, 飆自己的車到兩百公里時速已經體驗過了, 自己駕駛比較有臨場感~ algolee 2006-12-26, 05:11 PM 營運五年不出事, 再考慮去坐看看. 不過如果乘客平安險, 死亡理賠金一個人不到一億的話, 則不考慮為了體驗地上三百公里時速去搭, 飆自己的車到兩百公里時速已經體驗過了, 自己駕駛比較有臨場感~ 大哥~~ 不要飆車啦~~ 這樣會害人害己咧 要飆車的話，我們來 PS3 飆 RR7 啦 :D lenbo 2006-12-26, 07:21 PM 要飆車的話，我們來 PS3 飆 RR7 啦 :D 大哥，你買了啊？ 怎麼沒拿出來現寶啊？ |
|
|