25 lines
498 B
Perl
25 lines
498 B
Perl
package LasTres::Flags;
|
|
|
|
use v5.36.0;
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
sub INTRO_MESSAGE_SENT_FLAG {
|
|
return 'INTRO_MESSAGE_FLAG_SENT';
|
|
}
|
|
sub TALKED_WITH_OLD_MAN_AND_LEARNED_TO_SAY_DEVOTA {
|
|
return 'TALKED_WITH_OLD_MAN_AND_LEARNED_TO_SAY_DEVOTA';
|
|
}
|
|
sub TALKED_FIRST_TIME_VETERANO_CALIZOR {
|
|
return 'TALKED_FIRST_TIME_VETERANO_CALIZOR';
|
|
}
|
|
sub ASKED_FOR_DEVOTA_VETERANO_CALIZOR {
|
|
return 'ASKED_FOR_DEVOTA_VETERANO_CALIZOR';
|
|
}
|
|
|
|
sub TEMPORAL_HAS_PRAYED {
|
|
return 'TEMPORAL_HAS_PRAYED';
|
|
}
|
|
1;
|