English Ferb's Computer with Locking

No replies
Goto Page
To the start Previous 1 Next To the start
16.08.12 06:08:19 am
Up
Ferb Fletcher
User
Offline Off
I made the script, all else are working but I want the lock computer script.
Unlocked computer can everyone even Ferb can use it.
Locked computer only Ferb can use it and other else cannot access it. And only Ferb can control lock and unlock the computer.

Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
if ferb==nil then ferb={} end
ferb={}

FerbFletcher={100000}

addhook("use","ferb.computer")
function ferb.computer(id)
     local x,y=player(id,"tilex"),player(id,"tiley")
     if x==104 and y==144 then
          menu(id,"Computer,Open Computer,Sabotage Computer,Stole Computer")
     end
end

addhook("menu","ferb.computermenu")
function ferb.computermenu(id,title,buton)
     if title=="Computer" then
          if buton==1 then
               menu(id,"Desktop (Logged in as Ferb),Check Time and Date,Internet Explorer,Watch,Play Games,Format Computer")
          elseif buton==2 then
               parse("kick "..id.." \"Sorry, you cannot sabotage this computer, kicked!\"")
          elseif buton==3 then
               parse("kick "..id.." \"Sorry, you cannot stole this computer, kicked!\"")
          end
     end
     if title=="Desktop (Logged in as Ferb)" then
          if buton==1 then
               msg(os.date("Time: %I:%M %p"))
                    msg(os.date("Date: %A, %d %b %Y"))
               elseif buton==2 then
                    menu(id,"Internet Explorer,Unreal Software,Facebook,YouTube,Buy Online")
               elseif buton==3 then
                    menu(id,"Watch,Family Guy|Season 10,South Park|Season 16,The Simpsons|Season 23,Phineas and Ferb|Season 3")
               elseif buton==4 then
                    menu(id,"Play Games,Counter-Strike 2D,Stranded II")
               elseif buton==5 then
                    parse("kick "..id.." \"Sorry, you cannot format this computer, kicked!\"")
               end
          end
          if title=="Internet Explorer" then
               if buton==1 then
                    msg2(id,"©040255040Ferb Fletcher's account on Unreal Software.@C")
                    msg2(id,"©040255040Go to Users under Community, page 1544 then scroll to ID 100000.@C")
               elseif buton==2 then
                    msg2(id,"©255040040Ferb Fletcher don't have a Facebook account!@C")
               elseif buton==3 then
                    msg2(id,"©040255040You're current watching YouTube video.@C")
                    msg2(id,"©040255040For real-life please Alt-Tab and open the browser.@C")
               elseif buton==4 then
                    menu(id,"Buy Online,Deagle|$800,AK-47|$3200,M4A1|$3750,Portal Gun|$13000,Super Armor|$15000,Laser|VIP")
               end
          end
          if title=="Buy Online" then
               if buton==1 then
                    if player(id,"money")>=800 then
                         parse("equip "..id.." 3")
                         msg2(id,"©040255040You successfully order Deagle!@C")
                         parse("setmoney "..id.." "..(player(id,"money")-800))
                    else
                         msg2(id,"©255040040You don't have enough money to order this!@C")
                    end
               elseif buton==2 then
                    if player(id,"money")>=3200 then
                         parse("equip "..id.." 30")
                         msg2(id,"©040255040You successfully order AK-47!@C")
                         parse("setmoney "..id.." "..(player(id,"money")-3200))
                    else
                         msg2(id,"©255040040You don't have enough money to order this!@C")
                    end
               elseif buton==3 then
                    if player(id,"money")>=3750 then
                         parse("equip "..id.." 32")
                         msg2(id,"©040255040You successfully order M4A1!@C")
                         parse("setmoney "..id.." "..(player(id,"money")-3750))
                    else
                         msg2(id,"©255040040You don't have enough money to order this!@C")
                    end
               elseif buton==4 then
                    if player(id,"money")>=13000 then
                         parse("equip "..id.." 88")
                         msg2(id,"©040255040You successfully order Portal Gun!@C")
                         parse("setmoney "..id.." "..(player(id,"money")-13000))
                    else
                         msg2(id,"©255040040You don't have enough money to order this!@C")
                    end
               elseif buton==5 then
                    if player(id,"money")>=15000 then
                         parse("equip "..id.." 83")
                         msg2(id,"©040255040You successfully order Super Armor!@C")
                         parse("setmoney "..id.." "..(player(id,"money")-15000))
                    else
                         msg2(id,"©255040040You don't have enough money to order this!@C")
               end
               elseif buton==6 then
                         msg2(id,"©255040040Sorry, Laser is reserved for VIP only!@C")
               end
          end
          if title=="Watch" then
               if buton==1 then
                    msg2(id,"©040255040You're current watching Family Guy Season 10.@C")
                    msg2(id,"©040255040Ferb Fletcher likes it!@C")
               elseif buton==2 then
                    msg2(id,"©040255040You're current watching South Park Season 16.@C")
                    msg2(id,"©040255040Ferb Fletcher likes it!@C")
               elseif buton==3 then
                    msg2(id,"©040255040You're current watching The Simpsons Season 23.@C")
                    msg2(id,"©040255040Ferb Fletcher likes it!@C")
               elseif buton==4 then
                    msg2(id,"©040255040You're current watching Phineas and Ferb Season 3.@C")
                    msg2(id,"©040255040Ferb Fletcher likes it!@C")
               end
          end
          if title=="Play Games" then
               if buton==1 then
                    msg2(id,"©040255040You're current playing Counter-Strike 2D.@C")
                    msg2(id,"©040255040Hey, you're playing Counter-Strike 2D in real-life!@C")
               elseif buton==2 then
                    msg2(id,"©040255040You're current playing Stranded II.@C")
                    msg2(id,"©040255040For real-life, please download the game from Unreal Software.@C")
                    msg2(id,"©040255040If you have already, quit from this game and start Stranded II!@C")
               end
          end
end
edited 1×, last 16.08.12 06:38:44 am
USGN ID #100000
To the start Previous 1 Next To the start