GRAG1 GRAG0:30600FLAG1 1670N 53280,0:53281,0:FLAG1( EX(X)(27624)(27625)256(27626)655362 HL(X)(27392X)256(27392X1)< I$(16),ID$(16),SA(50),IN$(256)FX18:R$(X):X:C$(16):X016:C$(X): PX16:AT$(X):H ZX116:I$(X):Y116:D:ID$(X)ID$(X)(D)::e dX1255:IN$(X):X:170 n DWARF,ELF,GNOME,HALF-ELF,HALFLING,FLAF-ORC,HUMAN,MONSTER x CLERIC,DRUID,FIGHTER,MAGIC-USER,MAGIC-USER,MAGIC-USER,THEIF,MONK, CLERIC/FIGHTER,CLERIC/FIGHTER/MAGIC-USER,CLERIC/MAGIC-USERq CLERIC/MAGIC-USER,CLERIC/THEIF,FIGHTER/MAGIC-USER,FIGHTER/THEIF FIGHTER/MAGIC-USER/THEIF,MAGIC-USER/THEIF STR,INT,WIS,DEX,CON,CHR AD27392: 1670 190 " 1) "; X019:(XAD)0((ADX));: ""M RA(AD114):" 2) ";R$(RA);" 3) AGE";] HL(116)z " 4) ";C$((AD115))  " 5) ";AT$(1);"";(AD20);"11) (";(AD26);")" X14:"";X5;") ";AT$(X1);"";(AD20X):  "10) ";AT$(6);"";(AD205) "P , "12) LEVEL";(AD160),"13) EXP"; EX(1)t 6"14) HITPOINTS";(AD118): @ "15) JEWELERY"; HL(199) J "16) GEMS"; HL (197) T "17) PLATINUM"; HL(195) ^ "18) GOLD"; HL(193) h "19) ELECTRUM"; HL(191)7 r "20) SILVER"; HL(189)W | "21) COPPER"; HL(187)]   "CHANGE (0 FOR MENU)";CH  CH10 440  CH1 1670,450,550,620,690,760,810,860,910,960,1010  190 CH10 1060,1130,1650,1180,1230,1280,1330,1380,1430,1480,1530MN$"":X019:(XAD)0N$N$((ADX)):XW ""r "CURRENT NAME:";N$ "CHANGE NAME TO:";NN$ (NN$)19 "TOO LONG! (< 19 LETTERS)":480 NN$""  1590 YN0 ,L(NN$):X0L1:ADX,((NN$,X1,1)):X:NN$"":N$""GXL19:ADX,0::180Q& ""w0 "CURRENT RACE:";R$((AD114)):X18:"";X;") ";R$(X):D "NEW RACE:";NRN NR1 NR8 "1-8 ONLY!":580X1590:YN0180bAD114,NR: 180l "")v "CURRENT AGE:"; HL(116)O "CHANGE AGE TO (0-32767):";NA NA0 NA32767 "0-32767 ONLY!":570 1590: YN0 AD116,NA 255:AD117,(NA256) 180 "" "CURRENT CLASS:";C$((AD115))X116:"";X;") ";C$(X):/ "NEW CLASS:";NCY NC1 NC16 "1-16 ONLY!":720k1590:YN0AD115,NC: 180 "" "CURRENT STRENTH:";(AD20)  "NEW STRENTH:";NS NS0 NS255 "0-255 ONLY!": 780 AD20,NS:180* "";4 "CURRENT INTELLEGENCE:";(AD21)Z> "NEW INTELLEGENCE:";NIH NI0 NI255 "0-255 ONLY!": 830RAD21,NI:190\ ""f "CURRENT WISDOM:";(AD22)p "NEW WISDOM:";NW z NW0 NW255 "0-255 ONLY!": 880 AD22,NW:190* ""P "CURRENT DEXTERITY:";(AD22)l "NEW DEXTERITY:";ND ND0 ND255 "0-255 ONLY!": 930AD23,ND:190 "" "CURRENT CONSTITUTION:";(AD24) "NEW CONSTITUTION:";NC+ NC0 NC255 "0-255 ONLY!": 980>AD24,NC:190H ""l "CURRENT CHRISMA:";(AD25) "NEW CHRISMA:";NC NC0 NC255 "0-255 ONLY!": 1030AD25,NC:190$"":(AD20)18"STRENTH MUST BE 18!": 1080 . 1090 8X1999:: 190JB "CURRENT STRENTH BONUS:";(AD26)jL "NEW STRENTH BONUS:";NBV NB0 NB255 "0-255 ONLY!": 1100`AD26,NB:190j ""t"CURRENT LEVEL:";(AD160)~"NEW LEVEL:";NL NL0NL255"0-255 ONLY!":1150*AD160,NL:1904 ""Z"CURRENT HITPOINTS:";(AD118)u"NEW HITPOINTS:";NP NP0NP255"0-255 ONLY!":1200AD118,NP:190"": "CURRENT JEWELERY:"; HL(199) "CHANGE JEWELERY TO (0-32767):";NJ8 NJ0 NJ32767 "0-32767 ONLY!":1240_AD199,NJ 255:AD200,(NJ256)i 190"": "CURRENT GEMS:"; HL(197)  "CHANGE GEMS TO (0-32767):";NJ NJ0 NJ32767 "0-32767 ONLY!":1290AD197,NJ 255:AD198,(NJ256)( 190D2"": "CURRENT PLATINUM:"; HL(195)o< "CHANGE PLATINUM TO (0-32767):";NJF NJ0 NJ32767 "0-32767 ONLY!":1340PAD195,NJ 255:AD196,(NJ256)Z 190d"": "CURRENT GOLD:"; HL(193)n "CHANGE GOLD TO (0-32767):";NJPx NJ0 NJ32767 "0-32767 ONLY!":1390wAD193,NJ 255:AD194,(NJ256) 190"": "CURRENT ELECTRUM:"; HL(191) "CHANGE ELECTRUM TO (0-32767):";NJ NJ0 NJ32767 "0-32767 ONLY!":1440/AD191,NJ 255:AD192,(NJ256)9 190b"": "CURRENT SILVER:"; HL(189) "CHANGE SILVER TO (0-32767):";NJ NJ0 NJ32767 "0-32767 ONLY!":1490AD189,NJ 255:AD190,(NJ256) 190"": "CURRENT COPPER:"; HL(187)? "CHANGE COPPER TO (0-32767):";NJp NJ0 NJ32767 "0-32767 ONLY!":1540AD187,NJ 255:AD188,(NJ256)" 190,6 YN@ "ARE YOU SURE (Y/N)?"J A$:A$""1610T A$"Y" YN1^ A$"Y" YN0hEr "OK... IT IS AT THE MAX":X0999:r|AD232,255:AD233,255:AD234,255:180 " POOL OF RADIANCE CHARACTER EDITOR "; " BY: CRACKED 1 - OR STEVE KRULEWITZ "; " THANKS TO TARJAN FOR OPTION #2 ":AD273929,"1) LOAD CHARACTER"Z,"2) MAKE ALL + WEPONS +5"u,"3) EDIT CHARACTER","4) SAVE CHARACTER","5) ADD SPECIAL ITEMS","6) MANIPULATE ITEMS"NA$"":N$"":X019:(XAD)0N$N$((ADX)):&"CURRENT CHARCTER NAME:";N$D " CHOICE";CVC1C61670yC1"NAME";NA$:""NA$,8,1C11830,1890,1900,1970,2600& X27648 27972:P(X)0P162P163P164P1651860:X:1670DP161(X2)X,166:X2,5: 18505NP161(X3)X,166:X3,5: 1850@X 1850Jb 180nl "SAVE NAME";N$:F$""N$:D8vA127392:A227972:15,8,15,"S0:"F$:15:A$F$L(53)256(54)(A$):782,L256:781,L(782)256780,(A$):65469 TA1:254,T256:253,T(254)256:780,253M TA21:782,T256:781,T(782)256:65496W 1670 SL0:X276642789616:(X)0 SLSL1:SA(SL)X X: SL0 "NOT ENOUGH ROOM!":X0999::1670  "":X116:"";X;") ";I$(X):! ">SPACE LEFT:";SL6! "ITEM TO ADD (0 TO MENU)";AD: AD0 1670l! AD0 AD16 "1-16 ONLY!":X0999::1990!X116:SA(1)X1,((ID$(AD),X,1)):X!X1SL1:SA(X)SA(X1):X:SLSL1: SL0 1990! 1670" DUST OF DISSAPEARANCE,70,194,167,96,1,0,0,0,20,0,0,64,31,1,86,0_"NECKLACE OF MISSLES,70,228,167,119,2,0,0,0,0,0,0,179,4,4,87,0" RING OF FEATHERFALLING,90,238,167,66,3,0,0,0,0,0,0,136,19,0,0,0"*LONG SWORD +2/FLAMETONGUE,36,241,163,36,1,0,0,0,250,0,0,172,13,0,3,136;#4TWO-HANDED SWORD +1 +3 VS UNDEAD,38,253,162,38,1,0,0,0,250,0,0,172,13H#>0,3,136#HJAVELIN OF LIGHTNING,71,157,167,21,1,0,0,0,20,0,0,184,11,1,83,0#RWAND OF LIGHTNING,78,157,167,69,10,0,0,0,10,0,0,48,117,20,51,0$\EFREETI BOTTLE,82,0,233,232,10,0,0,0,0,0,0,184,136,0,0,0W$fWAND OF MAGIC MISSILES,79,206,167,69,10,0,0,0,20,0,0,32,78,30,88,0$pRING OF PROTECTION +1,93,162,224,66,1,0,0,0,0,0,0,16,39,0,0,0$zPOTION OF GIANT STRENTH,84,239,167,64,1,0,0,0,25,0,0,244,1,1,82,0%PLATE MAIL +2,58,163,48,58,2,0,0,0,194,1,0,4,41,0,0,0Z%POTION OF SPEED,70,173,167,64,1,0,0,0,25,0,0,88,2,1,80,0%CLOAK OF DISPLACEMANT,92,170,167,88,2,0,0,0,30,0,0,92,68,0,89,133%BRACERS AC3,77,0,223,79,7,0,0,0,0,0,0,8,82,0,0,0 &RING OF FIRE RESISTANCE,69,205,167,66,3,0,0,0,0,0,0,136,19,0,61,129&&r&BATTLE AXE,HANDE AXE,BARDICHE,BEC DE CORBIN,BILL-GUSARME,BO STICK,CLUB&DAGGER,DART,FAUCHARD,FRAUCHARD-FORK,FLAIL,MILITARY FORK,GLAIVE&GLAIVE-GUSARME,GUSARME,GUSARME-VOULGE,HALBERD,LUCERN HAMMER,HAMMER ' JAVILINV'JO STICK,MACE,MORING STAR,PARTISAN,MILITARY PICK,AWL PIKE,QUARREL(S)'RANSEUR,SCIMITAR,SPEAR,SPETUM,QUATER STAFF,BASTARD SWORD,BROARD SWORD'LONG SWORD,SHORT SWORD,TWO-HANDED SWORD,TRIDENT,VOULGE( COMPOSITE LONG BOW,COMPOSITE SHORT BOW,LONG BOW,SHORT BOWg( HEAVE CROSSBOW,LIGHT CROSSBOW,SLING,MAIL,ARMOR,LEATHER,PADDED,STUDDEDx( RING,SCALE($ CHAIN,SPLINT,BANDED,PLATE,SHIELD,WOOD,ARROW(S),,,POTION,SCROLL,RING ). ROD,STAVE,WAND,JUG,AMULET,APPARATUS,BAG,BEAKER,BOAT,BOOK,BOOTS,BOWLS)8 BRACERS,BRAZIER,BROOCH,BROOM,PURSE,CANDLE,CARPET,CENSER,CHIME,CLOAK)B CRYSTAL,CUBE,CUBIC,FORTRESS,DECANTER,DECK,DRUMS,DUST,EYES,FIGURIENE)L FLASK,GAUNTLETS,GEM,GIRDLE,HELM,HORN,HORSESHOES,INCENCE,STONE)V INSTRUMENT,JAVILIN,JEWELJ*` OINTMENT,LIBRAM,LYRE,MANUAL,MATTOCK,MAUL,MEDALLION,MIRROR,NECKLACE,NET*j PIGMENT,PEARL,PERIAPT,PHYLACTERY,PIPES,HOLE,TOKEN,ROBE,ROPE,RUG,SAW*t SCARAB,SPADE,SPHERE,STONE,TALISMAN,TOME,TRIDENT,GRIMORE,WELL,WINGS*~ VIAL,LANTERN,MIRROR?+ FLASK OF OIL,10' POLE,50' ROPE,IRON,THEVES' PICK & TOOLS,IRON RATIONS+ STANDARD RATIONS,HOLY SYMBOL,VIAL OF HOLY WATER,VIAL OF UNHOLY WATER+ BARDING,DRAGON,LIGHTNING,SADDLE,SMALL RAFT,CART,WAGON,+1,+2,+3,+4,+5, OF,,CLOAK,DISPLACEMENT,TORCH(ES),OIL,SPEED,TAPESTRY,BODILE HEALTHa, COPPER,SILVER,ELECTRUM,GOLD,PLATINUM,OINTMENT,KEOGHTUM'S,SHEET(S), STRENTH,HEALING,HOLDING,EXTRA,GASEOUS FORM,SLIPPERINESS,JEWELED,FLYING, TREASURE FINDING,FEAR,DISSAPERANCE,STATUETTE,FUNGUS,CHAINS(S),PENDANT7- BROACH,OF SEEKING,-1,-2,-3,LIGHTNING BOLT,FIRE RESISTANCEw- MAGIC MISSILES,SAVE,CLERICAL SCROLL,MU SCROLL,WITH 1 SPELL- WITH 2 SPELLS,WITH 3 SPELLS,PROTECTION SCROLL,JEWELERY,FINE,HUGE,BONE . BRASS,KEY,AC2,AC6,AC4,AC3,OF PROTECTION,PARALYZATION,OF PROTECTIONN. INVISIBILITY,MISSILES,ELVENKIND,ROTTING,COVERED,EFREETI,BOTTLE. MISSILE ATTRACTOR,OF MAGLUBIYET,SECR DOOR & TRAP DECT. GOOD DRAGON CONTROL,FEATHER FALLING,GIANT STRENGTH,RESTORATION/ /FLAMETOUNGE,FIREBALLS,SPIRITUAL,BOULDER,DIAMOND,EMERALD,OPAL,SAPHIREV/ OF TYR,OF TEMPUS,OF SUNE,WOODEN,+3 VS UNDEAD,PASS,CURSED\/( :/2 A327665: "CURRENT POSSESIONS:":IN1/< (A31IN16)02660/F "";IN;")";/P XA32(IN16)A3(IN16)1/Z IN$((X));" ";:X: 0d ININ1: IN1726200n :)0x ,"A)LOAD ITEM"C0} ,"B)DELETE ITEM"0 : "ITEM TO MODIFY (0 FOR MENU)";IM$:IM$"0" 16700 IM$"A" 30100 IM$"B""ITEM";MM:AA(A31)(MM16):XAAAA15:X,0:0 IM$"B"26000 IM(IM$)1 A4(A31)(IM16)A1 :IN$IN$((A43))" "IN$((A42))" "IN$((A41))n1 (IN$,(IN$),1)" "IN$(IN$,(IN$)1)1 ">NAME:";IN$1 "1>EQUPPED:";1 (A46)0"NO"1 (A46)128"YES"1 "2>AMOUNT:";(A410)2 "3>CHARGES:";(A413)&2 "4>PLUS VALUE:";(A44);2 "5>SAVE ITEM"r2 "NUMBER TO CHANGE (0 FOR LIST)";CN:CN026102 CN5CN028302" CN5 29402, CN1292026 CN2Z102@ CN3Z132J CN4Z43T "NEW VALUE";NV:NV1NV256ZA4,NV3^ :2730P3h "1) FOR NO 2) FOR YES";A:A1A2A46,(A1)128Z3r 2730z3| X015:49152X,(A4X):X3 A149152:A24915215:15,8,15,"S0:"IN$:15:A$IN$3 L(53)256(54)(A$):782,L256:781,L(782)2564 780,(A$):65469/4 TA1:254,T256:253,T(254)256:780,253^4 TA21:782,T256:781,T(782)256:65496i4 27304 SL0:X276642789616:(X)0 SL1:SAX:30304 X4 SL0"NO ROOM!":X0999::26104 FF$"":"FILE NAME:";FF$:FF$""26105 GRAG1: FF$,8,145 X015:SAX,(49152X):X:2610