未確認

　
ＨＰ成長オプションが有効な状態で、あるレベルの敵(1)のHPをある値(2)に増加させる。
　

Do While )((Args(2) - HP(Args(1)))( >= 10000)
　Equip Args(1) ＨＰ１００００
Loop
Do While )((Args(2) - HP(Args(1)))( >= 1000)
　Equip Args(1) ＨＰ１０００
Loop
Do While )((Args(2) - HP(Args(1)))( >= 100)
　Equip Args(1) ＨＰ１００
Loop
Do While )((Args(2) - HP(Args(1)))( >= 10)
　Equip Args(1) ＨＰ１０
Loop

レアケースであれば、エイリアスに全レベル分のマイナス補正を羅列するより楽なはず。
　
そして

For i = 1 To )((Args(2) - HP(Args(1)))( \ 10)
　Equip Args(1) ＨＰ１０
Next

は邪道(セーブデータ的な意味で)。