Test Spell

sub bossCreate {
        global bossX = 192
        global bossY = 112

        global bossEnemy = createEnemy(32, 24)
        setLife($bossEnemy, 100)
        global bossImage = createImage(0)
        centerImage($bossImage)
        createThread(borrowSub(boss1))
}

sub bossControl {
        while getLife($bossEnemy) > 0 {
                setXY($bossEnemy, $bossX, $bossY)
                setXY($bossImage, $bossX, $bossY)
                wait(1)
        }
}

sub boss1 {
        let dir1 = 0
        let spd = 0
        while getLife($bossEnemy) > 0 {
                loop 40 {
                        let spd = 0.7 + sin($dir1 * 5) * 0.3
                        let dir2 = 0
                        let add = 360 / 4
                        loop 4 {
                                createShot($bossX, $bossY, 4 * $spd, $dir1 + $dir2 + 45, 65, 4)
                                createShot($bossX, $bossY, 3 * $spd, -$dir1 + $dir2 + 45, 46, 4)
                                dir2 = $dir2 + $add
                        }
                        dir1 = ($dir1 + 3.247 + 360) % 360
                        wait(1)
                }
                wait(30)
                loop 40 {
                        let spd = 0.7 + cos($dir1 * 7) * 0.3
                        let dir2 = 0
                        let add = 360 / 4
                        loop 4 {
                                createShot($bossX, $bossY, 4 * $spd, $dir1 + $dir2, 65, 4)
                                createShot($bossX, $bossY, 3 * $spd, -$dir1 + $dir2, 54, 4)
                                dir2 = $dir2 + $add
                        }
                        dir1 = ($dir1 - 7.537 + 360) % 360
                        wait(1)
                }
                wait(30)
        }
}

wait(60)

do bossCreate
do bossControl