(零售行業(yè))音響店DVD零售出租管理數(shù)據(jù)庫

1、（零售行業(yè)）音響店DVD 零售出租管理數(shù)據(jù)庫20XX年XX月多年的企業(yè)咨詢豉問經(jīng)驗.經(jīng)過實戰(zhàn)驗證可以落地機行的卓越管理方案，值得您下載擁有大型數(shù)據(jù)庫課程設計設計報告題 目：音響店DVD出租/零售管理系統(tǒng)學 號： 1 2 1 0 0 6 3 14學生姓名：劉 可指導教師：劉 寧提交時間：目錄第 1需求分析 4.1.1 需求調(diào)查 4.1.2 系統(tǒng)功能分析 1.第 2概念結構設計 2.2.1 局部E-R 圖 2.2.2 全局E-R 圖 3.第 3邏輯結構設計 4.3.1 E-R 圖向關系模式轉換 4.3.2 建立關系模式 4.3.3 關系模式規(guī)范化處理 4.3.4 用戶子模式建立 4.3.5 關系模

2、式邏輯結構定義 5.第 4數(shù)據(jù)庫物理結構設計 7.4.1數(shù)據(jù)庫物理設計 7.第 5數(shù)據(jù)庫實施 8.5.1數(shù)據(jù)庫及數(shù)據(jù)庫對象建立 8.第 6數(shù)據(jù)庫完整性設計 9.6.1 主鍵 9.6.2 參照完整性設計 9.6.3 觸發(fā)器設計9.6.4 視圖設計12第7章 數(shù)據(jù)庫存儲過程設計 13總結14參考文獻： 1.4第1章需求分析1.1 需求調(diào)查通過對各個用戶的調(diào)查，該音響店DVD零售出租管理系統(tǒng)如下需求：1）系統(tǒng)管理：實現(xiàn)系統(tǒng)管理人員對系統(tǒng)的管理，包括添加刪除用戶，更改密碼等功能。2）數(shù)據(jù)管理：實現(xiàn)管理人員系統(tǒng)的管理，包括 DVD入庫，出租，出售，歸還等功能。3）基本信息：實現(xiàn)顯示客戶和 DVD基本信息

3、（包括客戶信息和客戶所租賃DVD信息,DVD基本信息）。4）查詢：查詢當前 DVD狀況；查詢當前用戶租賃狀況及歷史租賃狀況。1.2 系統(tǒng)功能分析用 戶 信 息 管 理1） DVD信息管理：存放及查看各 DVD的基本信息和數(shù)量。2）用戶信息管理：用于對用戶基本信息的錄入、查詢、修改、維護、刪除等常用功能, 并記錄用戶的租賃情況。3） DVD入庫管理：用于對 DVD的入庫情況進行記錄，并修改 DVD總量。4） DVD零售管理：用于記錄 DVD的零售情況，并修改 DVD總量。5） DVD借還管理：用于統(tǒng)計各 DVD的借還情況。第2章概念結構設計2.1局部E-R圖:(2)對用戶建立E-R圖DVD名稱庫

4、存(1)對DVD '建立 E-R圖(3)對DVD租賃建立E-R圖DVDDVD編號租賃日期DVD名稱DVD租賃租賃用戶編號(4)對DVD歸還建立E-R(5)對DVD零售建立E-R圖DVD編號DVD名稱出售日期DVD零售出售數(shù)量(6)對DVD入庫建立E-R2.2全局E-R圖:DVD編號入庫日期DVD編號歸還用戶編號主演提供逾期天數(shù)姓名DVD提供DVD名稱用戶編號DVD零售庫存出售日期歷史租賃租賃日期DVD名稱DVD編號租賃編號DVD租賃第3章邏輯結構設計3.1 E-R圖向關系模式轉變邏輯結構是獨立于任何一種數(shù)據(jù)模型的，在實際應用中，一般所用的數(shù)據(jù)庫環(huán)境已經(jīng)給定（如SQL Server或Or

5、acel或MySql）。由于目前使用的數(shù)據(jù)庫基 本上都是關系數(shù)據(jù)庫，因此首先需要將 E-R圖轉換為關系模型，然后根據(jù)具體 DBMS的特點和限制轉換為特定的DBMS支持下的數(shù)據(jù)模型，最后進行優(yōu)化系 模式轉換3.2 建立關系模式DVD信息、（DVD編號，DVD名稱，主演，現(xiàn)貨，庫存）用戶信息（用戶編號，姓名，性別，當前租賃，歷史租賃）DVD租賃（DVD編號，DVD名稱，租賃日期，租賃期限，租賃用戶編號，租賃編號）DVD歸還（DVD編號，DVD名稱，歸還日期，逾期天數(shù)，歸還用戶編號，歸還編號）DVD零售（DVD編號，DVD名稱，出售日期，出售數(shù)量）DVD入庫（DVD編號，DVD名稱，入庫日期，入庫數(shù)

6、量）3.3 關系模式規(guī)范化處理根據(jù)F,分析每一個關系模式是否滿足3NF ,對不滿足3NF的關系模式要進行規(guī)范化處理。3.4 用戶子模式建立根據(jù)需求分析，研究建立滿足不同需求的用戶子模式，子模式表示形式為:子模式名（屬性列表）3.5 關系模式邏輯結構定義1 .DVD詳細信息字段名數(shù)據(jù)類型長度約束DVD編號char4主鍵DVD名稱char10不為空主演char10不為空現(xiàn)貨int不為空庫存int不為空2 .用戶詳細信息字段名數(shù)據(jù)類型長度約束用戶編號char4主鍵姓名char10不為空性別nchar1男或女當前租賃int可為空歷史租賃int可為空3 .DVD租賃信息字段名數(shù)據(jù)類型長度約束DVD編號c

7、har4外鍵DVD名稱char10不為空租賃日期datetime不為空租賃期限int不為空租賃用戶編號char4外鍵租賃編號char20主鍵4.DVD歸還信息字段名數(shù)據(jù)類型長度約束DVD編號char4外鍵DVD名稱char10不為空歸還日期datetime不為空逾期天數(shù)int不為空歸還用戶編號char4外鍵歸還編號char20主鍵，外鍵5.DVD零售信息字段名數(shù)據(jù)類型長度約束DVD編號char4主鍵，外鍵DVD名稱char10不為空出售日期datetime主鍵出售數(shù)量int不為空6.DVD入庫信息字段名數(shù)據(jù)類型長度約束DVD編號char4主鍵，外鍵DVD名稱char10不為空入庫日期datet

8、ime主鍵入庫數(shù)量int不為空第4章數(shù)據(jù)庫物理結構設計4.1 數(shù)據(jù)庫物理設計數(shù)據(jù)庫物理設計：設計數(shù)據(jù)庫的物理結構，根據(jù)數(shù)據(jù)庫的邏輯結構來選定RDBMS （如Oracle、Sybase等），并設計和實施數(shù)據(jù)庫的存儲結構、存取方式等。數(shù)據(jù)庫物理設計是后半段。將一個給定邏輯結構實施到具體的環(huán)境中時， 邏輯數(shù)據(jù)模型 要選取一個具體的工作環(huán)境，這個工作環(huán)境提供了數(shù)據(jù)存儲結構與存取方法，這個過程就是數(shù)據(jù)庫的物理設計。物理結構依賴于給定的 DBMS和和硬件系統(tǒng)，因此設計人員必須充分了解所用RDBMS的內(nèi)部特征、存儲結構、存取方法。數(shù)據(jù)庫的物理設計通常分為兩步，第一，確定數(shù)據(jù)庫的 物理結構，第二，評價實施空間

9、效率和時間效率確定數(shù)據(jù)庫的物理結構包含下面四方面的內(nèi)容：1、確定數(shù)據(jù)的存儲結構2、設計數(shù)據(jù)的存取路徑3、確定數(shù)據(jù)的存放位置4、確定系統(tǒng)配置數(shù)據(jù)庫物理設計過程中需要對時間效率、空間效率、維護代價和各種用戶要求進行權衡，選擇一個優(yōu)化方案作為數(shù)據(jù)庫物理結構。在數(shù)據(jù)庫物理設計中， 最有效的方式是集中地存儲和檢索對象。第5章數(shù)據(jù)庫實施5.1數(shù)據(jù)庫及數(shù)據(jù)庫對象建立(1)創(chuàng)建數(shù)據(jù)庫：create database音響店DVD零售出租管理系統(tǒng)數(shù)據(jù)庫on(name ='音響店DVD零售出租管理系統(tǒng)數(shù)據(jù)文件,音響店DVD零售出租管理系統(tǒng)數(shù)據(jù)文件.mdf',size =15MB,maxsize =

10、50MB,filegrowth =5%)log on(name ='音響店DVD零售出租管理系統(tǒng)日志文件 ',音響店DVD零售出租管理系統(tǒng)日志文件.ldf',size = 2MB,maxsize = 5MB,filegrowth = 1MB)(2)創(chuàng)建表：create table DVD 信息表(DVD 編號 char(4) not null primary key,DVD 名稱 char(10) not null,主?M char(10) not null,現(xiàn)貨 int not null,庫存 int not null )create table用戶信息表(用戶編號

11、char(4) not null primary key,姓名 char(10) not null,性別 nchar not null,當前租賃int null,歷史租賃int null) create table DVD 租賃表(DVD 編號 char(4) not null,DVD 名稱 char(10) not null,租賃日期 datetime not null,租賃用戶編號 char(4) not null,租賃編號 char(20) not null primary key,foreign key(DVD 編號)references DVD foreign key( 租賃用戶編號

12、)references)create table DVD 歸還表(DVD 編號 char(4) not null,DVD 名稱 char(10) not null,歸還日期 datetime not null,逾期天數(shù)int null,歸還用戶編號 char(4) not null,歸還編號 char(20) not null primary key,foreign key(DVD 編號)references DVD foreign key( 歸還編號)references DVD foreign key( 歸還用戶編號)references)create table DVD 零售表信息l表（

13、DVD編號），用戶信息表（用戶編號）信息I表（DVD編號），租賃表（租賃編號）,用戶信息表（用戶編號）(DVD 編號 char(4) not null,DVD 名稱 char（10） not null,出售日期 date not null,出售數(shù)量 int not null,primary key（DVD編號，出售日期），foreign key（DVD 編號）references DVD信息表（DVD 編號）create table DVD 入庫表（DVD 編號 char（4） not null,DVD 名稱 char（10） not null,入庫日期 date not null,入庫數(shù)量

14、int not null,primary key（DVD編號，入庫日期），foreign key（DVD 編號）references DVD信息表（DVD 編號）第6章數(shù)據(jù)庫完整性設計6.1 主鍵表名主鍵DVD信息表（DVD編號）用戶信息表（用戶編號）DVD租賃表（租賃編號）DVD歸還表（歸還編號）DVD零售表（DVD編號，出售日期）DVD入庫表（DVD編號，入庫日期）6.2 參照完整性設計表名外鍵參照DVD租賃表（DVD編號，租賃用戶編號）DVD信息表.DVD編號用戶信息表.用戶編號DVD歸還表（DVD編號，歸還用戶編號）DVD信息表.DVD編號用戶信息表.用戶編號DVD零售表（DVD編號）

15、DVD信息表.DVD編號DVD入庫表（DVD編號）DVD信息表.DVD編號6.3 觸發(fā)器設計1 .實現(xiàn)出租時自動修改DVD現(xiàn)貨及客戶的當前租賃數(shù)量create trigger _rent on DVD租賃表-租賃觸發(fā)器for insertasbeginupdate DVD 信息表 set現(xiàn)貨=現(xiàn)貨-1from DVD 信息表 ,insertedwhere DVD 信息表.DVD 編號=inserted.DVD 編號update 用戶信息表 set當前租賃=當前租賃+1from 用戶信息表,insertedwhere 用戶信息表 用戶編號=inserted.租賃用戶編號end2 .實現(xiàn)歸還時自動

16、修改DVD現(xiàn)貨及客戶的當前租賃數(shù)量和歷史租賃數(shù)量create trigger _return on DVD 歸還表-歸還觸發(fā)器for insert as beginupdate DVD 信息表 set現(xiàn)貨=現(xiàn)貨+1from DVD 信息表 ,insertedwhere DVD 信息表.DVD 編號=inserted.DVD 編號update 用戶信息表 set當前租賃=當前租賃-1from 用戶信息表,insertedwhere 用戶信息表用戶編號=inserted.歸還用戶編號update 用戶信息表 set歷史租賃=歷史租賃+1from 用戶信息表,insertedwhere 用戶信息表用

17、戶編號=inserted.歸還用戶編號update DVD 歸還表 set DVD 編號=DVD 租賃表.DVD編號,DVD名稱=DVD 租賃表.DVD名稱，歸還用戶編號=DVD租賃表.租賃用戶編號from DVD 租賃表,DVD 歸還表 ,insertedwhere DVD 租賃表.租賃編號=inserted.歸還編號 end3 .實現(xiàn)入庫時自動修改DVD庫存create trigger _buy on DVD入庫表-入庫觸發(fā)器for insert asupdate DVD 信息表 set庫存=庫存+inserted. 入庫數(shù)量from DVD 信息表 ,insertedwhere DVD

18、信息表.DVD 編號=inserted.DVD 編號4 .實現(xiàn)零售時自動修改DVD庫存create trigger _sale on DVD 零售表-零售觸發(fā)器for insert asupdate DVD信息表 set庫存=庫存-inserted.出售數(shù)量from DVD 信息表 ,insertedwhere DVD 信息表.DVD 編號=inserted.DVD 編號5 .實現(xiàn)歸還時自動計算并存入逾期天數(shù)create trigger _days on DVD 歸還表-逾期天數(shù)觸發(fā)器for insert asdeclare days intset days=（select cast（inse

19、rted. 歸還日期 as int）-cast（DVD租賃表.租賃日期 as int）from DVD 租賃表,insertedwhere DVD 租賃表.租賃編號=inserted.歸還編號）if days（select DVD租賃表.租賃期限 from DVD 租賃表，inserted where DVD租賃表.租賃編號=inserted. 歸還編號）beginupdate DVD 歸還表set逾期天數(shù)=days-（select DVD 租賃表.租賃期限from DVD 租賃表where DVD 租賃表.租賃編號=inserted.歸還編號）from DVD 租賃表,DVD 歸還表 ,in

20、sertedwhere DVD 租賃表.租賃編號=inserted.歸還編號endelsebeginupdate DVD 歸還表set逾期天數(shù)=0from DVD 租賃表,DVD 歸還表,insertedwhere DVD 租賃表.租賃編號=inserted.歸還編號end6.4視圖設計創(chuàng)建視圖查詢各類DVD的庫存情況create view number asselect DVD 編號,DVD名稱，現(xiàn)貨，庫存 from DVD 信息表第7章數(shù)據(jù)庫存儲過程設計創(chuàng)建存儲過程統(tǒng)計某段時間內(nèi)各DVD的銷售、借還數(shù)量create procedure tongji begintime date,endti

21、me date,type char(6)asdeclare leixing char(6)set leixing=typebeginif leixing=' 零售select begintime as起始日期，endtime as 截至日期,DVD編號，SUM(出售數(shù)量)as銷售量from DVD 零售表group by DVD 編號else if leixing=' 出租'select begintime as起始日期，endtime as 截至日期，DVD 編號，count（DVD 編號）as 出租量from DVD 租賃表where 租賃日期 >=begin

22、time and 租賃日期 <二endtimegroup by DVD 編號else if leixing=' 歸還'select begintime as起始日期，endtime as 截至日期，DVD 編號,count（DVD 編號）as 歸還量from DVD 歸還表where 歸還日期 >=begintime and 歸還日期 <二endtimegroup by DVD 編號else print '請輸入正確的查詢類型 ' end總結在做本次課程設計的過程中，遇到了許多困難，正是這些困難，讓我把這門課學得更好，有了更深一步的理解，明白了

23、理論和實踐要想充分地結合，需要非常扎實的基本功。這就說明學好基礎知識是理論付諸實踐的前提。參考文獻：1 .王珊,薩師熠.數(shù)據(jù)庫系統(tǒng)概論M.高等教育出版社，20052 .鄭阿奇等.SQLServer實用教程（第3版）M.電子工業(yè)出版社，20093 .趙乃真等.信息系統(tǒng)設計與應用.清華大學出版社，2005附錄: 隨機插入用戶信息表數(shù)據(jù)存儲過程代碼:set xing= rxing%35create procedure dbo.usermassage_proc1/*為用戶表輸入數(shù)據(jù)*/asdeclare num int,rmd floatdeclare gender nchar(1) declare

24、userid intdeclare xing int,rxing int, na nvarchar(8)-姓declare ming int,rming int,me nvarchar(10)-名 declare name nvarchar(20)- 姓名 set num=0while num<1000beginset num=num+1set rmd=rand()- 產(chǎn)生的隨機數(shù) rmdif(rmd>0.5)-隨機確定性別set gender=' 男'else set gender=' 女'set rxing=floor(rmd*100)if (m

25、ing=1 andrmd<=0.5) set me='洪霞'set rming=floor(rmd*10000)-rxing*100 if xing=1beginset na='王'set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏'if (ming=2 and rmd>0.5) set me='天一'if (ming=3 and rmd>0.5) set me='洪軍'if (ming=4 and rmd>0.5) set m

26、e='天霸'if (ming=5 and rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童'if (ming=7 and rmd>0.5) set me='力凱'if (ming=8 and rmd>0.5) set me='小寶'if (ming=9 and rmd>0.5) set me='海軍'if (ming=10 and rmd>0.5) set me='勇'if (ming=11

27、 and rmd>0.5) set me='智'if (ming=12 and rmd>0.5) set me='洪志if (ming=13 and rmd>0.5) set me='志強if (ming=14and rmd>0.5) set me='云凱if (ming=15and rmd>0.5) set me='云龍if (ming=16and rmd>0.5) set me='玉衡if (ming=2 andrmd<=0.5) set me='樂樂'if (ming=3 a

28、ndrmd<=0.5) set me='洪娟'if (ming=4 andrmd<=0.5) set me='雪'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=7 andrmd<=0.5) set me='曉場'if (ming=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='

29、;思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me=&

30、#39;小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=2beginset na='李set ming= (rming%17)if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=2 andrmd>0.5) set me='天一'if (ming=3 andrmd>0.5) set me='洪軍'if (ming=4 andrmd>0.5) set me='天霸'if (ming=5

31、andrmd>0.5) set me='杰'if (ming=6 andrmd>0.5) set me='小童'if (ming=7 andrmd>0.5) set me='力凱'if (ming=8 andrmd>0.5) set me='小寶'if (ming=9 andrmd>0.5) set me='海軍'if (ming=10 andrmd>0.5) set me='勇'if (ming=11 andrmd>0.5) set me='智&#

32、39;if (ming=12 andrmd>0.5) set me='洪志if (ming=13 andrmd>0.5) set me='志強if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強'if (ming=1 andrmd<=0.5) set

33、me='洪霞if (ming=2 andrmd<=0.5) set me='樂樂if (ming=3 andrmd<=0.5) set me='洪娟if (ming=4 andrmd<=0.5) set me='雪'if (ming=7 andrmd<=0.5) set me='曉場'if (ming=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5

34、) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5)

35、set me='蓉蓉'endelse if xing=3beginset na='張'set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏if (ming=2 and rmd>0.5) set me='天一if (ming=3 and rmd>0.5) set me='洪軍if (ming=4 and rmd>0.5) set me='天霸if (ming=5 and rmd>0.5) set me='杰'if (ming=6 a

36、nd rmd>0.5) setme='小童'if (ming=7 and rmd>0.5) setme='力凱'if (ming=8 and rmd>0.5) setme='小寶'if (ming=9 and rmd>0.5) setme='海軍'if (ming=10 and rmd>0.5) setme='勇'if (ming=11 and rmd>0.5) setme='智'if (ming=12 and rmd>0.5) setme='洪志&

37、#39;if (ming=13 and rmd>0.5) setme='志強'if (ming=14and rmd>0.5) setme='云凱'if (ming=15and rmd>0.5) setme='云龍'if (ming=16and rmd>0.5) setme='玉衡'if (ming=0 and rmd>0.5) set me='克強'if (ming=1 and rmd<=0.5) set me='洪霞'if (ming=2 and rmd<

38、=0.5) setme='樂樂'if (ming=3 and rmd<=0.5) setme='洪娟'if (ming=4 and rmd<=0.5) setme='雪'if (ming=5 and rmd<=0.5) setme='冉冉'if (ming=6 and rmd<=0.5) setme='曉旭,if (ming=7 and rmd<=0.5) setme='曉場'if (ming=8 and rmd<=0.5) setme='燕'if (mi

39、ng=9 and rmd<=0.5) setme='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (

40、ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=4beginset na='劉set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏if (ming=2 and rmd>0.5) set me='天一if (ming=3 and rmd>0.5) set me='洪軍if (ming=4 and rmd>0.5) set me=

41、9;天霸if (ming=5 and rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童if (ming=7 and rmd>0.5) set me='力凱if (ming=8 and rmd>0.5) set me='小寶if (ming=9 and rmd>0.5) set me='海軍if (ming=10 and rmd>0.5) set me='勇if (ming=16 and rmd<=0.5) set me='小璐if

42、(ming=12 andrmd>0.5) set me='洪志'if (ming=13 andrmd>0.5) set me='志強'if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強'if (ming=1 andrmd<=0.5)

43、set me='洪霞'if (ming=2 andrmd<=0.5) set me='樂樂'if (ming=3 andrmd<=0.5) set me='洪娟'if (ming=4 andrmd<=0.5) set me='雪'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=7 andrmd<=0.5) set me='曉場'if (mi

44、ng=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'i

45、f (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=5beginset na='蘇set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏'if (ming=2 and rmd>0.5) set me='天一'if (ming=3 and rmd>0.5) set me='洪軍'if (ming=4 and rmd>0.5) set me='天霸'if (ming=5 and

46、rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童'if (ming=7 and rmd>0.5) set me='力凱'if (ming=8 and rmd>0.5) set me='小寶'if (ming=9 and rmd>0.5) set me='海軍'if (ming=10 and rmd>0.5) set me='勇'if (ming=11 and rmd>0.5) set me='

47、智'if (ming=12 and rmd>0.5) set me='洪志if (ming=13 and rmd>0.5) set me='志強if (ming=14and rmd>0.5) set me='云凱if (ming=15and rmd>0.5) set me='云龍if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強'if (ming=1 andrmd<=0.5) set me=&#

48、39;洪霞'if (ming=2 andrmd<=0.5) set me='樂樂'if (ming=3 andrmd<=0.5) set me='洪娟'if (ming=4 andrmd<=0.5) set me='雪'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me='曉旭'if (ming=7 andrmd<=0.5) set me='曉場'if (ming=8 andr

49、md<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=1

50、5 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=6beginset na='陳set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏'if (ming=2 and rmd>0.5) set me='天一'if (ming=3 and rmd>0.5) set m

51、e='洪軍'if (ming=4 and rmd>0.5) set me='天霸'if (ming=5 and rmd>0.5) set me='杰'if (ming=6 and rmd>0.5) set me='小童'if (ming=7 and rmd>0.5) set me='力凱'if (ming=8 and rmd>0.5) set me='小寶'if (ming=9 and rmd>0.5) set me='海軍'if (ming=10

52、 and rmd>0.5) set me='勇'if (ming=11 and rmd>0.5) set me='智'if (ming=12 and rmd>0.5) set me='洪志if (ming=13 and rmd>0.5) set me='志強if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡&#

53、39;if (ming=0 and rmd>0.5) set me='克強'if (ming=1 and rmd<=0.5) set me='洪霞if (ming=2 and rmd<=0.5) set me='樂樂if (ming=3 and rmd<=0.5) set me='洪娟if (ming=4 andrmd>0.5) set me='天霸'if (ming=5 andrmd<=0.5) set me='冉冉'if (ming=6 andrmd<=0.5) set me=

54、'曉旭'if (ming=7 andrmd<=0.5) set me='曉場'if (ming=8 andrmd<=0.5) set me='燕'if (ming=9 andrmd<=0.5) set me='思思'if (ming=10and rmd<=0.5) set me='雪嬌if (ming=11 andrmd<=0.5) set me='曉彤if (ming=12 andrmd<=0.5) set me='春琪if (ming=13 andrmd<=0.

55、5) set me='明月if (ming=14 andrmd<=0.5) set me='月'if (ming=15 andrmd<=0.5) set me='晶晶if (ming=16 andrmd<=0.5) set me='小璐if (ming=0 and rmd<=0.5) set me='蓉蓉'endelse if xing=7beginset na='楊'set ming= (rming%17)if (ming=1 and rmd>0.5) set me='力宏if (m

56、ing=2 and rmd>0.5) set me='天一if (ming=5 andrmd>0.5) set me='杰'if (ming=6 andrmd>0.5) set me='小童'if (ming=7 andrmd>0.5) set me='力凱'if (ming=8 andrmd>0.5) set me='小寶'if (ming=9 andrmd>0.5) set me='海軍'if (ming=10 andrmd>0.5) set me='勇

57、'if (ming=11 andrmd>0.5) set me='智'if (ming=12 andrmd>0.5) set me='洪志if (ming=13 andrmd>0.5) set me='志強if (ming=14and rmd>0.5) set me='云凱'if (ming=15and rmd>0.5) set me='云龍'if (ming=16and rmd>0.5) set me='玉衡'if (ming=0 and rmd>0.5) set me='克強'if (ming=1 andrmd<=0.5) set me='洪霞if (ming=2 andrmd<=0.5) set me='樂樂if (ming=3