Scripts: add c198800001 script (not finished)

Simply copy c10001 （幻想乡）code.