1
//------------------------------------------------------------------------------
2
// ZZ> Mimics have an enchantment sustaining them
4
EnchantTarget // Enchant self...
7
//------------------------------------------------------------------------------
8
// ZZ> Someone cast an unlock spell
11
tmpy = 491 // The unique code for an unlock order
20
//------------------------------------------------------------------------------
21
// ZZ> This function makes the character wait for the enemy to open it
22
IfKilled // This reduces the height of the char
24
tmpdistance = rand & 1023 + 10500
29
SendMessageNear // Kill message
31
tmpargument = tmpargument * 50 / 100 //
33
tmpargument = 65535 // Drop money
36
IfTargetKilled // Check for more food
38
SetTargetToNearbyEnemy // Get the other enemy
41
IfAttacked // Retaliation
43
tmpdistance = rand & 1023 + 10500
45
SetTargetToWhoeverAttacked // Get the enemy
47
IfStateIs // Enter combat mode
52
SendMessageNear // Advice
53
IfBumped // Attack whoever it bumped
54
SetTargetToWhoeverBumped //
55
IfTargetIsOnHatedTeam // Make sure it's an enemy
57
IfStateIs // Enter combat mode
58
IfTargetIsAPlayer // Advice
62
tmpargument = 1 // Attack Left = 1
64
IfTimeOut // This is done every so often
66
IfStateIs // State 0 ( Lurk )
69
Else // State 1 ( Combat )
70
tmpx = 2000 // Too far?
71
tmpy = targetdistance //
73
SetState // Revert to lurk mode
74
tmpx = tmpy // In attack range?
76
IfXIsLessThanY // Stick and move
78
tmpdistance = rand & 1023 + 10500
81
tmpargument = 1 // Attack Left = 1
83
tmpx = rand & 511 - 256 + targetx //
84
tmpy = rand & 511 - 256 + targety //
87
tmpdistance = rand & 1023 + 10500
92
tmpturn = targetturnto //
97
tmpargument = rand & 31 + 20 // Wait a while and try again
99
End // Finished with this character
1
//------------------------------------------------------------------------------
2
// ZZ> Mimics have an enchantment sustaining them
4
EnchantTarget // Enchant self...
7
//------------------------------------------------------------------------------
8
// ZZ> Someone cast an unlock spell
11
tmpy = 491 // The unique code for an unlock order
20
//------------------------------------------------------------------------------
21
// ZZ> This function makes the character wait for the enemy to open it
22
IfKilled // This reduces the height of the char
24
tmpdistance = rand & 1023 + 10500
29
SendMessageNear // Kill message
31
tmpargument = tmpargument * 50 / 100 //
33
tmpargument = 65535 // Drop money
36
IfTargetKilled // Check for more food
38
SetTargetToNearbyEnemy // Get the other enemy
41
IfAttacked // Retaliation
43
tmpdistance = rand & 1023 + 10500
45
SetTargetToWhoeverAttacked // Get the enemy
47
IfStateIs // Enter combat mode
52
SendMessageNear // Advice
53
IfBumped // Attack whoever it bumped
54
SetTargetToWhoeverBumped //
55
IfTargetIsOnHatedTeam // Make sure it's an enemy
57
IfStateIs // Enter combat mode
58
IfTargetIsAPlayer // Advice
62
tmpargument = 1 // Attack Left = 1
64
IfTimeOut // This is done every so often
66
IfStateIs // State 0 ( Lurk )
69
Else // State 1 ( Combat )
70
tmpx = 2000 // Too far?
71
tmpy = targetdistance //
73
SetState // Revert to lurk mode
74
tmpx = tmpy // In attack range?
76
IfXIsLessThanY // Stick and move
78
tmpdistance = rand & 1023 + 10500
81
tmpargument = 1 // Attack Left = 1
83
tmpx = rand & 511 - 256 + targetx //
84
tmpy = rand & 511 - 256 + targety //
87
tmpdistance = rand & 1023 + 10500
92
tmpturn = targetturnto //
97
tmpargument = rand & 31 + 20 // Wait a while and try again
99
End // Finished with this character