Advertisement
Guest User

Portent II points script

a guest
Feb 4th, 2013
207
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 21.22 KB | None | 0 0
  1. (script continuous points_counter
  2.     (if (= kill_counter false)
  3.         (begin
  4.             (if (>= points 1000)
  5.                 (cinematic_set_title num_max)
  6.             )
  7.             (if (= points 0)
  8.                 (cinematic_set_title num_0)
  9.             )
  10.             (if (or (= points 10) (= points 20) (= points 30) (= points 40) (= points 50) (= points 60) (= points 70) (= points 80) (= points 90)
  11.                 (= points 100) (= points 110) (= points 120) (= points 130) (= points 140) (= points 150) (= points 160) (= points 170) (= points 180) (= points 190)
  12.                 (= points 200) (= points 210) (= points 220) (= points 230) (= points 240) (= points 250) (= points 260) (= points 270) (= points 280) (= points 290)
  13.                 (= points 300) (= points 310) (= points 320) (= points 330) (= points 340) (= points 350) (= points 360) (= points 370) (= points 380) (= points 390)
  14.                 (= points 400) (= points 410) (= points 420) (= points 430) (= points 440) (= points 450) (= points 460) (= points 470) (= points 480) (= points 490)
  15.                 (= points 500) (= points 510) (= points 520) (= points 530) (= points 540) (= points 550) (= points 560) (= points 570) (= points 580) (= points 590)
  16.                 (= points 600) (= points 610) (= points 620) (= points 630) (= points 640) (= points 650) (= points 660) (= points 670) (= points 680) (= points 690)
  17.                 (= points 700) (= points 710) (= points 720) (= points 730) (= points 740) (= points 750) (= points 760) (= points 770) (= points 780) (= points 790)
  18.                 (= points 800) (= points 810) (= points 820) (= points 830) (= points 840) (= points 850) (= points 860) (= points 870) (= points 880) (= points 890)
  19.                 (= points 900) (= points 910) (= points 920) (= points 930) (= points 940) (= points 950) (= points 960) (= points 970) (= points 980) (= points 990))
  20.                 (cinematic_set_title num_ten_0)
  21.             )
  22.             (if (or (= points 1) (= points 11) (= points 21) (= points 31) (= points 41) (= points 51) (= points 61) (= points 71) (= points 81) (= points 91)
  23.                 (= points 101) (= points 111) (= points 121) (= points 131) (= points 141) (= points 151) (= points 161) (= points 171) (= points 181) (= points 191)
  24.                 (= points 201) (= points 211) (= points 221) (= points 231) (= points 241) (= points 251) (= points 261) (= points 271) (= points 281) (= points 291)
  25.                 (= points 301) (= points 311) (= points 321) (= points 331) (= points 341) (= points 351) (= points 361) (= points 371) (= points 381) (= points 391)
  26.                 (= points 401) (= points 411) (= points 421) (= points 431) (= points 441) (= points 451) (= points 461) (= points 471) (= points 481) (= points 491)
  27.                 (= points 501) (= points 511) (= points 521) (= points 531) (= points 541) (= points 551) (= points 561) (= points 571) (= points 581) (= points 591)
  28.                 (= points 601) (= points 611) (= points 621) (= points 631) (= points 641) (= points 651) (= points 661) (= points 671) (= points 681) (= points 691)
  29.                 (= points 701) (= points 711) (= points 721) (= points 731) (= points 741) (= points 751) (= points 761) (= points 771) (= points 781) (= points 791)
  30.                 (= points 801) (= points 811) (= points 821) (= points 831) (= points 841) (= points 851) (= points 861) (= points 871) (= points 881) (= points 891)
  31.                 (= points 901) (= points 911) (= points 921) (= points 931) (= points 941) (= points 951) (= points 961) (= points 971) (= points 981) (= points 991))
  32.                 (cinematic_set_title num_ten_1)
  33.             )
  34.             (if (or (= points 2) (= points 12) (= points 22) (= points 32) (= points 42) (= points 52) (= points 62) (= points 72) (= points 82) (= points 92)
  35.                 (= points 102) (= points 112) (= points 122) (= points 132) (= points 142) (= points 152) (= points 162) (= points 172) (= points 182) (= points 192)
  36.                 (= points 202) (= points 212) (= points 222) (= points 232) (= points 242) (= points 252) (= points 262) (= points 272) (= points 282) (= points 292)
  37.                 (= points 302) (= points 312) (= points 322) (= points 332) (= points 342) (= points 352) (= points 362) (= points 372) (= points 382) (= points 392)
  38.                 (= points 402) (= points 412) (= points 422) (= points 432) (= points 442) (= points 452) (= points 462) (= points 472) (= points 482) (= points 492)
  39.                 (= points 502) (= points 512) (= points 522) (= points 532) (= points 542) (= points 552) (= points 562) (= points 572) (= points 582) (= points 592)
  40.                 (= points 602) (= points 612) (= points 622) (= points 632) (= points 642) (= points 652) (= points 662) (= points 672) (= points 682) (= points 692)
  41.                 (= points 702) (= points 712) (= points 722) (= points 732) (= points 742) (= points 752) (= points 762) (= points 772) (= points 782) (= points 792)
  42.                 (= points 802) (= points 812) (= points 822) (= points 832) (= points 842) (= points 852) (= points 862) (= points 872) (= points 882) (= points 892)
  43.                 (= points 902) (= points 912) (= points 922) (= points 932) (= points 942) (= points 952) (= points 962) (= points 972) (= points 982) (= points 992))
  44.                 (cinematic_set_title num_ten_2)
  45.             )
  46.             (if (or (= points 3) (= points 13) (= points 23) (= points 33) (= points 43) (= points 53) (= points 63) (= points 73) (= points 83) (= points 93)
  47.                 (= points 103) (= points 113) (= points 123) (= points 133) (= points 143) (= points 153) (= points 163) (= points 173) (= points 183) (= points 193)
  48.                 (= points 203) (= points 213) (= points 223) (= points 233) (= points 243) (= points 253) (= points 263) (= points 273) (= points 283) (= points 293)
  49.                 (= points 303) (= points 313) (= points 323) (= points 333) (= points 343) (= points 353) (= points 363) (= points 373) (= points 383) (= points 393)
  50.                 (= points 403) (= points 413) (= points 423) (= points 433) (= points 443) (= points 453) (= points 463) (= points 473) (= points 483) (= points 493)
  51.                 (= points 503) (= points 513) (= points 523) (= points 533) (= points 543) (= points 553) (= points 563) (= points 573) (= points 583) (= points 593)
  52.                 (= points 603) (= points 613) (= points 623) (= points 633) (= points 643) (= points 653) (= points 663) (= points 673) (= points 683) (= points 693)
  53.                 (= points 703) (= points 713) (= points 723) (= points 733) (= points 743) (= points 753) (= points 763) (= points 773) (= points 783) (= points 793)
  54.                 (= points 803) (= points 813) (= points 823) (= points 833) (= points 843) (= points 853) (= points 863) (= points 873) (= points 883) (= points 893)
  55.                 (= points 903) (= points 913) (= points 923) (= points 933) (= points 943) (= points 953) (= points 963) (= points 973) (= points 983) (= points 993))
  56.                 (cinematic_set_title num_ten_3)
  57.             )
  58.             (if (or (= points 4) (= points 14) (= points 24) (= points 34) (= points 44) (= points 54) (= points 64) (= points 74) (= points 84) (= points 94)
  59.                 (= points 104) (= points 114) (= points 124) (= points 134) (= points 144) (= points 154) (= points 164) (= points 174) (= points 184) (= points 194)
  60.                 (= points 204) (= points 214) (= points 224) (= points 234) (= points 244) (= points 254) (= points 264) (= points 274) (= points 284) (= points 294)
  61.                 (= points 304) (= points 314) (= points 324) (= points 334) (= points 344) (= points 354) (= points 364) (= points 374) (= points 384) (= points 394)
  62.                 (= points 404) (= points 414) (= points 424) (= points 434) (= points 444) (= points 454) (= points 464) (= points 474) (= points 484) (= points 494)
  63.                 (= points 504) (= points 514) (= points 524) (= points 534) (= points 544) (= points 554) (= points 564) (= points 574) (= points 584) (= points 594)
  64.                 (= points 604) (= points 614) (= points 624) (= points 634) (= points 644) (= points 654) (= points 664) (= points 674) (= points 684) (= points 694)
  65.                 (= points 704) (= points 714) (= points 724) (= points 734) (= points 744) (= points 754) (= points 764) (= points 774) (= points 784) (= points 794)
  66.                 (= points 804) (= points 814) (= points 824) (= points 834) (= points 844) (= points 854) (= points 864) (= points 874) (= points 884) (= points 894)
  67.                 (= points 904) (= points 914) (= points 924) (= points 934) (= points 944) (= points 954) (= points 964) (= points 974) (= points 984) (= points 994))
  68.                 (cinematic_set_title num_ten_4)
  69.             )
  70.             (if (or (= points 5) (= points 15) (= points 25) (= points 35) (= points 45) (= points 55) (= points 65) (= points 75) (= points 85) (= points 95)
  71.                 (= points 105) (= points 115) (= points 125) (= points 135) (= points 145) (= points 155) (= points 165) (= points 175) (= points 185) (= points 195)
  72.                 (= points 205) (= points 215) (= points 225) (= points 235) (= points 245) (= points 255) (= points 265) (= points 275) (= points 285) (= points 295)
  73.                 (= points 305) (= points 315) (= points 325) (= points 335) (= points 345) (= points 355) (= points 365) (= points 375) (= points 385) (= points 395)
  74.                 (= points 405) (= points 415) (= points 425) (= points 435) (= points 445) (= points 455) (= points 465) (= points 475) (= points 485) (= points 495)
  75.                 (= points 505) (= points 515) (= points 525) (= points 535) (= points 545) (= points 555) (= points 565) (= points 575) (= points 585) (= points 595)
  76.                 (= points 605) (= points 615) (= points 625) (= points 635) (= points 645) (= points 655) (= points 665) (= points 675) (= points 685) (= points 695)
  77.                 (= points 705) (= points 715) (= points 725) (= points 735) (= points 745) (= points 755) (= points 765) (= points 775) (= points 785) (= points 795)
  78.                 (= points 805) (= points 815) (= points 825) (= points 835) (= points 845) (= points 855) (= points 865) (= points 875) (= points 885) (= points 895)
  79.                 (= points 905) (= points 915) (= points 925) (= points 935) (= points 945) (= points 955) (= points 965) (= points 975) (= points 985) (= points 995))
  80.                 (cinematic_set_title num_ten_5)
  81.             )
  82.             (if (or (= points 6) (= points 16) (= points 26) (= points 36) (= points 46) (= points 56) (= points 66) (= points 76) (= points 86) (= points 96)
  83.                 (= points 106) (= points 116) (= points 126) (= points 136) (= points 146) (= points 156) (= points 166) (= points 176) (= points 186) (= points 196)
  84.                 (= points 206) (= points 216) (= points 226) (= points 236) (= points 246) (= points 256) (= points 266) (= points 276) (= points 286) (= points 296)
  85.                 (= points 306) (= points 316) (= points 326) (= points 336) (= points 346) (= points 356) (= points 366) (= points 376) (= points 386) (= points 396)
  86.                 (= points 406) (= points 416) (= points 426) (= points 436) (= points 446) (= points 456) (= points 466) (= points 476) (= points 486) (= points 496)
  87.                 (= points 506) (= points 516) (= points 526) (= points 536) (= points 546) (= points 556) (= points 566) (= points 576) (= points 586) (= points 596)
  88.                 (= points 606) (= points 616) (= points 626) (= points 636) (= points 646) (= points 656) (= points 666) (= points 676) (= points 686) (= points 696)
  89.                 (= points 706) (= points 716) (= points 726) (= points 736) (= points 746) (= points 756) (= points 766) (= points 776) (= points 786) (= points 796)
  90.                 (= points 806) (= points 816) (= points 826) (= points 836) (= points 846) (= points 856) (= points 866) (= points 876) (= points 886) (= points 896)
  91.                 (= points 906) (= points 916) (= points 926) (= points 936) (= points 946) (= points 956) (= points 966) (= points 976) (= points 986) (= points 996))
  92.                 (cinematic_set_title num_ten_6)
  93.             )
  94.             (if (or (= points 7) (= points 17) (= points 27) (= points 37) (= points 47) (= points 57) (= points 67) (= points 77) (= points 87) (= points 97)
  95.                 (= points 107) (= points 117) (= points 127) (= points 137) (= points 147) (= points 157) (= points 167) (= points 177) (= points 187) (= points 197)
  96.                 (= points 207) (= points 217) (= points 227) (= points 237) (= points 247) (= points 257) (= points 267) (= points 277) (= points 287) (= points 297)
  97.                 (= points 307) (= points 317) (= points 327) (= points 337) (= points 347) (= points 357) (= points 367) (= points 377) (= points 387) (= points 397)
  98.                 (= points 407) (= points 417) (= points 427) (= points 437) (= points 447) (= points 457) (= points 467) (= points 477) (= points 487) (= points 497)
  99.                 (= points 507) (= points 517) (= points 527) (= points 537) (= points 547) (= points 557) (= points 567) (= points 577) (= points 587) (= points 597)
  100.                 (= points 607) (= points 617) (= points 627) (= points 637) (= points 647) (= points 657) (= points 667) (= points 677) (= points 687) (= points 697)
  101.                 (= points 707) (= points 717) (= points 727) (= points 737) (= points 747) (= points 757) (= points 767) (= points 777) (= points 787) (= points 797)
  102.                 (= points 807) (= points 817) (= points 827) (= points 837) (= points 847) (= points 857) (= points 867) (= points 877) (= points 887) (= points 897)
  103.                 (= points 907) (= points 917) (= points 927) (= points 937) (= points 947) (= points 957) (= points 967) (= points 977) (= points 987) (= points 997))
  104.                 (cinematic_set_title num_ten_7)
  105.             )
  106.             (if (or (= points 8) (= points 18) (= points 28) (= points 38) (= points 48) (= points 58) (= points 68) (= points 78) (= points 88) (= points 98)
  107.                 (= points 108) (= points 118) (= points 128) (= points 138) (= points 148) (= points 158) (= points 168) (= points 178) (= points 188) (= points 198)
  108.                 (= points 208) (= points 218) (= points 228) (= points 238) (= points 248) (= points 258) (= points 268) (= points 278) (= points 288) (= points 298)
  109.                 (= points 308) (= points 318) (= points 328) (= points 338) (= points 348) (= points 358) (= points 368) (= points 378) (= points 388) (= points 398)
  110.                 (= points 408) (= points 418) (= points 428) (= points 438) (= points 448) (= points 458) (= points 468) (= points 478) (= points 488) (= points 498)
  111.                 (= points 508) (= points 518) (= points 528) (= points 538) (= points 548) (= points 558) (= points 568) (= points 578) (= points 588) (= points 598)
  112.                 (= points 608) (= points 618) (= points 628) (= points 638) (= points 648) (= points 658) (= points 668) (= points 678) (= points 688) (= points 698)
  113.                 (= points 708) (= points 718) (= points 728) (= points 738) (= points 748) (= points 758) (= points 768) (= points 778) (= points 788) (= points 798)
  114.                 (= points 808) (= points 818) (= points 828) (= points 838) (= points 848) (= points 858) (= points 868) (= points 878) (= points 888) (= points 898)
  115.                 (= points 908) (= points 918) (= points 928) (= points 938) (= points 948) (= points 958) (= points 968) (= points 978) (= points 988) (= points 998))
  116.                 (cinematic_set_title num_ten_8)
  117.             )
  118.             (if (or (= points 9) (= points 19) (= points 29) (= points 39) (= points 49) (= points 59) (= points 69) (= points 79) (= points 89) (= points 99)
  119.                 (= points 109) (= points 119) (= points 129) (= points 139) (= points 149) (= points 159) (= points 169) (= points 179) (= points 189) (= points 199)
  120.                 (= points 209) (= points 219) (= points 229) (= points 239) (= points 249) (= points 259) (= points 269) (= points 279) (= points 289) (= points 299)
  121.                 (= points 309) (= points 319) (= points 329) (= points 339) (= points 349) (= points 359) (= points 369) (= points 379) (= points 389) (= points 399)
  122.                 (= points 409) (= points 419) (= points 429) (= points 439) (= points 449) (= points 459) (= points 469) (= points 479) (= points 489) (= points 499)
  123.                 (= points 509) (= points 519) (= points 529) (= points 539) (= points 549) (= points 559) (= points 569) (= points 579) (= points 589) (= points 599)
  124.                 (= points 609) (= points 619) (= points 629) (= points 639) (= points 649) (= points 659) (= points 669) (= points 679) (= points 689) (= points 699)
  125.                 (= points 709) (= points 719) (= points 729) (= points 739) (= points 749) (= points 759) (= points 769) (= points 779) (= points 789) (= points 799)
  126.                 (= points 809) (= points 819) (= points 829) (= points 839) (= points 849) (= points 859) (= points 869) (= points 879) (= points 889) (= points 899)
  127.                 (= points 909) (= points 919) (= points 929) (= points 939) (= points 949) (= points 959) (= points 969) (= points 979) (= points 989) (= points 999))
  128.                 (cinematic_set_title num_ten_9)
  129.             )
  130.             ;;-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-HUNDREDS-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-
  131.             (if (or (and (>= points 100) (< points 110))
  132.                 (and (>= points 200) (< points 210))
  133.                 (and (>= points 300) (< points 310))
  134.                 (and (>= points 400) (< points 410))
  135.                 (and (>= points 500) (< points 510))
  136.                 (and (>= points 600) (< points 610))
  137.                 (and (>= points 700) (< points 710))
  138.                 (and (>= points 800) (< points 810))
  139.                 (and (>= points 900) (< points 910)))
  140.                 (cinematic_set_title num_hund_0)
  141.             )
  142.             (if (or (and (>= points 10) (< points 20))
  143.                 (and (>= points 110) (< points 120))
  144.                 (and (>= points 210) (< points 220))
  145.                 (and (>= points 310) (< points 320))
  146.                 (and (>= points 410) (< points 420))
  147.                 (and (>= points 510) (< points 520))
  148.                 (and (>= points 610) (< points 620))
  149.                 (and (>= points 710) (< points 720))
  150.                 (and (>= points 810) (< points 820))
  151.                 (and (>= points 910) (< points 920)))
  152.                 (cinematic_set_title num_hund_1)
  153.             )
  154.             (if (or (and (>= points 20) (< points 30))
  155.                 (and (>= points 120) (< points 130))
  156.                 (and (>= points 220) (< points 230))
  157.                 (and (>= points 320) (< points 330))
  158.                 (and (>= points 420) (< points 430))
  159.                 (and (>= points 520) (< points 530))
  160.                 (and (>= points 620) (< points 630))
  161.                 (and (>= points 720) (< points 730))
  162.                 (and (>= points 820) (< points 830))
  163.                 (and (>= points 920) (< points 930)))
  164.                 (cinematic_set_title num_hund_2)
  165.             )      
  166.             (if (or (and (>= points 30) (< points 40))
  167.                 (and (>= points 130) (< points 140))
  168.                 (and (>= points 230) (< points 240))
  169.                 (and (>= points 330) (< points 340))
  170.                 (and (>= points 430) (< points 440))
  171.                 (and (>= points 530) (< points 540))
  172.                 (and (>= points 630) (< points 640))
  173.                 (and (>= points 730) (< points 740))
  174.                 (and (>= points 830) (< points 840))
  175.                 (and (>= points 930) (< points 940)))
  176.                 (cinematic_set_title num_hund_3)
  177.             )
  178.             (if (or (and (>= points 40) (< points 50))
  179.                 (and (>= points 140) (< points 150))
  180.                 (and (>= points 240) (< points 250))
  181.                 (and (>= points 340) (< points 350))
  182.                 (and (>= points 440) (< points 450))
  183.                 (and (>= points 540) (< points 550))
  184.                 (and (>= points 640) (< points 650))
  185.                 (and (>= points 740) (< points 750))
  186.                 (and (>= points 840) (< points 850))
  187.                 (and (>= points 940) (< points 950)))
  188.                 (cinematic_set_title num_hund_4)
  189.             )
  190.             (if (or (and (>= points 50) (< points 60))
  191.                 (and (>= points 150) (< points 160))
  192.                 (and (>= points 250) (< points 260))
  193.                 (and (>= points 350) (< points 360))
  194.                 (and (>= points 450) (< points 460))
  195.                 (and (>= points 550) (< points 560))
  196.                 (and (>= points 650) (< points 660))
  197.                 (and (>= points 750) (< points 760))
  198.                 (and (>= points 850) (< points 860))
  199.                 (and (>= points 950) (< points 960)))
  200.                 (cinematic_set_title num_hund_5)
  201.             )
  202.             (if (or (and (>= points 60) (< points 70))
  203.                 (and (>= points 160) (< points 170))
  204.                 (and (>= points 260) (< points 270))
  205.                 (and (>= points 360) (< points 370))
  206.                 (and (>= points 460) (< points 470))
  207.                 (and (>= points 560) (< points 570))
  208.                 (and (>= points 660) (< points 670))
  209.                 (and (>= points 760) (< points 770))
  210.                 (and (>= points 860) (< points 870))
  211.                 (and (>= points 960) (< points 970)))
  212.                 (cinematic_set_title num_hund_6)
  213.             )
  214.             (if (or (and (>= points 70) (< points 80))
  215.                 (and (>= points 170) (< points 180))
  216.                 (and (>= points 270) (< points 280))
  217.                 (and (>= points 370) (< points 380))
  218.                 (and (>= points 470) (< points 480))
  219.                 (and (>= points 570) (< points 580))
  220.                 (and (>= points 670) (< points 680))
  221.                 (and (>= points 770) (< points 780))
  222.                 (and (>= points 870) (< points 880))
  223.                 (and (>= points 970) (< points 980)))
  224.                 (cinematic_set_title num_hund_7)
  225.             )
  226.             (if (or (and (>= points 80) (< points 90))
  227.                 (and (>= points 180) (< points 190))
  228.                 (and (>= points 280) (< points 290))
  229.                 (and (>= points 380) (< points 390))
  230.                 (and (>= points 480) (< points 490))
  231.                 (and (>= points 580) (< points 590))
  232.                 (and (>= points 680) (< points 690))
  233.                 (and (>= points 780) (< points 790))
  234.                 (and (>= points 880) (< points 890))
  235.                 (and (>= points 980) (< points 990)))
  236.                 (cinematic_set_title num_hund_8)
  237.             )
  238.             (if (or (and (>= points 90) (< points 100))
  239.                 (and (>= points 190) (< points 200))
  240.                 (and (>= points 290) (< points 300))
  241.                 (and (>= points 390) (< points 400))
  242.                 (and (>= points 490) (< points 500))
  243.                 (and (>= points 590) (< points 600))
  244.                 (and (>= points 690) (< points 700))
  245.                 (and (>= points 790) (< points 800))
  246.                 (and (>= points 890) (< points 900))
  247.                 (and (>= points 990) (< points 1000)))
  248.                 (cinematic_set_title num_hund_9)
  249.             )
  250.             ;;-/-/-/-/-/-/-/-/-/-/-/-/-/-/-THOUSANDS-/-/-/-/-/-/-/-/-/-/-/-/-/-/-
  251.             (if (and (>= points 100) (< points 200))
  252.                 (cinematic_set_title num_thous_1)
  253.             )
  254.             (if (and (>= points 200) (< points 300))
  255.                 (cinematic_set_title num_thous_2)
  256.             )
  257.             (if (and (>= points 300) (< points 400))
  258.                 (cinematic_set_title num_thous_3)
  259.             )
  260.             (if (and (>= points 400) (< points 500))
  261.                 (cinematic_set_title num_thous_4)
  262.             )
  263.             (if (and (>= points 500) (< points 600))
  264.                 (cinematic_set_title num_thous_5)
  265.             )
  266.             (if (and (>= points 600) (< points 700))
  267.                 (cinematic_set_title num_thous_6)
  268.             )
  269.             (if (and (>= points 700) (< points 800))
  270.                 (cinematic_set_title num_thous_7)
  271.             )
  272.             (if (and (>= points 800) (< points 900))
  273.                 (cinematic_set_title num_thous_8)
  274.             )
  275.             (if (and (>= points 900) (< points 1000))
  276.                 (cinematic_set_title num_thous_9)
  277.             )
  278.         )
  279.     )
  280. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement