Advertisement
Guest User

Untitled

a guest
Mar 26th, 2021
43
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.99 KB | None | 0 0
  1. dmapdata script DarkRegion //start
  2. {
  3. void run(int radius, int itemClass)
  4. {
  5. unless(darkness_bmp->isValid())
  6. darkness_bmp = create(256 * 3, 176 * 3);
  7. else
  8. recreate(darkness_bmp, 256 * 3, 176 * 3);
  9.  
  10. Waitframe();
  11. Trace(darkness_bmp->Width);
  12.  
  13. while(true)
  14. {
  15. Waitdraw();
  16.  
  17. int id = GetHighestLevelItemOwned(itemClass);
  18. itemdata idata = id < 0 ? NULL : Game->LoadItemData(id);
  19. int power = idata ? idata->Attributes[9] : 0;
  20. int mode = idata ? (idata->Flags[14] ? BITDX_TRANS : 0) : 0;
  21.  
  22. darkness_bmp->ClearToColor(0, C_BLACK);
  23.  
  24. if (power)
  25. darkness_bmp->Circle(0, Hero->X + 8 + 256, Hero->Y + 8 + 176, radius * power, C_BLUE, 1, 0, 0, 0, true, OP_OPAQUE);
  26.  
  27. if (Input->Button[CB_EX4])
  28. darkness_bmp->Write(7, "Test.png", true);
  29.  
  30. darkness_bmp->Blit(7, -2, 256 - Game->Scrolling[SCROLL_NX], 176 - Game->Scrolling[SCROLL_NY], 256, 176, 0, 0, 256, 176, 0, 0, 0, /*mode*/ 1, 0, true);
  31.  
  32. Waitframe();
  33. }
  34. }
  35.  
  36. } //end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement