home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / Train.dxr / Internal_14.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  3.9 KB  |  54 lines
  1. on asshole
  2.   put "IN HERE"
  3.   wordtest = [:]
  4.   thetext = EMPTY
  5.   wordtest.addProp(#aerotrain, [sprite(176), sprite(177), sprite(178), sprite(179), sprite(180), sprite(181), sprite(182), sprite(183), sprite(184), sprite(185), sprite(186)])
  6.   wordtest.addProp(#bigboy, [sprite(46), sprite(47), sprite(48), sprite(49), sprite(50), sprite(51)])
  7.   wordtest.addProp(#blucher, [sprite(83), sprite(98), sprite(113), sprite(128), sprite(143), sprite(158), sprite(173)])
  8.   wordtest.addProp(#dixieflyer, [sprite(7), sprite(8), sprite(9), sprite(10), sprite(11), sprite(12), sprite(13), sprite(14), sprite(15), sprite(16)])
  9.   wordtest.addProp(#mogul, [sprite(17), sprite(18), sprite(19), sprite(20), sprite(21)])
  10.   wordtest.addProp(#dewittclinton, [sprite(157), sprite(158), sprite(159), sprite(160), sprite(161), sprite(162), sprite(163), sprite(164), sprite(165), sprite(166), sprite(167), sprite(168), sprite(169)])
  11.   wordtest.addProp(#coyotespecial, [sprite(67), sprite(68), sprite(69), sprite(70), sprite(71), sprite(72), sprite(73), sprite(74), sprite(75), sprite(76), sprite(77), sprite(77), sprite(78), sprite(79)])
  12.   wordtest.addProp(#mikado, [sprite(52), sprite(53), sprite(54), sprite(55), sprite(56), sprite(57)])
  13.   wordtest.addProp(#leshuttle, [sprite(37), sprite(38), sprite(39), sprite(40), sprite(41), sprite(42), sprite(43), sprite(44), sprite(45)])
  14.   wordtest.addProp(#fastmail, [sprite(22), sprite(23), sprite(24), sprite(25), sprite(26), sprite(27), sprite(28), sprite(29)])
  15.   wordtest.addProp(#canadian, [sprite(65), sprite(64), sprite(63), sprite(62), sprite(61), sprite(60), sprite(59), sprite(58)])
  16.   wordtest.addProp(#consolidation, [sprite(214), sprite(213), sprite(212), sprite(211), sprite(210), sprite(209), sprite(208), sprite(207), sprite(206), sprite(205), sprite(204), sprite(203), sprite(202)])
  17.   wordtest.addProp(#mistral, [sprite(140), sprite(155), sprite(170), sprite(185), sprite(200), sprite(215), sprite(230)])
  18.   wordtest.addProp(#colonial, [sprite(96), sprite(111), sprite(126), sprite(141), sprite(156), sprite(171), sprite(186), sprite(201)])
  19.   wordtest.addProp(#capitole, [sprite(197), sprite(196), sprite(195), sprite(194), sprite(193), sprite(192), sprite(191), sprite(190)])
  20.   wordtest.addProp(#coastdaylight, [sprite(154), sprite(153), sprite(152), sprite(151), sprite(150), sprite(149), sprite(148), sprite(147), sprite(146), sprite(145), sprite(144), sprite(143), sprite(142)])
  21.   wordtest.addProp(#bullettrain, [sprite(94), sprite(93), sprite(92), sprite(91), sprite(90), sprite(89), sprite(88), sprite(87), sprite(86), sprite(85), sprite(84)])
  22.   wordtest.addProp(#nightowl, [sprite(36), sprite(35), sprite(34), sprite(33), sprite(32), sprite(31), sprite(30), sprite(29)])
  23.   wordtest.addProp(#chief, [sprite(65), sprite(80), sprite(95), sprite(110), sprite(125)])
  24.   wordtest.addProp(#diplomat, [sprite(114), sprite(115), sprite(116), sprite(117), sprite(118), sprite(119), sprite(120), sprite(121)])
  25.   wordtest.addProp(#cannonball, [sprite(228), sprite(227), sprite(226), sprite(225), sprite(224), sprite(223), sprite(222), sprite(221), sprite(220), sprite(219)])
  26.   wordtest.addProp(#cubianspecial, [sprite(109), sprite(108), sprite(107), sprite(106), sprite(105), sprite(104), sprite(103), sprite(102), sprite(101), sprite(100), sprite(99), sprite(98)])
  27.   wordtest.addProp(#elcapitain, [sprite(129), sprite(130), sprite(131), sprite(132), sprite(133), sprite(134), sprite(135), sprite(136), sprite(137)])
  28.   repeat with i = 1 to wordtest.count
  29.     wordtest[i] = sortlist2(wordtest[i].duplicate())
  30.     thetext = thetext & string(wordtest[i]) & "\" & RETURN
  31.   end repeat
  32.   newmember = new(#text)
  33.   newmember.text = thetext
  34.   newmember.name = "www"
  35.   put thetext
  36. end
  37.  
  38. on sortlist2 aList
  39.   temp1 = []
  40.   repeat with i in aList
  41.     temp1.add(i.spriteNum)
  42.   end repeat
  43.   temp1.sort()
  44.   put temp1
  45.   temp2 = []
  46.   repeat while temp2.count < temp1.count
  47.     temp2.add(VOID)
  48.   end repeat
  49.   repeat with i in aList
  50.     temp2[temp1.findPos(i.spriteNum)] = i
  51.   end repeat
  52.   return temp2
  53. end
  54.