home *** CD-ROM | disk | FTP | other *** search
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- { LEXMANAGEHEAD _DMG
- .ÇéÇä = ~ÇÇ
-
- w CURFIG RESTORE MDH1F
-
-
- I .ÇéÇÇ < 1 THEN
- {
- w CURFIG DRAWONLY MDH1F PICTURE 14
- }
- E
- {
-
- I @ÇÅ ~ÇÇ 1 THEN
- {
- w CURFIG DRAW MDH1F PICTURE 11
- I @ÇÅ ~ÇÇ 17 THEN
- w CURFIG DRAW MDH1F PICTURE 12
- I @ÇÅ ~ÇÇ 18 THEN
- w CURFIG DRAW MDH1F PICTURE 13
- }
- E
- {
- I @ÇÅ ~ÇÇ 17 || @ÇÅ ~ÇÇ 18 THEN
- w CURFIG DRAW MDH1F PICTURE 7
- I @ÇÅ ~ÇÇ 16 THEN
- w CURFIG DRAW MDH1F PICTURE 6
-
- }
-
- }
- }
-
-
-
- { LEXHEAD _WHICH_FLAG _NEW_VALUE
- P ~Çé
-
- @Ç¢ LEX
- ~Çé = .ÇéÇä
- I ~Çü = 0 THEN
- b ~Çé ~ÇÇ
- E
- {
- I @ÇÅ ~Çé ~ÇÇ THEN
- é 0
- a ~Çé ~ÇÇ
- }
- @Ç¥ LEXMANAGEHEAD ~Çé
- é 1
- }
- { BLINK
- I @Ç¥ LEXHEAD 16 1 THEN
- {
- W 4
- @Ç¥ LEXHEAD 16 0
- }
- }
- { GROWL _DURATION
- I @Ç¥ LEXHEAD 17 1 THEN
- {
- W ~ÇÇ SECONDS
- @Ç¥ LEXHEAD 17 0
- }
- }
-
- { GRIMACE _DURATION
- I @Ç¥ LEXHEAD 18 1 THEN
- {
- W ~ÇÇ SECONDS
- @Ç¥ LEXHEAD 18 0
- }
- }
- { LEX_WOUNDS
- P ~ÇÇ
- P ~Çü
- P ~Çé
- P ~Çâ
- P ~Çä
- P ~Çà
- P ~Çå
- P ~Çç
- I @Ç⌐ LEXMIR THEN
- é
- E
- I @Ç⌐ HARD THEN @Ç¥ HARD_WOUNDS
- E
- {
- ~Çä = .ÇéÇä
- ~ÇÇ = @Ç» ~Çä 1 10
-
- ~Çü = .ÇéÇÇ / 10
- ~Çü = 10 - ~Çü
- I ~Çü < 0 THEN ~Çü = 0
- I ~Çü > 10 THEN ~Çü = 10
- :TOP
- ~Çé = 0
-
- I ~ÇÇ < ~Çü THEN
- {
- ~Çé = 1
- :ADDATWHATPOINT
- ~Çâ = @Çà 1 10
- I @ÇÅ ~Çä ~Çâ = 1 THEN J #Çç
- a ~Çä ~Çâ
- ~ÇÇ += 1
- }
-
- I ~ÇÇ > ~Çü THEN
- {
- ~Çé = 1
- :REMOVEATWHATPOINT
- ~Çâ = @Çà 1 10
- I @ÇÅ ~Çä ~Çâ = 0 THEN J #Çê
- b ~Çä ~Çâ
- ~ÇÇ -= 1
- }
- I ~Çé = 1 THEN J #Çå
-
-
- w CURFIG RESTORE ALL
- I @ǃ THEN
- {
- w CURFIG CLEAR MDHNRR1 PICTURE 2
- w CURFIG CLEAR MDHNRF1 PICTURE 3
- w CURFIG CLEAR MDHNLL1 PICTURE 4
- w CURFIG CLEAR MDHNLF3 PICTURE 5
- }
-
- @Ç¥ LEXMANAGEHEAD ~Çä
- ~Çå = 14
- I @ÇÅ ~Çä 2 THEN ~Çå += 1
- I @ÇÅ ~Çä 3 THEN ~Çå += 1
- I @ÇÅ ~Çä 4 THEN ~Çå += 1
- I ~Çå > 14 THEN
- w CURFIG DRAWONLY MDTORSF PICTURE ~Çå
- ~Çç = 17
- I @ÇÅ ~Çä 5 THEN ~Çç += 1
- I @ÇÅ ~Çä 6 THEN ~Çç += 1
- I ~Çç > 17 THEN
- w CURFIG DRAWONLY MDTB3 PICTURE ~Çç
- I @ÇÅ ~Çä 7 THEN
- {
-
- w CURFIG DRAWONLY MDALF1 PICTURE 20
-
-
-
- }
- I @ÇÅ ~Çä 8 THEN
- {
- w CURFIG DRAWONLY MDARF1 PICTURE 22
- w CURFIG DRAWONLY MDARR1 PICTURE 23
- }
- I @ÇÅ ~Çä 9 THEN
- {
- w CURFIG DRAWONLY MDLGLF PICTURE 24
- w CURFIG DRAWONLY MDLGLL PICTURE 25
- w CURFIG DRAWONLY MDLEGLR PICTURE 26
- }
- I @ÇÅ ~Çä 10 THEN
- {
- w CURFIG DRAWONLY MDLGRF PICTURE 27
- w CURFIG DRAWONLY MDLGRR PICTURE 28
- }
- .ÇéÇä = ~Çä
- }
- }
-
-
-
- //$ 26 - version number
-