Difference for lib/artifacts from version 1.35 to 1.36

version 1.35 version 1.36
Line 1954
 
Line 1954
           (begin            (begin
             (set-identified (who-am-I) #f)              (set-identified (who-am-I) #f)
             (set-cursed (who-am-I) #t)              (set-cursed (who-am-I) #t)
             (set-int (who-am-I) (+ 1 (get-dex (who-am-I))))              (set-int (who-am-I) (+ 1 (get-int (who-am-I))))
           )            )
           (if (<= rresult 3)            (if (<= rresult 3)
             (begin              (begin
               (set-identified (who-am-I) #f)                (set-identified (who-am-I) #f)
               (set-cursed (who-am-I) #t)                (set-cursed (who-am-I) #t)
               (set-wis (who-am-I) (+ 1 (get-dex (who-am-I))))                (set-wis (who-am-I) (+ 1 (get-wis (who-am-I))))
             )              )
             (if (>= rresult 99)              (if (>= rresult 99)
               (begin                (begin
Line 1972
 
Line 1972
                 (begin                  (begin
                   (set-identified (who-am-I) #f)                    (set-identified (who-am-I) #f)
                   (set-cursed (who-am-I) #t)                    (set-cursed (who-am-I) #t)
                   (set-int (who-am-I) (- (get-dex (who-am-I)) 1))                    (set-int (who-am-I) (- (get-int (who-am-I)) 1))
                 )                  )
                 (if (>= rresult 97)                  (if (>= rresult 97)
                   (begin                    (begin
                     (set-identified (who-am-I) #f)                      (set-identified (who-am-I) #f)
                     (set-cursed (who-am-I) #t)                      (set-cursed (who-am-I) #t)
                     (set-wis (who-am-I) (- (get-dex (who-am-I)) 1))                      (set-wis (who-am-I) (- (get-wis (who-am-I)) 1))
                   )                    )
                 )                  )
               )                )

Legend:
line(s) removed in v.1.35 
line(s) changed
 line(s) added in v.1.36
File made using version 1.98 of cvs2html by leaf at 2011-07-21 18:39