API tools faq
paste
Advertisement
Guest User

HO_FISH 1.0 (c)

a guest
Sep 5th, 2011
141
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.53 KB | None | 0 0
raw download clone embed print report
  1. /*
  2.  
  3. || || ||||||||||||||||||||||
  4. || || || ||
  5. || || || ***** ****** || Ho_Fish 1.0
  6. || || || 0 0 ||
  7. || || || ||
  8. || || || ||
  9. || || || || ||
  10. |||||||||||||||||| || ||
  11. || || || ||
  12. || || || |____________| ||
  13. || || || ||
  14. || || || ||
  15. || || || ||
  16. || || |||||||||||||||||||||| (c)opyright by |GSR|Honig
  17.  
  18.  
  19. © 2011
  20.  
  21. */
  22.  
  23. #include <a_samp>
  24. #include <sscanf>
  25.  
  26. #define FILTERSCRIPT
  27. #define hellblau 0x33CCFFAA
  28. #define neongruen 0x22FF00CD
  29. #define hellrot 0xD10000B9
  30. #define angeldialog 98
  31. #define selldialog 99
  32. #define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
  33. //======================================================================================//
  34. #define fischpreis 3 // Hier den Preis einstellen, den man pro verkauftem Fisch bekommt.
  35. //======================================================================================//
  36.  
  37. forward IstAnAngelstelle(playerid);
  38. forward FischTimer(playerid);
  39. forward AngelTimer(playerid);
  40.  
  41. enum aInfo {
  42.  
  43. bool:Angeln[MAX_PLAYERS],
  44. Koeder,
  45. Angel,
  46. Fische,
  47. Angeltimer
  48.  
  49. }
  50. new AngelInfo[MAX_PLAYERS][aInfo];
  51.  
  52. public OnFilterScriptInit()
  53. {
  54. print("\n--------------------------------------");
  55. print(" Ho_Fish v1.0 erfolgreich geladen!");
  56. print("--------------------------------------\n");
  57. AddStaticPickup(1274,1,1023.5853,-1884.4575,12.7962,0);
  58. Create3DTextLabel("Angelshop - /ashop",0xFFFFFFFF,1023.5853,-1884.4575,12.7962,60.0,0);
  59. return 1;
  60. }
  61.  
  62. public OnFilterScriptExit()
  63. {
  64. return 1;
  65. }
  66.  
  67. public OnGameModeInit()
  68. {
  69. return 1;
  70. }
  71.  
  72. public OnGameModeExit()
  73. {
  74. return 1;
  75. }
  76.  
  77. public OnPlayerRequestClass(playerid, classid)
  78. {
  79. return 1;
  80. }
  81.  
  82. public OnPlayerConnect(playerid)
  83. {
  84. SendClientMessage(playerid,hellblau,".: Ho_Fish v1.0 - Tippe /fhilfe! :.");
  85. return 1;
  86. }
  87.  
  88. public OnPlayerDisconnect(playerid, reason)
  89. {
  90. return 1;
  91. }
  92.  
  93. public OnPlayerSpawn(playerid)
  94. {
  95. SetPlayerMapIcon(playerid, 47, 941.6310,-1896.9410,1.0692, 9, 0,MAPICON_LOCAL );
  96. SetPlayerMapIcon(playerid, 48, 833.1523,-2067.7583,12.9786, 9, 0,MAPICON_LOCAL );
  97. SetPlayerMapIcon(playerid, 49, 375.0686,-2088.7932,7.8359, 9, 0,MAPICON_LOCAL );
  98. return 1;
  99. }
  100.  
  101. public OnPlayerDeath(playerid, killerid, reason)
  102. {
  103. return 1;
  104. }
  105.  
  106. public OnVehicleSpawn(vehicleid)
  107. {
  108. return 1;
  109. }
  110.  
  111. public OnVehicleDeath(vehicleid, killerid)
  112. {
  113. return 1;
  114. }
  115.  
  116. public OnPlayerText(playerid, text[])
  117. {
  118. return 1;
  119. }
  120.  
  121. public OnPlayerCommandText(playerid, cmdtext[])
  122. {
  123. dcmd(fischeverkaufen,15,cmdtext);
  124. ////////////////////////////////////////////
  125. if(strcmp("/ashop", cmdtext, true, 10) == 0)
  126. {
  127. if(!IsPlayerInRangeOfPoint(playerid, 2.0, 1023.5853,-1884.4575,12.7962)) return SendClientMessage(playerid,hellrot,"Du bist nicht am Angelshop...");
  128.  
  129. ShowPlayerDialog(playerid,angeldialog,DIALOG_STYLE_LIST,"Angelshop","Angel kaufen ($50)\nKöder kaufen ($5)\nFische verkaufen","Wählen","Abbrechen");
  130. return 1;
  131. }
  132. if (strcmp("/angeln", cmdtext, true, 10) == 0)
  133. {
  134. if(!IstAnAngelstelle(playerid)) return SendClientMessage(playerid,hellrot,"Du bist nicht an einer Angelstelle...");
  135. if(AngelInfo[playerid][Angel] == 0) return SendClientMessage(playerid,hellrot,"Du hast keine Angel...");
  136. if(AngelInfo[playerid][Koeder] == 0) return SendClientMessage(playerid,hellrot,"Du hast keine Köder...");
  137. if(AngelInfo[playerid][Angeln]) return SendClientMessage(playerid,hellrot,"Du musst noch 1 Minute warten bis du wieder angeln kannst!");
  138.  
  139. TogglePlayerControllable(playerid, 0);
  140. SetTimerEx("FischTimer",20*1000,false,"d",playerid);
  141. SendClientMessage(playerid,neongruen,"Du wirfst deine Angel aus und wartest darauf, dass ein Fisch anbeißt...");
  142. GameTextForPlayer(playerid,"~g~Du angelst...",3000,1);
  143. AngelInfo[playerid][Angeln] = true;
  144. AngelInfo[playerid][Koeder] -= 1;
  145. return 1;
  146. }
  147. if(strcmp("/fhilfe", cmdtext, true, 10) == 0)
  148. {
  149. SendClientMessage(playerid, hellblau," ");
  150. SendClientMessage(playerid, hellblau,"|======================= FISCH HILFE =====================|");
  151. SendClientMessage(playerid, hellblau,"| /angeln - An einer Angelstelle fischen");
  152. SendClientMessage(playerid, hellblau,"| /ashop - Das Angelshopmenü öffnen");
  153. SendClientMessage(playerid, hellblau,"| /fischeverkaufen - Fische auf dem Markt verkaufen ");
  154. SendClientMessage(playerid, hellblau,"| /ainfo - Fischinformationen einsehen ");
  155. return 1;
  156. }
  157. if(strcmp("/ainfo", cmdtext, true, 10) == 0)
  158. {
  159. new route = AngelInfo[playerid][Angel];
  160. new wuermer = AngelInfo[playerid][Koeder];
  161. new fishs = AngelInfo[playerid][Fische];
  162. new string[56];
  163. format(string,sizeof(string),"| Fischinfo | Angel: %d | Köder: %d | Fische: %d |",route,wuermer,fishs);
  164. SendClientMessage(playerid,hellblau,string);
  165. return 1;
  166. }
  167. return 0;
  168. }
  169.  
  170. dcmd_fischeverkaufen(playerid,params[])
  171. {
  172. new anzahl;
  173. if(sscanf(params,"i",anzahl)) return SendClientMessage(playerid,hellrot,"Benutze: /fischeverkaufen [Anzahl]!");
  174. if(!IsPlayerInRangeOfPoint(playerid, 2.0, 1023.5853,-1884.4575,12.7962)) return SendClientMessage(playerid,hellrot,"Du bist nicht am Angelshop...");
  175. if(AngelInfo[playerid][Fische] == 0) return SendClientMessage(playerid,hellrot,"Du hast keine Fische!");
  176. if(AngelInfo[playerid][Fische] <= anzahl) return SendClientMessage(playerid,hellrot,"Du hast nicht soviele Fische!");
  177.  
  178. new string[56];
  179. new geld = fischpreis*anzahl;
  180. format(string,sizeof(string),"Du hast %d Fische verkauft und bekommst dafür $%d!",anzahl,geld);
  181. SendClientMessage(playerid,neongruen,string);
  182. AngelInfo[playerid][Fische] -= anzahl;
  183. GivePlayerMoney(playerid, geld);
  184. return 1;
  185. }
  186.  
  187. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  188. {
  189. return 1;
  190. }
  191.  
  192. public OnPlayerExitVehicle(playerid, vehicleid)
  193. {
  194. return 1;
  195. }
  196.  
  197. public OnPlayerStateChange(playerid, newstate, oldstate)
  198. {
  199. return 1;
  200. }
  201.  
  202. public OnPlayerEnterCheckpoint(playerid)
  203. {
  204. return 1;
  205. }
  206.  
  207. public OnPlayerLeaveCheckpoint(playerid)
  208. {
  209. return 1;
  210. }
  211.  
  212. public OnPlayerEnterRaceCheckpoint(playerid)
  213. {
  214. return 1;
  215. }
  216.  
  217. public OnPlayerLeaveRaceCheckpoint(playerid)
  218. {
  219. return 1;
  220. }
  221.  
  222. public OnRconCommand(cmd[])
  223. {
  224. return 1;
  225. }
  226.  
  227. public OnPlayerRequestSpawn(playerid)
  228. {
  229. return 1;
  230. }
  231.  
  232. public OnObjectMoved(objectid)
  233. {
  234. return 1;
  235. }
  236.  
  237. public OnPlayerObjectMoved(playerid, objectid)
  238. {
  239. return 1;
  240. }
  241.  
  242. public OnPlayerPickUpPickup(playerid, pickupid)
  243. {
  244. return 1;
  245. }
  246.  
  247. public OnVehicleMod(playerid, vehicleid, componentid)
  248. {
  249. return 1;
  250. }
  251.  
  252. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  253. {
  254. return 1;
  255. }
  256.  
  257. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  258. {
  259. return 1;
  260. }
  261.  
  262. public OnPlayerSelectedMenuRow(playerid, row)
  263. {
  264. return 1;
  265. }
  266.  
  267. public OnPlayerExitedMenu(playerid)
  268. {
  269. return 1;
  270. }
  271.  
  272. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  273. {
  274. return 1;
  275. }
  276.  
  277. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  278. {
  279. return 1;
  280. }
  281.  
  282. public OnRconLoginAttempt(ip[], password[], success)
  283. {
  284. return 1;
  285. }
  286.  
  287. public OnPlayerUpdate(playerid)
  288. {
  289. return 1;
  290. }
  291.  
  292. public OnPlayerStreamIn(playerid, forplayerid)
  293. {
  294. return 1;
  295. }
  296.  
  297. public OnPlayerStreamOut(playerid, forplayerid)
  298. {
  299. return 1;
  300. }
  301.  
  302. public OnVehicleStreamIn(vehicleid, forplayerid)
  303. {
  304. return 1;
  305. }
  306.  
  307. public OnVehicleStreamOut(vehicleid, forplayerid)
  308. {
  309. return 1;
  310. }
  311.  
  312. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  313. {
  314. if(dialogid == angeldialog)
  315. {
  316. if(response)
  317. {
  318. if(listitem == 0)
  319. {
  320. if(GetPlayerMoney(playerid) <= 50) return SendClientMessage(playerid,hellrot,"Du hast nicht genug Geld...");
  321. if(AngelInfo[playerid][Angel] != 0) return SendClientMessage(playerid,hellrot,"Du hast schon eine Angel...");
  322.  
  323. GivePlayerMoney(playerid, -50);
  324. SendClientMessage(playerid,hellblau,"Du hast dir eine Angel gekauft!");
  325. AngelInfo[playerid][Angel] = 1;
  326. }
  327. if(listitem == 1)
  328. {
  329. if(GetPlayerMoney(playerid) <= 5) return SendClientMessage(playerid,hellrot,"Du hast nicht genügend Geld...");
  330. if(AngelInfo[playerid][Koeder] != 0) return SendClientMessage(playerid,hellrot,"Du hast schon einen Köder!");
  331.  
  332. GivePlayerMoney(playerid, -5);
  333. SendClientMessage(playerid,hellblau,"Du hast dir 5 Köder gekauft!");
  334. AngelInfo[playerid][Koeder] = 5;
  335. }
  336. if(listitem == 2)
  337. {
  338. SendClientMessage(playerid,hellblau,"Willkommen auf dem Fischmarkt! Wenn du Fische verkaufen möchtest");
  339. SendClientMessage(playerid,hellblau,"tippe /fischeverkaufen [Anzahl]!");
  340. }
  341. }
  342. }
  343. return 1;
  344. }
  345.  
  346. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  347. {
  348. return 1;
  349. }
  350.  
  351. public IstAnAngelstelle(playerid)
  352. {
  353. if(IsPlayerInRangeOfPoint(playerid,3.0,941.6310,-1896.9410,1.0692) || IsPlayerInRangeOfPoint(playerid,3.0,833.1523,-2067.7583,12.9786) || IsPlayerInRangeOfPoint(playerid,3.0,375.0686,-2088.7932,7.8359))
  354. {
  355. return 1;
  356. }
  357. return 0;
  358. }
  359.  
  360.  
  361. public FischTimer(playerid)
  362. {
  363. TogglePlayerControllable(playerid, 1);
  364. GameTextForPlayer(playerid,"~g~ ! ",1000,1);
  365. new fische = random(4);
  366. if(fische == 1) { SendClientMessage(playerid,hellblau,"Du hast einen Goldfisch gefangen!"); AngelInfo[playerid][Angeln] = false; SetTimerEx("AngelTimer",60*1000,false,"d",playerid); AngelInfo[playerid][Fische] += 1; }
  367. else if(fische == 2) { SendClientMessage(playerid,hellblau,"Du hast eine Forelle gefangen!"); AngelInfo[playerid][Angeln] = false; SetTimerEx("AngelTimer",60*1000,false,"d",playerid); AngelInfo[playerid][Fische] += 1; }
  368. else if(fische == 3) { SendClientMessage(playerid,hellblau,"Du hast einen Thunfisch gefangen!"); AngelInfo[playerid][Angeln] = false; SetTimerEx("AngelTimer",60*1000,false,"d",playerid); AngelInfo[playerid][Fische] += 1; }
  369. else if(fische == 4) { SendClientMessage(playerid,hellblau,"Du hast einen Schwertfisch gefangen!"); AngelInfo[playerid][Angeln] = false; SetTimerEx("AngelTimer",60*1000,false,"d",playerid); AngelInfo[playerid][Fische] += 1; }
  370. else if(fische == 0) { SendClientMessage(playerid,hellrot,"Du hattest leider kein Glück und hast nichts gefangen... "); AngelInfo[playerid][Angeln] = false; }
  371. return 1;
  372. }
  373.  
  374. public AngelTimer(playerid)
  375. {
  376. AngelInfo[playerid][Angeln] = true;
  377. return 1;
  378. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!