Jump to content
  • 0

[EDITED] headgear sprite changer

screamsoflust

Asked by screamsoflust,

 Share

Question

screamsoflust Poring

screamsoflust

Posted
  • Group:  Members
  • Topic Count:  3
  • Topics Per Day:  0.00
  • Content Count:  10
  • Reputation:   0
  • Joined:  04/08/16
  • Last Seen:  
Posted (edited)

EDIT:

I saw this script and tried it out, and it works fine with some little tweaks.

basically this script changes the headgear sprite when you whisper the npc

 

what I want to ask is how can I remove the sprite when I remove the headgear? coz when I remove the headgear, the disguise sprite is still there. 

//Morphogenic Hat Script
//Allows a player to change their look to absolutely any hat available or to a defined upper limit. Check the "OnInit" label for information on this.
//
//By Slam

-	script	Morpho	-1,{
	OnWhisperGlobal:
		goto Validation_whisp;
		end;

	Validation_whisp:
		set .@var0$, @whispervar0$;
		set .@var1$, @whispervar1$;
	//	set .@i,0;
	//	while(.@i < getarraysize(.morpho_disallowed)){
        //           if(@whispervar1$ == .morpho_disallowed$[.@i]){
        //                goto denied_unauthorized;
        //            } else {
        //                set .@i,.@i+1;
        //            }
        //        }
		set .@ii,0;
		while(.@ii < 6){
			if(@whispervar0$ == .keywords$[.@ii]){
				goto keyword;
			}
		set .@ii,.@ii+1;
		}
		dispbottom "---------------[Morphohat Helper]---------------";
		dispbottom " ";
		dispbottom "Sorry, I didn't understand the option you have";
		dispbottom "have given me. Please type 'help' for more info";
		dispbottom " ";
		end;

	keyword:

	switch(.@ii){

		case 0:
			goto help;

		case 1:
			goto tophead;

		case 2:
			goto midhead;

		case 3:
			goto lowhead;

		case 4:
			goto clear;

		case 5:

			goto info;

}

	help:

		dispbottom "---------------[Morphohat Helper]---------------";
		dispbottom " ";
		dispbottom "Welcome to the Morphohat Settings NPC!";
		dispbottom "I can help you set what your Morphohat looks like";
		dispbottom " ";
		dispbottom "To use this NPC, whisper NPC:Morpho (you should";
		dispbottom "know this already) with upper/middle/lower or ";
		dispbottom "wing. The wing section is not yet implemented";
		dispbottom "however. Now, to set your Morphohat use the ";
		dispbottom "following layout:";
		dispbottom " ";
		dispbottom "upper#5232 - This will make it a Pink Kitty";
		dispbottom " ";
		dispbottom "Protip: Use RateMyServer.net for item IDs.";
		end;

	tophead:

		if(!isequipped(.top_morpho)){
			goto wrong_headgear;
		}

		set .@viewid,getiteminfo(.@var1$,11);
		set .@equipslot,getiteminfo(.@var1$,5);
	//	if(.@equipslot != 256 && .@equipslot != 768){ //Upper and Upper+Mid Only. Comment out this line and the two below it to remove this functionality.
	//		goto denied_wrongslot;
	//	}
		set viewid_top,.@viewid;
		if(.@viewid != 0 && .@viewid != -1){
			dispbottom "Selected headgear ID: "+.@viewid;
				setlook 4,.@viewid;
		} else {
                dispbottom "Invalid headgear ID.";
                }
		end;

	midhead:

        if(!isequipped(.mid_morpho)){
            goto wrong_headgear;
        }
        set .@viewid,getiteminfo(.@var1$,11);
		set .@equipslot,getiteminfo(.@var1$,5);
     //   if(.@equipslot != 512 && .@equipslot != 513){ //Mid and Mid+Lower only. Comment out this line and the two below it to remove this functionality.
     //       goto denied_wrongslot;
     //   }
        set viewid_mid,.@viewid;
        if(.@viewid != 0 && .@viewid != -1){
        dispbottom "Selected headgear ID: "+.@viewid;
        setlook 5,.@viewid;
        } else {
        dispbottom "Invalid headgear ID.";
        }


        end;

	lowhead:

        if(!isequipped(.low_morpho)){
             goto wrong_headgear;
        }
        set .@viewid,getiteminfo(.@var1$,11);
		set .@equipslot,getiteminfo(.@var1$,5);
      //  if(.@equipslot != 1){ // Lower Only. Comment out this line and the two below it to remove this functionality.
      //      goto denied_wrongslot;
      // }
        set viewid_low,.@viewid;
        if(.@viewid != 0 && .@viewid != -1){
        dispbottom "Selected headgear ID: "+.@viewid;
        setlook 3,.@viewid;
        } else {
        dispbottom "Invalid headgear ID.";
        }

        end;

	clear:

		set viewid_low, 0;
		set viewid_mid, 0;
		set viewid_top, 0;
		if (getequipid(1) == .top_morpho)
			setlook 5,0;
		if (getequipid(9) == .mid_morpho)
			setlook 4,0;
		if (getequipid(10) == .low_morpho)
			setlook 3,0;
		dispbottom "Your Morphing Hats list has been cleared.";
		end;

	info:

		dispbottom "---------------[Morphohat Helper]---------------";
		dispbottom " ";
		dispbottom "You currently have the following items set for your Morpho hat:";
		dispbottom "Upper - "+viewid_top;
		dispbottom "Middle - "+viewid_mid;
		dispbottom "Lower - "+viewid_low;
		end;

	denied_wrongslot:
		dispbottom "Sorry, this headgear was not designed for this headgear slot.";
		end;

	denied_unauthorized:

		dispbottom "Sorry, you cannot change your Morphohat into this headgear. Please try another.";
		end;

	wrong_headgear:

		dispbottom "Sorry, you do not currently have your Morphohat equipped. Please equip it and try again!";

		end;

	OnInit:
		//Array of keywords for the script
		setarray .keywords$[0],"help","upper","middle","lower","clear","info","wing";

		//Change this to the upper limit of the headgears that you wish to make available
		setarray .morpho_disallowed$[0],"9001","5386","5387","5391","5394","5407","5408","5419","5428","5436","5437","5438","5439","5440","5441","5442","5443","5444","5445","5446","5447","5448","5449","5459","5481","5486","5487","5488","5492","5493","5494","5495","5508","5516","5517","5520","5532","5533","5534","5535","5540","5541","5542","5543","5544","5551","5552","5553","5560","5561","5562","5571","5575","5576","5577","5578","5583","5584","5587","5595","5600","5601","5602","5603","5604","5605","5606","5607","5608","5609","5610","5611","5612","5613","5614","5615","5616","5617","5618","5619","5620","5621","5622","5623","5624","5625","5626","5627","5628","5629","5630","5631","5632","5633","5634","5635","5636","5637","5638","5639","5640","5641","5642","5643","5644","5645","5646","5647","5648","5649","5650","5651","5652","5653","5654","5655","5656","5657","5658","5659","5660","5661","5662","5663","5664","5665","5666","5667","5668","5669","5670","5671","5672","5673","5674","5675","5676","5677","5678","5679","5680","5681","5682","5683","5684","5685","5686","5687","5688","5689","5690","5691","5692","5693","5694","5695","5696","5697","5698","5699","5700","5701","5702","5703","5704","5705","5706","5707","5708","5709","5710","5711","5712","5713","5714","5715","5716","5717","5718","5719","5720","5721","5722","5723","5724","5725","5726","5727","5728","5729","5730","5731","5732","5733","5734","5735","5736","5737","5738","5739","5740","5741","5742","5743","5744","5745","5746","5747","5748","5749","5750","5751","5752","5753","5754","5755","5756","5757","5758","5759","5760","5761","5762","5763","5764","5765","5766","5767","5768","5769","5770","5771","5772","5773","5774","5775","5776","5777","5778","5779","5780","5781","5782","5783","5784","5785","5786","5787","5788","5789","5790","5791","5792","5793","5794","5795","5796","5797","5798","5799","5809","5812","5814","5824","23134","5070"; //inb4OVERNINETHOUSAND

		//Equip IDs - Change these to the ID numbers of the hat you wish to designate as the Morphing hat
		set .top_morpho,25092;
		set .mid_morpho,25093;
		set .low_morpho,25094;
		end;
}
//Use 'callfunc "MorphoEquip",<1,2,3>;' for the "OnEquip" script to let people know that they need to set the view ID or to set the viewid if the person has already set one.
//If you wish to make the "Morph" an Account bound variable, simply change all instances of "viewid_" with "#viewid_"
function	script	MorphoEquip	{
	set .@equipslot,getarg(0);
	switch(.@equipslot) {
		case 1:  //Upper
			if (!uppernotify) {
					dispbottom "No headgear set for upper. PM \"NPC:Morpho\" with the word \"help\" for more information.";
					set uppernotify,1;
					end;
				}
			setlook 4,viewid_top;
			end;
		case 2: //Mid
			
			if (!middlenotify) {
					dispbottom "No headgear set for middle. PM \"NPC:Morpho\" with the word \"help\" for more information.";
					set middlenotify,1;
					end;
				}
			setlook 5,viewid_mid;
			end;
		case 3: //Lower
			if (!lowernotify) {
				dispbottom "No headgear set for lower. PM \"NPC:Morpho\" with the word \"help\" for more information.";
				set lowernotify,1;
				end;
			}
			setlook 3,viewid_low;
			end;
    }
}

 

Edited by screamsoflust
Link to comment
Share on other sites

3 answers to this question

Recommended Posts

  • -1
screamsoflust Poring

screamsoflust

Posted
  • Group:  Members
  • Topic Count:  3
  • Topics Per Day:  0.00
  • Content Count:  10
  • Reputation:   0
  • Joined:  04/08/16
  • Last Seen:  
  • Author
Posted

sorry, bump again.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
 Share
Go to question listing
×
×
  • Create New...